ソースを参照

wrong msg size created hard to track down stack problems for Win64

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7483 8c9fc860-2736-0410-a75d-ab315db34111
felixf 7 年 前
コミット
e277ac5010
1 ファイル変更4 行追加2 行削除
  1. 4 2
      source/Win32.User32.Mod

+ 4 - 2
source/Win32.User32.Mod

@@ -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
 		END;