Вниз
Скачать: CL | DM;

Контрол из DLL   Найти похожие ветки 

 
Zexx ©   (2006-07-18 21:43) [0]

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

Есть класс, объявленный в 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;


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

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

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

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

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


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


> Cannot assign a TFont to a TFont"


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


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

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


 
17   (2006-07-19 19:04) [4]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.03 c
2-1155556678
Yel
2006-08-14 15:57
2006.09.03
"Дочерние объекты"


4-1147205976
444ert666
2006-05-10 00:19
2006.09.03
TRAY-help!!!!!!!!!!!!!!!!


2-1155203741
Id
2006-08-10 13:55
2006.09.03
StringGrid


2-1155641597
Zilog
2006-08-15 15:33
2006.09.03
Как в ListBox программно поменять цвет выделенной строчки?


1-1153462892
ANB
2006-07-21 10:21
2006.09.03
Как вытащить истинный путь к файлу ?




   Наверх