Delphi Tips&Tricks News   Tips   .NET Software   VCL Software   Search   Contacts
Ultimate Pack - special offer!

Ultimate Pack  hot!
Image Editor  new!
Runtime Fusion
Form Designer
Object Inspector
Print Suite Pro
Commented Image
Delphi Toys
WinDowse
Delphi Bonus
TMS Scripter Studio
Form Designer VB
Form Designer .NET

...get more...
for Delphi.NET, C#, VB.NET
for Delphi VCL, BCB 3-6

WinAPI Online
Unix Manual Pages
MegaDetailed.NET
in3steps.com
cdtrrracks.com new!

Blogspot  greatis.blogspot.com

Limit the count of MDIChild form - Forms - Tips & Tricks - Greatis Delphi Pages

The count of the MDIChild forms can be looked in the MDIChildCount property. In this example you can open 10 MDIChild forms only.
Don't forget to remove line
Application.CreateForm(TForm2, Form2) from project file and line
var Form2: TForm2 from unit2.pas file.


procedure TForm1.New1Click(Sender: TObject);
var
  ChildForm: TForm2;
begin
  if MDIChildCount<10 then
  begin
    ChildForm:=TForm2.Create(Application);
    ChildForm.Caption:='Child - '+IntToStr(MDIChildCount);
  end;
end;
Related topics
Hide MDIChild form

For more
Win32 programmer's reference

Download source