Динамическое создание формы, Создать форму во время выполнения проги Опции

[AlexPS]

Чуваки, а кто-нить знает, как во время выполнения проги, создать еще одну форму?
Как обратиться к этой форме, как создать элементы на этой форме???
Заранее всем пасибо!!!

[volvo]

AlexPS
А кто мешает тебе сделать что-то типа такого:
Первый Unit

Код

unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type
 TForm1 = class(TForm)
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
 public
 end;
var Form1: TForm1;
implementation
uses Unit2;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
 ShowMyForm;
end;
end.

Второй Unit

Код

unit Unit2;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;
type
 TForm2 = class(TForm)
 private
 public
 end;
var Form2: TForm2;
procedure ShowMyForm;
implementation
{$R *.dfm}
procedure ShowMyForm;
begin
 Form2:=TForm2.Create(nil);
try
 Form2.ShowModal;
finally Form2.Free; end;
end;
end.

Только не забудь выключить автоматическое создание для Form2
Для элементов формы аналогично ...