Explorar el Código

* fixed gpmevent

peter hace 25 años
padre
commit
7acc3c7c49
Se han modificado 1 ficheros con 6 adiciones y 3 borrados
  1. 6 3
      rtl/unix/gpm.pp

+ 6 - 3
rtl/unix/gpm.pp

@@ -66,8 +66,8 @@ type
           vc : word;
           vc : word;
           dx : word;
           dx : word;
           dy : word;
           dy : word;
-          x : word;
-          y : word;
+          x,y : word;
+          wdx,wdy : word;
           EventType : TGpmEType;
           EventType : TGpmEType;
           clicks : longint;
           clicks : longint;
           margin : TGpmMargin;
           margin : TGpmMargin;
@@ -206,7 +206,10 @@ end;
 end.
 end.
 {
 {
   $Log$
   $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)
    * Global Linux +bsd to (rtl/freebsd rtl/unix rtl/linux structure)
 
 
   Revision 1.2  2000/07/13 11:33:48  michael
   Revision 1.2  2000/07/13 11:33:48  michael