Pascal 7 & Objects


         

InitMainWindow (всегда переопределяется)


-----------------------------------------------------------------

рrocedure InitMainWindow; virtual;

По умолчанию, InitMainWindow конструирует родовой объект TWindow с именем приложения. Для построения полезного объекта ос- новного окна переопределите InitMainWindow и сохраните его в MainWindow. Обычное использование имеет вид:

рrocedure MyApplication.InitMainWindows; begin MainWindows := New(рMyWindow, Init(nil, 'Заголовок окна'); end;



Содержание  Назад  Вперед