equal
deleted
inserted
replaced
108 PSDL_Color = ^TSDL_Color; |
108 PSDL_Color = ^TSDL_Color; |
109 TSDL_Color = record |
109 TSDL_Color = record |
110 r: Byte; |
110 r: Byte; |
111 g: Byte; |
111 g: Byte; |
112 b: Byte; |
112 b: Byte; |
113 a: Byte; |
113 unused: Byte; |
114 end; |
114 end; |
115 |
115 |
116 PSDL_RWops = ^TSDL_RWops; |
116 PSDL_RWops = ^TSDL_RWops; |
117 TSeek = function( context: PSDL_RWops; offset: LongInt; whence: LongInt ): LongInt; cdecl; |
117 TSeek = function( context: PSDL_RWops; offset: LongInt; whence: LongInt ): LongInt; cdecl; |
118 TRead = function( context: PSDL_RWops; Ptr: Pointer; size: LongInt; maxnum : LongInt ): LongInt; cdecl; |
118 TRead = function( context: PSDL_RWops; Ptr: Pointer; size: LongInt; maxnum : LongInt ): LongInt; cdecl; |
172 end; |
172 end; |
173 |
173 |
174 PByteArray = ^TByteArray; |
174 PByteArray = ^TByteArray; |
175 TByteArray = array[0..32767] of Byte; |
175 TByteArray = array[0..32767] of Byte; |
176 |
176 |
177 PSDL_Thread = Pointer; |
|
178 PSDL_mutex = Pointer; |
|
179 |
|
180 function SDL_Init(flags: Longword): integer; cdecl; external SDLLibName; |
177 function SDL_Init(flags: Longword): integer; cdecl; external SDLLibName; |
181 procedure SDL_Quit; cdecl; external SDLLibName; |
178 procedure SDL_Quit; cdecl; external SDLLibName; |
182 |
179 |
183 procedure SDL_Delay(msec: Longword); cdecl; external SDLLibName; |
180 procedure SDL_Delay(msec: Longword); cdecl; external SDLLibName; |
184 function SDL_GetTicks: Longword; cdecl; external SDLLibName; |
181 function SDL_GetTicks: Longword; cdecl; external SDLLibName; |
217 function SDL_PollEvent(event: PSDL_Event): integer; cdecl; external SDLLibName; |
214 function SDL_PollEvent(event: PSDL_Event): integer; cdecl; external SDLLibName; |
218 |
215 |
219 function SDL_ShowCursor(toggle: integer): integer; cdecl; external SDLLibName; |
216 function SDL_ShowCursor(toggle: integer): integer; cdecl; external SDLLibName; |
220 |
217 |
221 procedure SDL_WM_SetCaption(title: PChar; icon: PChar); cdecl; external SDLLibName; |
218 procedure SDL_WM_SetCaption(title: PChar; icon: PChar); cdecl; external SDLLibName; |
222 |
|
223 function SDL_CreateThread(fn: pointer; data: pointer): PSDL_Thread; cdecl; external SDLLibName; |
|
224 procedure SDL_WaitThread(thread: PSDL_Thread; status: PLongInt); cdecl; external SDLLibName; |
|
225 function SDL_CreateMutex: PSDL_mutex; cdecl; external SDLLibName; |
|
226 procedure SDL_DestroyMutex(mutex: PSDL_mutex); cdecl; external SDLLibName; |
|
227 function SDL_LockMutex(mutex: PSDL_mutex): integer; cdecl; external SDLLibName name 'SDL_mutexP'; |
|
228 function SDL_UnlockMutex(mutex: PSDL_mutex): integer; cdecl; external SDLLibName name 'SDL_mutexV'; |
|
229 |
219 |
230 (* TTF *) |
220 (* TTF *) |
231 |
221 |
232 const {$IFDEF WIN32} |
222 const {$IFDEF WIN32} |
233 SDL_TTFLibName = 'SDL_ttf.dll'; |
223 SDL_TTFLibName = 'SDL_ttf.dll'; |