# HG changeset patch # User koda # Date 1320465502 -3600 # Node ID 6ec7bf51e04ff83acc66600ea80f6d3df0e4f89c # Parent de449b2d9607b52a2229b553393b0ccb5d25b220 oops, fix the size of a few event structs i just added diff -r de449b2d9607 -r 6ec7bf51e04f hedgewars/SDLh.pas --- a/hedgewars/SDLh.pas Sat Nov 05 03:05:37 2011 +0100 +++ b/hedgewars/SDLh.pas Sat Nov 05 04:58:22 2011 +0100 @@ -436,13 +436,6 @@ unicode: LongInt; end; - TSDL_MouseWheelEvent = record - type_: LongInt; - windowID: LongInt; - which: Byte; - x, y: LongInt; - end; - TSDL_WindowEvent = record type_: LongInt; windowID: LongInt; @@ -467,38 +460,38 @@ end; TSDL_TouchFingerEvent = record - type_: LongInt; - windowId: LongInt; - touchId: LongWord; - fingerId: LongWord; + type_: Longword; + windowId: Longword; + touchId: Int64; + fingerId: Int64; state, padding1, padding2, padding3: Byte; x,y: Word; - dx,dy: ShortInt; + dx,dy: Smallint; pressure: Word; end; TSDL_TouchButtonEvent = record - type_: LongInt; - windowId: LongInt; - touchId: LongWord; + type_: Longword; + windowId: Longword; + touchId: Int64; state, button, padding1, padding2: Byte; end; TSDL_MultiGestureEvent = record - type_: LongInt; - windowId: LongInt; - touchId: LongWord; - dTheta,dDist,x,y: float; - numFingers, padding: ShortInt; + type_: Longword; + windowId: Longword; + touchId: Int64; + dTheta,dDist,x,y: Single; + numFingers, padding: Word; end; TSDL_DollarGestureEvent = record - type_: LongInt; - windowId: LongInt; - touchId: LongWord; - gesturedId: LongWord; - numFingers: LongInt; - error: float; + type_: Longword; + windowId: Longword; + touchId: Int64; + gesturedId: Int64; + numFingers: Longword; + error: Single; end; TSDL_SysWMEvent = record @@ -569,6 +562,16 @@ {$ENDIF} end; + TSDL_MouseWheelEvent = record + type_: LongInt; +{$IFDEF SDL13} + windowID: LongInt; +{$ELSE} + which: Byte; +{$ENDIF} + x, y: LongInt; + end; + TSDL_JoyAxisEvent = record type_: {$IFDEF SDL13}LongInt{$ELSE}Byte{$ENDIF}; which: Byte;