소스 검색

* fix broken getmouseevent

git-svn-id: trunk@3592 -
florian 19 년 전
부모
커밋
d427da09d5
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      rtl/inc/mouse.inc

+ 2 - 1
rtl/inc/mouse.inc

@@ -148,7 +148,8 @@ begin
   else
     If Assigned(CurrentMouseDriver.GetMouseEvent) Then
       begin
-      LastMouseEvent:=MouseEvent;
+        LastMouseEvent:=MouseEvent;
+        CurrentMouseDriver.GetMouseEvent(MouseEvent);
       end
     else
       FillChar(MouseEvent,sizeof(TMouseEvent),0);