Differenze tra le versioni di "Conoscere i driver video disponibili nel sistema mediante le funzioni esterne del API di SDL2"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
Mediante alcune funzioni esterne del API di SDL2 è possibile conoscere i nomi dei driver video disponibili nel proprio sistema. | Mediante alcune funzioni esterne del API di SDL2 è possibile conoscere i nomi dei driver video disponibili nel proprio sistema. | ||
− | E' necessario avere installata nel sistema e richiamare in Gambas la libreria condivisa: "''libSDL2-2.0.so.0.10.0''" | + | E' necessario avere installata nel sistema e richiamare in Gambas la libreria condivisa: "''libSDL2-2.0.so.0.10.0'' ". |
− | |||
Mostriamo un semplice esempio: | Mostriamo un semplice esempio: | ||
Riga 31: | Riga 30: | ||
Dim s As String | Dim s As String | ||
− | + | SDL_Init(SDL_INIT_VIDEO) | |
− | + | i = SDL_GetNumVideoDrivers() | |
− | + | For d = 0 To i - 1 | |
− | + | Print d; " "; SDL_GetVideoDriver(d) | |
− | + | Next | |
− | + | SDL_Quit() | |
'''End''' | '''End''' | ||
− | |||
Versione delle 20:03, 2 dic 2021
Mediante alcune funzioni esterne del API di SDL2 è possibile conoscere i nomi dei driver video disponibili nel proprio sistema.
E' necessario avere installata nel sistema e richiamare in Gambas la libreria condivisa: "libSDL2-2.0.so.0.10.0 ".
Mostriamo un semplice esempio:
Library "libSDL2-2.0:0.10.0" Private Const SDL_INIT_VIDEO As Integer = 32 ' int SDL_Init(Uint32 flags) ' Initializes the subsystems specified by \c flag. Private Extern SDL_Init(flags As Integer) As Integer ' int SDL_GetNumVideoDrivers(void) ' Get the number of video drivers compiled into SDL. Private Extern SDL_GetNumVideoDrivers() As Integer ' const char * SDL_GetVideoDriver(int index) ' Get the name of a built in video driver. Private Extern SDL_GetVideoDriver(index As Integer) As String ' void SDL_Quit(void) ' Cleans up all initialized subsystems. Private Extern SDL_Quit() Public Sub Main() Dim i, d As Integer Dim s As String SDL_Init(SDL_INIT_VIDEO) i = SDL_GetNumVideoDrivers() For d = 0 To i - 1 Print d; " "; SDL_GetVideoDriver(d) Next SDL_Quit() End