Чем может быть чреват следующий код?

← →
uUnknown (2004-02-26 19:21) [0]

App := Application;
Application := TApplication(TApp.Create(nil));
App.Free;
Application.CreateForm(TForm1, Form1);
Application.Run;

← →
Юрий Зотов © (2004-02-26 19:30) [1]

Нормальный ход. Так можно активизировать свой класс - потомок Application. Можно даже и проще:

begin
Application.Free;
Application := TMyApplication.Create(nil);
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run
end.

← →
Тимохов © (2004-02-26 19:31) [2]

Что такое TApp?
И зачем вам это нужно?

← →
uUnknown (2004-02-26 19:35) [3]

Чем может быть чреват следующий код? Найти похожие ветки