Source position: lmessages.pp line 383
type TLMMouse = record |
||
Msg: Cardinal; |
|
|
Keys: PtrInt; |
|
|
case Integer of |
||
0: ( |
||
XPos: SmallInt; |
|
|
YPos: SmallInt; |
|
|
); |
||
1: ( |
||
Pos: TSmallPoint; |
|
|
); |
||
2: ( |
||
Dummy: PtrInt; |
|
|
Result: PtrInt; |
|
|
); |
||
end; |