hedgewars/SDLh.pas
branchhedgeroid
changeset 5826 2a2cce052b4d
parent 5824 2e5835130d9a
child 6023 a28be05b20bc
equal deleted inserted replaced
5824:2e5835130d9a 5826:2a2cce052b4d
   570 {$IFDEF SDL13}
   570 {$IFDEF SDL13}
   571         padding1: Byte;
   571         padding1: Byte;
   572 {$ENDIF}
   572 {$ENDIF}
   573         end;
   573         end;
   574 
   574 
   575     SDL_TouchID = Int32;
   575     SDL_TouchID = LongInt;
   576     SDL_FingerID = Int32;
   576     SDL_FingerID = LongInt;
   577 
   577 
   578     TSDL_TouchFingerEvent = record
   578     TSDL_TouchFingerEvent = record
   579         type_: UInt32;
   579         type_: LongWord;
   580         windowId: UInt32;
   580         windowId: LongWord;
   581         touchId: SDL_TouchID;
   581         touchId: SDL_TouchID;
   582         fingerId: SDL_FingerID;
   582         fingerId: SDL_FingerID;
   583         state, padding1, padding2, padding3: UInt8;
   583         state, padding1, padding2, padding3: Byte;
   584         x,y: UInt16;
   584         x,y: Word;
   585         dx,dy: Int16;
   585         dx,dy: ShortInt;
   586         pressure: UInt16;
   586         pressure: Word;
   587     end;
   587     end;
   588 //TODO: implement SDL_TouchButtonEvent, SDL_MultiGestureEvent, SDL_DollarGestureEvent
   588 //TODO: implement SDL_TouchButtonEvent, SDL_MultiGestureEvent, SDL_DollarGestureEvent
   589 
   589 
   590     TSDL_QuitEvent = record
   590     TSDL_QuitEvent = record
   591         type_: {$IFDEF SDL13}LongInt{$ELSE}Byte{$ENDIF};
   591         type_: {$IFDEF SDL13}LongInt{$ELSE}Byte{$ENDIF};