浏览代码

--- Merging r44210 into '.':
U rtl/go32v2/msmouse.pp
--- Recording mergeinfo for merge of r44210 into '.':
U .

# revisions: 44210

git-svn-id: branches/fixes_3_2@44211 -

marco 5 年之前
父节点
当前提交
10af070def
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      rtl/go32v2/msmouse.pp

+ 2 - 1
rtl/go32v2/msmouse.pp

@@ -150,6 +150,7 @@ begin
         pushl   %ebp
         pushl   %ebp
         int     $0x33
         int     $0x33
         popl    %ebp
         popl    %ebp
+        andl    $0xffff,%ebx
         andl    $0xffff,%ecx
         andl    $0xffff,%ecx
         andl    $0xffff,%edx
         andl    $0xffff,%edx
         movl    x,%eax
         movl    x,%eax
@@ -157,7 +158,7 @@ begin
         movl    y,%eax
         movl    y,%eax
         movl    %edx,(%eax)
         movl    %edx,(%eax)
         movl    buttons,%eax
         movl    buttons,%eax
-        movw    %bx,(%eax)
+        movl    %ebx,(%eax)
   end;
   end;
 end;
 end;