Differenze tra le versioni di "Ottenere il tempo trascorso dall'inizializzazione della libreria SDL2"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
La funzione esterna ''SDL_GetTicks()'' della libreria ''SDL2'' consente di conoscere il tempo trascorso dall'inizializzazione della libreria medesima. Nel programma Gambas si dovrà utilizzare dunque anche la funzione "SDL_Init()" per inizializzare la libreria. | La funzione esterna ''SDL_GetTicks()'' della libreria ''SDL2'' consente di conoscere il tempo trascorso dall'inizializzazione della libreria medesima. Nel programma Gambas si dovrà utilizzare dunque anche la funzione "SDL_Init()" per inizializzare la libreria. | ||
− | E' necessario avere installata e richiamare in Gambas la libreria condivisa: "''libSDL2-2.0.so.0.3000. | + | E' necessario avere installata e richiamare in Gambas la libreria condivisa: "''libSDL2-2.0.so.0.3000.5'' ". |
Mostriamo un semplice esempio pratico: | Mostriamo un semplice esempio pratico: | ||
− | Library "libSDL2-2.0:0.3000. | + | Library "libSDL2-2.0:0.3000.5" |
Private Const SDL_INIT_TIMER As Integer = 1 | Private Const SDL_INIT_TIMER As Integer = 1 |
Versione attuale delle 15:29, 18 lug 2024
La funzione esterna SDL_GetTicks() della libreria SDL2 consente di conoscere il tempo trascorso dall'inizializzazione della libreria medesima. Nel programma Gambas si dovrà utilizzare dunque anche la funzione "SDL_Init()" per inizializzare la libreria.
E' necessario avere installata e richiamare in Gambas la libreria condivisa: "libSDL2-2.0.so.0.3000.5 ".
Mostriamo un semplice esempio pratico:
Library "libSDL2-2.0:0.3000.5" Private Const SDL_INIT_TIMER As Integer = 1 ' int SDL_Init(Uint32 flags) ' Initializes the subsystems specified by flags. Private Extern SDL_Init(flags As Integer) As Integer ' Uint32 SDL_GetTicks(void) ' To get the number of milliseconds since the SDL library initialization. Private Extern SDL_GetTicks() As Integer ' void SDL_Quit(void) ' To clean up all initialized subsystems. Private Extern SDL_Quit() Public Sub Main() Dim i As Integer SDL_Init(SDL_INIT_TIMER) Wait 0.567 i = SDL_GetTicks() Print "Trascorsi", i, "millisecondi dall'inizializzazione della libreria SDL2." SDL_Quit() End