Przeglądaj źródła

* Crt.CursorOff fixed after r25483; the correct value of CX is 2000h, not 200h

git-svn-id: trunk@25487 -
nickysn 12 lat temu
rodzic
commit
5c1fb7b009
3 zmienionych plików z 3 dodań i 3 usunięć
  1. 1 1
      rtl/go32v2/crt.pp
  2. 1 1
      rtl/msdos/crt.pp
  3. 1 1
      rtl/watcom/crt.pp

+ 1 - 1
rtl/go32v2/crt.pp

@@ -534,7 +534,7 @@ var
   regs : trealregs;
 begin
   regs.realeax:=$0100;
-  regs.realecx:=$0200;
+  regs.realecx:=$2000;
   realintr($10,regs);
 end;
 

+ 1 - 1
rtl/msdos/crt.pp

@@ -564,7 +564,7 @@ var
   regs : registers;
 begin
   regs.ax:=$0100;
-  regs.cx:=$0200;
+  regs.cx:=$2000;
   intr($10,regs);
 end;
 

+ 1 - 1
rtl/watcom/crt.pp

@@ -523,7 +523,7 @@ var
   regs : trealregs;
 begin
   regs.realeax:=$0100;
-  regs.realecx:=$0200;
+  regs.realecx:=$2000;
   realintr($10,regs);
 end;