hedgewars/uTypes.pas
changeset 6694 48317632b3a9
parent 6693 b6a69c0bc541
child 6695 32de8965c62c
equal deleted inserted replaced
6693:b6a69c0bc541 6694:48317632b3a9
   440         vOffset, height: LongInt;       // vertical active region
   440         vOffset, height: LongInt;       // vertical active region
   441         fadeAnimStart: Longword;        //time the fade started, 0 means don't fade
   441         fadeAnimStart: Longword;        //time the fade started, 0 means don't fade
   442         moveAnim: TWidgetMovement;
   442         moveAnim: TWidgetMovement;
   443         end;
   443         end;
   444 
   444 
       
   445 {$IFDEF SDL13}
   445     PTouch_Data = ^TTouch_Data;
   446     PTouch_Data = ^TTouch_Data;
   446     TTouch_Data = record
   447     TTouch_Data = record
   447         id                       : TSDL_FingerId;
   448         id                       : TSDL_FingerId;
   448         x,y                      : LongInt;
   449         x,y                      : LongInt;
   449         dx,dy                    : LongInt;
   450         dx,dy                    : LongInt;
   450         historicalX, historicalY : LongInt;
   451         historicalX, historicalY : LongInt;
   451         timeSinceDown            : Longword;
   452         timeSinceDown            : Longword;
   452         end;
   453         end;
       
   454 {$ENDIF}
   453 
   455 
   454 implementation
   456 implementation
   455 
   457 
   456 end.
   458 end.