Скачать: CL | DM;

Объекты типа TApplication   Найти похожие ветки 

← →
Project 1   (2003-03-04 23:38) [0]

Как мне создать свой объект типа TApplication?
Например вместо Application использовать app:TApplication

Begin
app.Initialize;
app.CreateForm(...

... и так далее?
Короче, как этот app правильно инициализировать?

---

← →
Юрий Зотов ©   (2003-03-05 00:46) [1]

unit MyApp;
...
type
TMyApplication = class(TApplication)
...
end;
...
end.

==========

program Project1;

uses
..., MyApp;

begin
Application.Free;
Application := TMyApplication.Create(...);
... // остальное как обычно
end.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.012 c