mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-21 11:08:19 +02:00
ideintf: fixed typo
git-svn-id: trunk@38020 -
This commit is contained in:
parent
440a16ab87
commit
1b38715458
@ -2008,7 +2008,7 @@ begin
|
|||||||
if (AForm.Name='') or (not IsValidIdent(AForm.Name)) then
|
if (AForm.Name='') or (not IsValidIdent(AForm.Name)) then
|
||||||
raise Exception.Create('TIDEWindowCreatorList.ShowForm invalid form name '+AForm.Name);
|
raise Exception.Create('TIDEWindowCreatorList.ShowForm invalid form name '+AForm.Name);
|
||||||
|
|
||||||
// auto create a layput storage for every shown form
|
// auto create a layout storage for every shown form
|
||||||
Layout:=SimpleLayoutStorage.ItemByFormID(AForm.Name);
|
Layout:=SimpleLayoutStorage.ItemByFormID(AForm.Name);
|
||||||
if Layout=nil then begin
|
if Layout=nil then begin
|
||||||
if not (csDesigning in AForm.ComponentState) then
|
if not (csDesigning in AForm.ComponentState) then
|
||||||
|
Loading…
Reference in New Issue
Block a user