branch | hedgeroid |
changeset 6344 | cba81e10235c |
parent 6228 | 1b7d4d7d162b |
child 6580 | 6155187bf599 |
6341:ccc0a58e123d | 6344:cba81e10235c |
---|---|
22 |
22 |
23 interface |
23 interface |
24 |
24 |
25 uses sysutils, math, uConsole, uVariables, SDLh, uTypes, uFloat, uConsts, uIO, uCommands, GLUnit; |
25 uses sysutils, math, uConsole, uVariables, SDLh, uTypes, uFloat, uConsts, uIO, uCommands, GLUnit; |
26 |
26 |
27 // TODO: this type should be Int64 |
|
28 // TODO: this type should be named TSDL_FingerId |
|
29 type SDL_FingerId = LongInt; |
|
30 |
|
27 type |
31 type |
28 PTouch_Finger = ^Touch_Finger; |
32 PTouch_Finger = ^Touch_Finger; |
29 Touch_Finger = record |
33 Touch_Finger = record |
30 id : SDL_FingerId; |
34 id : SDL_FingerId; |
31 x,y : LongInt; |
35 x,y : LongInt; |