paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-07 20:56:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

MG: fixed eventmask for realized windows

Browse Source 
git-svn-id: trunk@802 -
This commit is contained in:
lazarus 2002-02-09 01:46:44 +00:00
parent 7b68ee0230
commit c719a442ff
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/gtk/gtkproc.inc
View File

@ -854,7 +854,7 @@ begin
CurMouseCaptureHandle:=gtk_grab_get_current;
if OldMouseCaptureHandle<>CurMouseCaptureHandle then begin
// mouse capture widget has changed
MCaptureHandle:=longint(CurMouseCaptureHandle); // ToDo: 64bit faulty
MCaptureHandle:=integer(CurMouseCaptureHandle); // ToDo: 64bit faulty
NotifyCurCaptureControl;
end;
end;
@ -1637,6 +1637,9 @@ end;
{ =============================================================================
$Log$
Revision 1.53 2002/07/20 13:47:04 lazarus
MG: fixed eventmask for realized windows
Revision 1.52 2002/07/09 17:18:23 lazarus
MG: fixed parser for external vars