Mercurial Mercurial > sheepy-clone / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/SDLh.pas
branchhedgeroid
changeset 6341 ccc0a58e123d
parent 6338 633af6fec34f
child 6415 af2047bb4f70
equal deleted inserted replaced
6338:633af6fec34f 6341:ccc0a58e123d 
    39     {$linklib c}
 
    39     {$linklib c}
 
    40   {$ENDIF}
 
    40   {$ENDIF}
 
    41   {$IFDEF HAIKU}
 
    41   {$IFDEF HAIKU}
 
    42     {$linklib root}
 
    42     {$linklib root}
 
    43   {$ELSE}
 
    43   {$ELSE}
 
    44     {$IFNDEF ANDROID}    
    44     {$IFNDEF ANDROID}
 
    45 	{$linklib pthread}
 
    45       {$linklib pthread}
 
    46     {$ENDIF}
 
    46     {$ENDIF}
 
    47   {$ENDIF}
 
    47   {$ENDIF}
 
    48 {$ENDIF}
 
    48 {$ENDIF}
 
    49 
    49 
    50 {$IFDEF FPC}
 
    50 {$IFDEF FPC}
 
   462         type_: LongWord;
 
   462         type_: LongWord;
 
   463         windowID: LongWord;
 
   463         windowID: LongWord;
 
   464         text: array[0..31] of Byte;
 
   464         text: array[0..31] of Byte;
 
   465         end;
 
   465         end;
 
   466 
   466 
   467     SDL_TouchID = LongInt;
 
       
   468     SDL_FingerID = LongInt;
 
       
   469 
       
   470     TSDL_TouchFingerEvent = record
 
   467     TSDL_TouchFingerEvent = record
 
   471         type_: LongWord;
 
   468         type_: LongWord;
 
   472         windowId: LongWord;
 
   469         windowId: LongWord;
 
   473         touchId: Int64;
 
   470         touchId: Int64;
 
   474         fingerId: Int64;
 
   471         fingerId: Int64;
 
   612         state: Byte;
 
   609         state: Byte;
 
   613 {$IFDEF SDL13}
 
   610 {$IFDEF SDL13}
 
   614         padding1: Byte;
 
   611         padding1: Byte;
 
   615 {$ENDIF}
 
   612 {$ENDIF}
 
   616         end;
 
   613         end;
 
   617 
       
   618 //TODO: implement SDL_TouchButtonEvent, SDL_MultiGestureEvent, SDL_DollarGestureEvent
 
       
   619 
   614 
   620     TSDL_QuitEvent = record
 
   615     TSDL_QuitEvent = record
 
   621         type_: {$IFDEF SDL13}LongWord{$ELSE}Byte{$ENDIF};
 
   616         type_: {$IFDEF SDL13}LongWord{$ELSE}Byte{$ENDIF};
 
   622         end;
 
   617         end;
 
   623 
   618 
   863 procedure SDL_WarpMouseInWindow(window: PSDL_Window; x, y: LongInt); cdecl; external SDLLibName;
 
   858 procedure SDL_WarpMouseInWindow(window: PSDL_Window; x, y: LongInt); cdecl; external SDLLibName;
 
   864 function  SDL_SetHint(name, value: PChar): Boolean; cdecl; external SDLLibName;
 
   859 function  SDL_SetHint(name, value: PChar): Boolean; cdecl; external SDLLibName;
 
   865 procedure SDL_StartTextInput; cdecl; external SDLLibName;
 
   860 procedure SDL_StartTextInput; cdecl; external SDLLibName;
 
   866 
   861 
   867 function  SDL_PeepEvents(event: PSDL_Event; numevents: LongInt; action: SDL_eventaction; minType, maxType: LongWord): LongInt; cdecl; external SDLLibName;
 
   862 function  SDL_PeepEvents(event: PSDL_Event; numevents: LongInt; action: SDL_eventaction; minType, maxType: LongWord): LongInt; cdecl; external SDLLibName;
 
   868 function  SDL_CreateThread(fn: pointer; name: PChar; data: pointer): PSDL_Thread; cdecl; external SDLLibName;
 
   863 function  SDL_CreateThread(fn: Pointer; name: PChar; data: Pointer): PSDL_Thread; cdecl; external SDLLibName;
 
   869 {$ELSE}
 
   864 {$ELSE}
 
   870 function  SDL_CreateThread(fn: pointer; data: pointer): PSDL_Thread; cdecl; external SDLLibName;
 
   865 function  SDL_CreateThread(fn: Pointer; data: Pointer): PSDL_Thread; cdecl; external SDLLibName;
 
   871 function  SDL_PeepEvents(event: PSDL_Event; numevents: LongInt; action: SDL_eventaction; mask: LongWord): LongInt; cdecl; external SDLLibName;
 
   866 function  SDL_PeepEvents(event: PSDL_Event; numevents: LongInt; action: SDL_eventaction; mask: LongWord): LongInt; cdecl; external SDLLibName;
 
   872 {$ENDIF}
 
   867 {$ENDIF}
 
   873 
   868 
   874 function  SDL_GetMouseState(x, y: PLongInt): Byte; cdecl; external SDLLibName;
 
   869 function  SDL_GetMouseState(x, y: PLongInt): Byte; cdecl; external SDLLibName;
 
   875 function  SDL_GetKeyName(key: LongWord): PChar; cdecl; external SDLLibName;
 
   870 function  SDL_GetKeyName(key: LongWord): PChar; cdecl; external SDLLibName;
sheepy-clone