Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Контрол из DLL [D6, D7, WinXP]


Zexx ©   (2006-07-18 21:43:00) 

Подскажите почему не работает следующий код:

Есть класс, объявленный в DLL, например:
 TEditClass = class of TEdit;
 TMyEdit = class(TEdit)
 public
 ...
 end;

и функция
 function GetEditClass : TEditClass;
 begin
   Result := TMyEdit;
 end;


В главном приложении имеется такой код:
 function GetEditClass:TEditClass; external 'edit.dll';
var
 Edit : TEdit;
begin
 Edit := GetEditClass.Create(Self); // компонент нормально создается, но только пытаемся назначить ему родителя
 Edit.Parent := Panel1;   // в рантайме вываливается исключение: "Cannot assign a TFont to a TFont".

Подскажите в чем ошибка и каким образом можно использовать подобные конструкции.
end;


17   (2006-07-19 19:04:00) [1]

>>>Или использовать интерфейсную модель вместо объектной.
Как вариант использовать сборки .Net


DimaBr   (2006-07-19 08:38:00) [2]

http://www.google.com/search?client=opera&rls=ru&q=Cannot+assign+a+TFont+to+a+TFont&sourceid=opera&ie=utf-8&oe=utf-8


Игорь Шевченко   (2006-07-18 22:41:00) [3]


> Cannot assign a TFont to a TFont"


Любителям ООП в DLL посвящается...:)


Юрий Зотов   (2006-07-18 22:07:00) [4]

> Подскажите в чем ошибка

Exe и DLL компилируются независимо, поэтому для одного и того же класса в каждом из них - своя VMT (то есть, один и тот же класс в каждом из них  - это два РАЗНЫХ класса).

> каким образом можно использовать подобные конструкции.

Компилировать Exe и DLL с общими run-time пакетами. Или вообще заменить DLL на BPL. Или использовать интерфейсную модель вместо объектной.


Наверх

Титульная страница Поиск, карта сайта Написать письмо