paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 18:09:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* update to sdl1.2

Browse Source 
git-svn-id: trunk@6878 -
This commit is contained in:
Almindor 2007-03-16 12:28:12 +00:00
parent 7ac254d069
commit 4a2e84a5ee
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
packages/extra/sdl/sdl.pas
View File

@ -1924,6 +1924,8 @@ type
UnusedBits3: UInt8; // Unused at this point
video_mem: UInt32; // The total amount of video memory (in K)
vfmt: PSDL_PixelFormat; // Value: The format of the video surface
current_w: Integer; // Value: The current video mode width
current_h: Integer; // Value: The current video mode height
end;
// The YUV hardware video overlay
@ -1956,7 +1958,9 @@ type
SDL_GL_ACCUM_ALPHA_SIZE,
SDL_GL_STEREO,
SDL_GL_MULTISAMPLEBUFFERS,
SDL_GL_MULTISAMPLESAMPLES);
SDL_GL_MULTISAMPLESAMPLES,
SDL_GL_ACCELERATED_VISUAL,
SDL_GL_SWAP_CONTROL);
@ -3534,6 +3538,11 @@ function SDL_EnableKeyRepeat(delay: Integer; interval: Integer): Integer;
cdecl; external {$IFDEF __GPC__}name 'SDL_EnableKeyRepeat'{$ELSE} SDLLibName{$ENDIF __GPC__};
{$EXTERNALSYM SDL_EnableKeyRepeat}
procedure SDL_GetKeyRepeat(delay: Integer; interval: Integer);
cdecl; external {$IFDEF __GPC__}name 'SDL_GetKeyRepeat'{$ELSE} SDLLibName{$ENDIF __GPC__};
{$EXTERNALSYM SDL_GetKeyRepeat}
{ Get a snapshot of the current state of the keyboard.
Returns an array of keystates, indexed by the SDLK_* syms.
Used: