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

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

← →
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]

> Тимохов © (26.02.04 19:31) [2]

См. пост выше.


> Юрий Зотов © (26.02.04 19:30) [1]

Да, варианты есть, спасибо.

---

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

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



Память: 0.45 MB
Время: 0.015 c