浏览代码

* fixed gpmevent

peter 25 年之前
父节点
当前提交
7acc3c7c49
共有 1 个文件被更改,包括 6 次插入3 次删除
  1. 6 3
      rtl/unix/gpm.pp

+ 6 - 3
rtl/unix/gpm.pp

@@ -66,8 +66,8 @@ type
           vc : word;
           dx : word;
           dy : word;
-          x : word;
-          y : word;
+          x,y : word;
+          wdx,wdy : word;
           EventType : TGpmEType;
           clicks : longint;
           margin : TGpmMargin;
@@ -206,7 +206,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.2  2000-09-18 13:14:50  marco
+  Revision 1.3  2000-11-22 22:44:08  peter
+    * fixed gpmevent
+
+  Revision 1.2  2000/09/18 13:14:50  marco
    * Global Linux +bsd to (rtl/freebsd rtl/unix rtl/linux structure)
 
   Revision 1.2  2000/07/13 11:33:48  michael