浏览代码

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;