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

IDEIntf: do not dock designer forms for now, bug #17130

Browse Source 
git-svn-id: trunk@28041 -
This commit is contained in:
mattias 2010-11-02 15:51:49 +00:00
parent 666f44d859
commit 925ab3b6ad
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ideintf/idewindowintf.pas
View File

@ -1453,8 +1453,9 @@ begin
else
Layout.Form:=AForm;
if (IDEDockMaster<>nil) and (FindWithName(AForm.Name)<>nil) then
// show dockable if it has a creator
if (IDEDockMaster<>nil) and (not (csDesigning in AForm.ComponentState))
and (FindWithName(AForm.Name)<>nil) then
// show dockable if it has a creator and is not a designer form
IDEDockMaster.ShowForm(AForm,BringToFront)
else if Assigned(OnShowForm) then
OnShowForm(Self,AForm,BringToFront)