Changeset 395 for trunk/Packages


Ignore:
Timestamp:
Jun 14, 2021, 8:47:31 PM (3 years ago)
Author:
chronos
Message:
  • Fixed: Workaround for Gtk2 windows not accepting first mouse down event.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Packages/CevoComponents/DrawDlg.pas

    r372 r395  
    77uses
    88  Classes, SysUtils, Forms, LCLIntf, LCLType, {$IFDEF LINUX}LMessages,{$ENDIF}
    9   Messages, Graphics, Controls, ButtonBase, ButtonA, ButtonB, Area, ScreenTools;
     9  Messages, Graphics, Controls, ButtonBase, ButtonA, ButtonB, Area, ScreenTools
     10  {$IFDEF LCLGTK2}, Gtk2Globals{$ENDIF};
    1011
    1112type
     
    187188begin
    188189  MoveActive := False;
     190
     191  {$IFDEF LCLGTK2}
     192  // GTK2 bug workaround https://bugs.freepascal.org/view.php?id=35720
     193  if Visible then LastMouse.WinControl := Self;
     194  {$ENDIF}
    189195end;
    190196
Note: See TracChangeset for help on using the changeset viewer.