Создание окон

[Asgard]

Подскажите пожалуйста!
у меня есть программа с N количеством окон, как сделать что бы они не создавались все разом, а по мере необходимости? например по нажатии кнопки?

[lexaltd]

Убрать из View Source - создание вашей формы Application.CreateForm(TForm2, Form2);


Код для кнопки:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  if not Assigned(Form2) then
   Application.CreateForm(TForm2, Form2);
   Form2.ShowModal;
   FreeAndNil(Form2);//Если надо разрушить
end;