Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Функция RegisterClass во внешней dll


Автор: Sansa 19.10.2006, 15:24
Preamble.
Так уж повелось, что в проектах с базами данных использую http://www.instantobjects.org/ (уровень абстракции данных) и http://sourceforge.net/projects/zeoslib (абстракция движка).
В пределах одного приложения (точнее exe файла) никаких нареканий, все работает (иначе писал бы в раздел "Базы данных"). Однако возникла необходимость время от времени расширять функциональность приложения, причем изменения в основном касаются только объектов базы данных и в основном, идет их добавление. Т.е. при каждом расширении описывается новы объект, создаются формы для редактирования и просмотра их, в главное окно добавляется пара пунктов меню. Т.е. классический вариант приложения с подключаемыми модулями (плагинами). 

Trouble.
Попробовал и я вынести часть функциональности во внешние файлы. Для начала разделил главную форму приложения (exe) и все остальное (dll). Работает. Затем стал делить dll. Попытался создать отдельный dll для движка БД и Объектов. Т.е. сам движок базы данных (ZConnection) и соединитель объектов (InstantConnector) в одной dll, а описания объектов и формы для их редактирования - в другом. Вот тут то все и началось. При создании нового Instant Object'а он регистрирует себя с помощью вызова InstantRegisterClasses(), которая в свою очередь вызывает RegisterClasses(). На этом месте вылетает Exception (чтение по адресу 0000).

Подскажите хотябы направление.

Автор: Snowy 19.10.2006, 15:36
Правильно. Классы в dll и классы в exe - это разные классы.
dll не предназначена для передачи классов.
Юзай bpl smile

Добавлено @ 15:36 
Это даже не совет - тебе однозначно bpl нужно юзать.

Автор: Sansa 19.10.2006, 16:07
Плохо. Не очень хочется таскать с собой пакет пакетов (сори за каламбур). Плюс в планах была попытка сделать проект кросплатформенным. Хотя в остальном очень неплохой вариант. Если не надо лицензионных отчислений Борланду платить smile

На данный вариант меня подвигли два уже существующих решения (http://sourceforge.net/projects/opensde и http://gsbelarus.com/gs/modules.php?name=Downloads&d_op=viewdownload&cid=10). Правда у них (обоих) абстракция данных на уровне доменов Interbase. Мой проект не настолько велик, но кто знает. Оставлю пока так как есть, и будем искать другие решения.

Спасибо.

Автор: Snowy 19.10.2006, 16:14
Цитата(Sansa @  19.10.2006,  16:07 Найти цитируемый пост)
Плохо. Не очень хочется таскать с собой пакет пакетов
Суммарно получится значительно меньший размер, чем без них.
Да и какая разница, будешь ты таскать пакет dll или пакет bpl?
Ну разве что в нагрузку ещё пару пакетов на полметра в архиве.
Зато сами bpl будут намного меньше dll.

Цитата(Sansa @  19.10.2006,  16:07 Найти цитируемый пост)
Плюс в планах была попытка сделать проект кросплатформенным.
На дельфи это труднодостижимо smile

Цитата(Sansa @  19.10.2006,  16:07 Найти цитируемый пост)
 Если не надо лицензионных отчислений Борланду платить
Нет конечно.

Автор: Sansa 20.10.2006, 09:46
Нездоровая ситуация какая-то с этой функцией. Вчера склепал по быстрому 2 проекта (exe и dll). Из exe вызывается экспортируемая функция dll MyRegisterClass вида
Код

procedure MyRegisterClass(AClass: TPersistentClass);
begin
  RegisterClass(AClass);
end;

и вызываю ее таким образом MyRegisterClass(TForm1);

Так вот, при вызове ее происходит исключение (Read From address FFFFFFDE) и что самое интересное, отладчик Delphi его не прехватывает! Попытка установить брекпоинт в теле RegisterClass тоже никчему не привела. Такое ощущение, что линкер вообще не подключает ее к dll, хотя имеется ее явный вызов. Кстати, в map файле она присутствует. Я в прострации....

Автор: Hidrag 20.10.2006, 09:57
а если написать:
Код

procedure MyRegisterClass(AClass: TForm);
begin
  RegisterClass(AClass);
end;

в дллке TPersistentClass который является родительским для форм, но это не класс формы...

Автор: Sansa 20.10.2006, 10:11
Hidrag, описание MyRegisterClass я полностью содрал с RegisterClass. В принципе, TPersistent в dll НЕ является родителем TForm в exe, так что скорее всего не в этом дело, но щась поэкспериментирую. Мне не понятно поведение отладчика с этой функцией.

Автор: Sansa 18.12.2006, 14:20
Phantome

Не оставил я эту затею... Решил попробовать способ, предложенный Snowy. Вынес главную форму в exe, указал, что надо компилировать с поддержкой bpl. А все юниты с бизнес-объектами включил в свой пакет (busmod.bpl). В каждом модуле бизнес объектов есть секция:
Код

initialization
  InstantRegisterClasses([
    TexCustomNamedObject,
    TexCustomNumberedObject,
    TexInstantObject
  ]);

, которая в свою очередь вызывает системный RegisterClasses, плюс, реализует собственную регистрацию и проверки.

Указал, что главное приложение должно использовать и мою библиотеку, был приятно удивлен размером файла в 7- кил,  (правда какая-то лажа образовалась - суммарный объем всех стандартных, сторонних, моей библиотеки и exe (2700 к) меньше, чем тот же exe (2750 к), но скомпилированный без поддержки пакетов smile И это при том, что не все компоненты пакетов я использую). Все работает до момента обращения к классам бизнес объектов. Теперь получаю ошибку "Класс не зарегистрирован". 

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)