git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7483 8c9fc860-2736-0410-a75d-ab315db34111
@@ -186,9 +186,11 @@ MODULE User32; (** non-portable / source: Win32.User32.Mod *) (* ejz *)
END;
(** The MSG structure contains message information from a thread's message queue. *)
- Msg* = RECORD hwnd*: HWND;
+ Msg* = RECORD
+ hwnd*: HWND;
message*: LONGINT;
- wParam*, lParam*: LONGINT;
+ wParam*: WParam;
+ lParam*: LParam;
time*: LONGINT;
point*: Point