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

IDE: Workaround for source-edit popup menu under QT. Issue #40161

Browse Source 
The editor-toolbar code (or related ide-intf changes) triggers an additional popup interfering with the menu.
This commit is contained in:
Martin 2023-05-06 19:49:47 +02:00
parent 02ea8eb6a1
commit 27bf5d2ba7
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/ideintf/toolbarintf.pas
View File

@ -327,6 +327,8 @@ var
ActiveEditor: TSourceEditorInterface;
ScreenXY: TPoint;
begin
if ActivePopupMenu <> nil then // work around for issue #40161
exit;
ActiveEditor := SourceEditorManagerIntf.ActiveEditor;
if ActiveEditor=nil then
Exit;