Активация форм приложения , Как определить, когда приложение готово к работе?

[newkaz]

Ламерский вопрос: в программе у меня используются 2 формы. Перед началом работы приложения мне необходимо выполнить некую контрольную процедуру, в которой происходить обращение ко 2-й форме (не главной), причем ее нужно открыть в модальном режиме (ShowModal). Т.е. сразу после запуска ехе-шника я должен увидеть 2-ю форму, открытую в модальном режиме. ShowModal применим только к невидимой форме, т.е. процедура активации 2-й формы не выполняется при старте программы. Как мне отловить момент, когда программа загрузилась и готова к работе, и сразу запустить контрольную процедуру?

[MBo]

Обработка первого срабатывания OnIdle не поможет?

[newkaz]

Мои знания оставляют желать лучшего. Где и как мне OnIdle использовать и что потом делать?

[newkaz]

Попробовал:
В TForm1 = class(TForm) - procedure IdleWork (Sender: TObject; var Done: Boolean);
В TForm1.FormCreate(Sender: TObject) - Application.OnIdle:= IdleWork;
В procedure TForm1.IdleWork(Sender: Tobject; var Done: Boolean):
if Application.Active then Моя процедура, в которой форма должна открыться в модальном режиме.
Active = True
Результат - access violation.

[Den28]

Попробуйте сделать через отсылку своего сообщения второй форме, в файле проекта, перед Application.Run:

  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
 
  //Application.ShowMainForm := False;  //<-Если хотим совсем скрыть Form1
  PostMessage(Form2.Handle, wm_ControlFormShow, 0,0);
 
  Application.Run;

А во второй форме напишите обработчик сообщения:

procedure TForm2.wmControlFormShow(var Msg: TMessage);
begin
  ShowModal;
end;

[newkaz]

Спасибо, но ещё раньше мне подсказали решение на другом форуме .

Добавлено 11.11.17, 18:27
Тему можно закрыть.