Browse Source

* fixed libvga_ClrViewProc (it didn't reset the coords to (0,0))
(merged)

Jonas Maebe 24 years ago
parent
commit
97114d80ee
1 changed files with 8 additions and 1 deletions
  1. 8 1
      rtl/unix/graph.pp

+ 8 - 1
rtl/unix/graph.pp

@@ -396,6 +396,9 @@ begin
   Xmax:=StartXViewPort+ViewWidth-1;
   Xmax:=StartXViewPort+ViewWidth-1;
   For i:=StartYViewPort to StartYViewPort+ViewHeight-1 do
   For i:=StartYViewPort to StartYViewPort+ViewHeight-1 do
     vga_drawline(StartXViewPort,I,Xmax,I);
     vga_drawline(StartXViewPort,I,Xmax,I);
+  { reset coordinates }
+  CurrentX := 0;
+  CurrentY := 0;
 end;
 end;
 
 
 { Bitmap utilities }
 { Bitmap utilities }
@@ -598,7 +601,11 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.5  2001-04-13 23:49:48  peter
+  Revision 1.6  2001-11-19 13:56:57  jonas
+      * fixed libvga_ClrViewProc (it didn't reset the coords to (0,0))
+        (merged)
+
+  Revision 1.5  2001/04/13 23:49:48  peter
     * fixes for the stricter compiler
     * fixes for the stricter compiler
 
 
   Revision 1.4  2001/01/21 20:21:40  marco
   Revision 1.4  2001/01/21 20:21:40  marco