Unit1 -> Unit2

[Shouldercannon]

Как сделать чтобы после открытия Unit1 сразу же открылся Unit2?

[igroman]

Другая форма чтоли?
Form2.Show; или Form2.ShowModal;

[Shouldercannon]

Я так пробовал. Говорит Access violation at adress 004C30D6 in module 'Project.exe'. Read of address 00000000. Тоесть надо чтобы Unit2 сам окрылся, а не когда его вызовет юзер.

[igroman]

Попробуйте не на событии onCreate а на onActivate. У меня заработало.

[Shouldercannon]

Спасибо действительно так работает.

[mutabor]

Попробовать то можно, вот только неплохо бы знать почему не работало )

Формы в проекте создаются по очереди, если очередность не менять, то по мере добавления к проекту Form1 > Form2 > Form3 etc.
В тот момент когда создалась форма 1 (а код у вас был как раз в обработчике ее создания), формы 2 еще не существует, как же можно ее показать? Заметьте, из обработчика создания формы 2 к форме 1 уже можно обращаться.

Теперь про OnActivate. После того как все формы создались, происходит активация главной формы проекта, из процедуры Activate уже можно обращаться к другим формам. Но есть один нюанс, событие OnActivate происходит каждый раз когда форма получает фокус. Сверните окно а затем восстановите, или кликните где нибудь на рабочем столе, на другой программе, а затем на вашем окне и произойдет событие OnActivate.

[Shouldercannon]

<Теперь про OnActivate. После того как все формы создались, происходит активация главной формы проекта, из процедуры Activate уже можно обращаться к другим формам. Но есть один нюанс, событие OnActivate происходит каждый раз когда форма получает фокус. Сверните окно а затем восстановите, или кликните где нибудь на рабочем столе, на другой программе, а затем на вашем окне и произойдет событие OnActivate.>
используя такой код
procedure TForm1.FormActivate(Sender: TObject);
begin
Form2.ShowModal;
end;

я окно сворачивал, восстанавливал, прошёлся по другим окнам и снова активировал окно своего приложения и Unit2 больше не показывался, только после запуска один раз.

[mutabor]

Прошу прощения, немного перепутал. Это касается дочерних форм.
Проверьте такой код, вызывайте только просто Form2.Show, и поменяйте фокус с одной на другую.

procedure TForm1.FormActivate(Sender: TObject);
begin
ShowMessage('Form1 Activated');
end;

procedure TForm2.FormActivate(Sender: TObject);
begin
ShowMessage('Form2 Activated');
end;