[Lazarus] I found an AnchorDockingDsgn package bug?
Michael W. Vogel
m-w-vogel at gmx.de
Sun Jun 16 23:43:43 CEST 2019
Am 14.06.2019 um 23:51 schrieb leyba bronstain via lazarus:
> After installing the AnchorDockingDsgn package for Win7 x64, I noticed
> a strange IDE behavior. If you dock any other window to the Source
> Code Editor in the manner shown in the figure, then it becomes
> impossible to close any tab of the Source Code Editor using the mouse
> (using the shortcuts, the tab is closed correctly). It's a bug?
>
> See more here:
> https://forum.lazarus.freepascal.org/index.php/topic,45728.0.html
Yes, I can confirm that problem.
The SourceEditor doesn't have a default PopupMenu, it is created on
MouseUp. So the AnchorDockingPageControl is opening its PopupMenu. I
could recreate the problem in a simple app.
Imho a simple workaround could be to create a dummy PopupMenu for
SourceEditor, something like the added patch.
Can you please open a bug report on Mantis?!
Michl
-------------- next part --------------
Index: ide/sourceeditor.pp
===================================================================
--- ide/sourceeditor.pp (revision 61401)
+++ ide/sourceeditor.pp (working copy)
@@ -657,6 +657,7 @@
private
FNotebook: TExtendedNotebook;
FBaseCaption: String;
+ FDummyPopupMenu: TPopupMenu;
FIsClosing: Boolean;
FSrcEditsSortedForFilenames: TAvlTree; // TSourceEditorInterface sorted for Filename
TabPopUpMenu, SrcPopUpMenu, DbgPopUpMenu: TPopupMenu;
@@ -6557,6 +6558,8 @@
OnTabEndDrag := @NotebookEndDrag;
ShowHint:=true;
OnShowHint:=@NotebookShowTabHint;
+ FDummyPopupMenu := TPopupMenu.Create(Self);
+ PopupMenu := FDummyPopupMenu;
{$IFDEF IDE_DEBUG}
debugln('[TSourceNotebook.CreateNotebook] D');
{$ENDIF}
More information about the lazarus
mailing list