paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-14 15:19:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

MG: fixed uncapturing of mouse

Browse Source 
git-svn-id: trunk@1183 -
This commit is contained in:
lazarus 2002-02-09 01:48:03 +00:00
parent 762a95214b
commit 8e4a23cb4b
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/gtk/gtkint.pp
View File

@ -199,8 +199,9 @@ procedure InternalInit;
var c: TClipboardType;
begin
gtk_handler_quark := g_quark_from_static_string('gtk-signal-handlers');
MouseCaptureWidget := nil;
MCaptureHandle := 0;
LastLeft:=EmptyLastMouseClick;
LastMiddle:=EmptyLastMouseClick;
LastRight:=EmptyLastMouseClick;
@ -259,6 +260,9 @@ end.
{ =============================================================================
$Log$
Revision 1.91 2002/10/17 21:00:17 lazarus
MG: fixed uncapturing of mouse
Revision 1.90 2002/10/15 22:28:05 lazarus
AJ: added forcelinebreaks