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

gtk2: add notes for future investigation regarding mouse events

Browse Source 
git-svn-id: trunk@53866 -
This commit is contained in:
blikblum 2017-01-03 14:09:07 +00:00
parent b6cd220e6d
commit c4b93b0b50
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/gtk2/gtk2callback.inc
View File

@ -2183,6 +2183,7 @@ end;
-------------------------------------------------------------------------------} -------------------------------------------------------------------------------}
function ControlGetsMouseUpBefore({%H-}AControl: TControl): boolean; function ControlGetsMouseUpBefore({%H-}AControl: TControl): boolean;
begin begin
{$NOTE ControlGetsMouseUpBefore always return true. See if still necessary}
Result:=true; Result:=true;
end; end;
@ -2378,6 +2379,7 @@ begin
{$ENDIF} {$ENDIF}
// stop the signal, so that it is not sent to the parent widgets // stop the signal, so that it is not sent to the parent widgets
{$NOTE See if is necessary to stop emission. Return true is enough to avoid propagation}
g_signal_stop_emission_by_name(PGTKObject(Widget),'button-release-event'); g_signal_stop_emission_by_name(PGTKObject(Widget),'button-release-event');
ResetDefaultIMContext; ResetDefaultIMContext;