Как создавать объект при инитиализации только в run-time

← →
aly (2006-08-02 11:29) [0]

Есть bpl, в которой при инитиализации создается объект. Нужно, чтобы этот объект создавался только в run-time.

← →
Сергей М. © (2006-08-02 11:38) [1]

Что в дан.случае подразумевается под "инициализацией" ?

← →
Reindeer Moss Eater © (2006-08-02 11:47) [2]

Создай еще один класс. в инициализации бпл создавай его экземпляр.
в конструкторе смотри стэйт. если в нем нет csDesigning, то смело создавай свой компонент.

← →
Юрий Зотов © (2006-08-02 12:14) [3]

> Reindeer Moss Eater © (02.08.06 11:47) [2]
Всегда получится run-time даже при загрузке в IDE.

> aly
Косвенный, но достаточно достоверный способ:
if Application.MainForm.ClassName <> "TAppBuilder" then это_runtime;

> aly

При инициализации bpl следует определить, в чье адресное пространство она в тек.момент загружена.
Если в АП Делфи-процесса, то это design-time, иначе - ран-тайм.

Более надежная по сравнению с [3] модификация:
if AnsiSameText(GetEnvironmentVariable("DELPHI") + "\Bin\Delphi32.exe", Application.ExeName) then ShowMessage("design-time") else ShowMessage("run-time");

Как создавать объект при инитиализации только в run-time Найти похожие ветки