Delphi.Заметки программиста
f65d50f6

к методу Initialize глобального объекта


program Project1; uses   Forms,   Unit1 in 'Unit1.pas' {Form1};   {$R *.RES}
  begin   Application.Initialize;   Application.CreateForm(TForm1, Form1);
  Application.Run; end.
Проект (программа) начинается обращением к методу Initialize глобального объекта Application и заканчивается после завершения его метода Run. Этот метод — центральный: он визуализирует главную форму приложения и осуществляет диспетчеризацию сообщений Windows. От того, какая работа выполняется строками кода, расположенными перед обращением к нему, зависят время загрузки приложения, и вид экрана до появления главного окна.
Метод Initialize предусмотрен, как говорится, на всякий случай и по умолчанию ничего не осуществляет. Чтобы заставить его работать, следует поместить указатель на соответствующую процедуру без параметров в глобальную переменную InitProc. Это можно сделать в секции инициализации любого модуля (код этих секций активизируется до начала работы основной программы) или непосредственно в теле главного проекта (листинг 2):

Содержание раздела