Conoscere i driver video disponibili nel sistema mediante le funzioni esterne del API di SDL2

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.3000.0 ".

Mostriamo un semplice esempio:

Library "libSDL2-2.0:0.3000.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

Riferimenti

• http://wiki.libsdl.org/FrontPage