1140 function  SDL_PollEvent(event: PSDL_Event): LongInt; cdecl; external SDLLibName;

  1140 function  SDL_PollEvent(event: PSDL_Event): LongInt; cdecl; external SDLLibName;

  1141 function  SDL_WaitEvent(event: PSDL_Event): LongInt; cdecl; external SDLLibName;

  1141 function  SDL_WaitEvent(event: PSDL_Event): LongInt; cdecl; external SDLLibName;

  1142 procedure SDL_SetEventFilter(filter: TSDL_EventFilter); cdecl; external SDLLibName;

  1142 procedure SDL_SetEventFilter(filter: TSDL_EventFilter); cdecl; external SDLLibName;

  1143 

  1143 

  1144 function  SDL_ShowCursor(toggle: LongInt): LongInt; cdecl; external SDLLibName;

  1144 function  SDL_ShowCursor(toggle: LongInt): LongInt; cdecl; external SDLLibName;

  1146 

  1146 

  1147 function  SDL_GetKeyboardState(numkeys: PLongInt): PByteArray; cdecl; external SDLLibName;

  1147 function  SDL_GetKeyboardState(numkeys: PLongInt): PByteArray; cdecl; external SDLLibName;

  1148 

  1148 

  1149 procedure SDL_WM_SetIcon(icon: PSDL_Surface; mask : Byte); cdecl; external SDLLibName;

  1149 procedure SDL_WM_SetIcon(icon: PSDL_Surface; mask : Byte); cdecl; external SDLLibName;

  1150 procedure SDL_WM_SetCaption(title: PChar; icon: PChar); cdecl; external SDLLibName;

  1150 procedure SDL_WM_SetCaption(title: PChar; icon: PChar); cdecl; external SDLLibName;

  1295 

  1295 

  1296 // for sdl1.2 we directly call SDL_WarpMouse()

  1296 // for sdl1.2 we directly call SDL_WarpMouse()

  1297 // for sdl2 we provide a SDL_WarpMouse() which calls the right SDL_WarpMouseInWindow() function

  1297 // for sdl2 we provide a SDL_WarpMouse() which calls the right SDL_WarpMouseInWindow() function

  1298 // this has the advantage of reducing 'uses' and 'ifdef' statements

  1298 // this has the advantage of reducing 'uses' and 'ifdef' statements

  1299 // (SDLwindow is a private member of uStore module)

  1299 // (SDLwindow is a private member of uStore module)

  1301 begin

  1301 begin

  1302     WarpMouse(x, y);

  1302     WarpMouse(x, y);

  1303 end;

  1303 end;

  1304 

  1304 

  1305 function SDL_MustLock(Surface: PSDL_Surface): Boolean;

  1305 function SDL_MustLock(Surface: PSDL_Surface): Boolean;