Explorar o código

+ zero out the TVESAInfoBLock structure before doing the VBE get information
call in the msdos vesamode unit

git-svn-id: trunk@37746 -

nickysn %!s(int64=7) %!d(string=hai) anos
pai
achega
9d4e9dc9c8
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      packages/rtl-console/src/msdos/vesamode.pp

+ 1 - 0
packages/rtl-console/src/msdos/vesamode.pp

@@ -67,6 +67,7 @@ var
          regs : registers;
          regs : registers;
 
 
       begin
       begin
+         FillChar(ib,SizeOf(ib),0);
          regs.ah:=$4f;
          regs.ah:=$4f;
          regs.al:=0;
          regs.al:=0;
          regs.es:=Seg(ib);
          regs.es:=Seg(ib);