Single Post - Динамическое создание формы в DLL

Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB

Rules

Search

FAQ

Memberlist

Usergroups

Profile

Single Post

Topic: Динамическое создание формы в DLL

Author

Message

Моторокер

Posted: Wed Jun 06, 2007 09:55 Post subject: Динамическое создание формы в DLL

Подскажите, как надо правильно создавать модальную форму?
Раньше делал так:

Code:

var
fmSetup: TfmSetup;
begin
fmSetup:= TfmSetup.Create(nil);
fmSetup.ShowModal;
fmSetup.Free;

Сделал nil, т.к. на Delphi ругалась на незнание Self
Затем вычитал про необходимость использования Release вместо Free – якобы ждёт, когда все потоки отработают, вся память освободится:

Code:

var
fmSetup: TfmSetup;
begin
fmSetup:= TfmSetup.Create(nil);
fmSetup.ShowModal;
fmSetup.Release;

в Тотале всё работает, а PlugMan вылетает с ошибкой
Подключил модуль Forms, добавил Application в Create:

Code:

var
fmSetup: TfmSetup;
begin
fmSetup:= TfmSetup.Create(Application);
fmSetup.ShowModal;
fmSetup.Free;

Вроде бы работает.
Так как надо делать правильно?
_________________
плагины для Total Commander, статьи Graphics Converter; NSCopy; SEO HTML; KillOK; Плагин на Delphi
ПармаСруб - строительство домов и бань в Перми