Source position: lcltype.pp line 2653
type tagMSG = record
hwnd: HWND;
message: LongWord;
wParam: WPARAM;
lParam: LPARAM;
time: DWORD;
pt: TPoint;
end;