![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблема с динамической загрузкой пакета
salexn © (2009-04-02 13:41:00)Добрый день, мастера!
Есть вопрос по динамической загрузке пакета. Есть пакет в котором одна форма. При инитиализации делаю RegisterClass(TForm2). Пакет скомпилен как Run-Time Package
В основном проекте делаю следующее:
var
PackageModule: HModule;
AClass: TPersistentClass;
begin
PackageModule := LoadPackage('Package1.bpl');
if PackageModule <> 0 then
begin
AClass := GetClass('TForm2');
if AClass <> nil then
with TComponentClass(AClass).Create(Application)
as TCustomForm do
begin
ShowModal;
Free;
end;
UnloadPackage(PackageModule);
end;
Так вот AClass всегда nil. Если проект сбилдить с runtime package, то начинает работать(т.е. находит класс). Вопрос, можно ли не билдить с runtime package и чтобы находил класс?
Спасибо
Сергей М. (2009-04-02 13:46:00) [1]Нельзя.