Главная страница
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.024 c
4-86228
N
2002-11-10 16:57
2002.12.26
Ошибка при удалении File Mapping


3-85866
Масяня
2002-12-07 13:18
2002.12.26
События в InterBase


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


14-86171
Феликс
2002-12-06 00:53
2002.12.26
Может найдутся добрые люди


8-86038
kuzmich
2002-09-07 16:08
2002.12.26
PixelCheck в DelphiX