Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.26;
Скачать: CL | DM;

Вниз

Интерфейс   Найти похожие ветки 

 
Paha_   (2002-12-15 15:12) [0]

Возможно ли имея указатель на интерфейс, получить указатель на класс, который реализует это интерфейс?


 
VaS ©   (2002-12-15 15:51) [1]

TYourClass(InterfaceRef).


 
Юрий Федоров ©   (2002-12-15 16:22) [2]

А мне кажется что теоретически нельзя.
Он же может быть реализован на любом языке программирования


 
Dimka Maslov ©   (2002-12-15 16:57) [3]

Если класс, реализующий интерфейс написан в Delphi и интерфейс - единственный - то можно.

function GetSoleInterfaceObject(I: IUnknown): TObject;
var
P: Integer;
begin
P := Integer(I);
Inc(P, $fffffd2c); // проверено в D5
Result := TObject(P)
end;


Таким образом может быть получен указатель на объект, в котором реализован единственный интерфейс. Дальше из него можно вытаскивать что угодно.

Если класс унаследован от нескольких интерфейсов, то определить указатель на объект не представляется возможным.






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

Текущий архив: 2002.12.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-86024
svs-123456789
2002-12-16 14:39
2002.12.26
компоненты


3-85785
XM-AD
2002-12-05 15:57
2002.12.26
И снова Firebird, dialect 3 - не хочет создавать функцию


1-85934
Viginal
2002-12-17 15:17
2002.12.26
Помогите!!!


7-86197
Eduard_
2002-10-22 10:16
2002.12.26
Active Directory Services


1-85958
Paha_
2002-12-15 15:12
2002.12.26
Интерфейс