Browse Source

* changed the parameters to SetMouseXRange and SetMouseYRange (used internally
in the msdos mouse unit) to word instead of longint

git-svn-id: trunk@37748 -

nickysn 7 năm trước cách đây
mục cha
commit
5fd1d28f62
1 tập tin đã thay đổi với 2 bổ sung2 xóa
  1. 2 2
      packages/rtl-console/src/msdos/mouse.pp

+ 2 - 2
packages/rtl-console/src/msdos/mouse.pp

@@ -460,7 +460,7 @@ asm
 @@SetMouseXYExit:
 end;
 
-Procedure SetMouseXRange (Min,Max:Longint);
+Procedure SetMouseXRange (Min,Max:word);
 begin
   If Not(MousePresent) Then Exit;
   asm
@@ -473,7 +473,7 @@ begin
   end;
 end;
 
-Procedure SetMouseYRange (min,max:Longint);
+Procedure SetMouseYRange (min,max:word);
 begin
   If Not(MousePresent) Then Exit;
   asm