Как пограммно выбрать главную форму?

[DimOn4Ik]

Огромное спасибо! Буду пробовать....

[DimOn4Ik]

begin
  Application.Initialize;
  login:=login.Create(Application);
  login.ShowModal;
  if login.Tag=1 then
  begin
    login.Free;
    Exit;
  end;
  login.Free;
  end
  Application.CreateForm(Tmain, main);
  Application.Run;
end.

в чём может быть ошибка?
Очень хороший способ..вот только не пойму почему не работает..вить понял только название форм на свои..

[856100]

может быть login:=Tlogin.Create(Application);

[DimOn4Ik]

да спасибо,ещё caption форм должны соответствовать названиям..

[856100]

ещё caption форм должны соответствовать названиям

необязательно