Главная страница
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.017 c
1-85990
roman_tutov
2002-12-16 09:54
2002.12.26
Экспорт данных в Exel


3-85790
dimonf
2002-12-05 18:23
2002.12.26
Как переопределить VertScrollBar в DBGrid?


8-86045
Дельфятник
2002-09-10 13:39
2002.12.26
Как перекрасить в картинке все точки белого цвета в заданный?


1-85942
Siduke
2002-12-17 15:08
2002.12.26
Выдвижные окна


7-86191
vidiv
2002-10-23 09:12
2002.12.26
Sound - NoSound beginer1 help me