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

Зачем в классу при обявлении интерфейса нужна реализация IUnknown   Найти похожие ветки 

← →
Erik1   (2004-06-10 11:03) [0]

Вобщем хочу я к наследнику от TThread приделать интерфейс IAttribut, для использования внутри Delphi. А мне компилятор выдает ошибку Undeclared identifier: "QueryInterface" и тд. Что реализацию придется писать?


← →
Clickmaker ©   (2004-06-10 11:05) [1]

type
 IAttribut = interface(IUnknown);


← →
Digitman ©   (2004-06-10 11:13) [2]


> Вобщем хочу я к наследнику от TThread приделать интерфейс
> IAttribut


добавлю - "..и еще хочу заработать себе впоследствии геморрой с такой реализацией"

IAttribut = interface;

TMyClass = class(TInterfacedObject, IAttribut)
..
FThread: TMyThread;
..
end;


← →
Erik1   (2004-06-10 11:27) [3]

Вобщето я так описал:
 IAttribut = interface
   ["{5236A8EF-F36F-4E5B-876F-1640311F2099}"]
   function  GetID: Integer;
   function  GetDescription: String;
   function  GetGrupp: Integer;
 end;

TCustomThread = class(TThread,  IAttribut)
private
...
   function  GetID: Integer;
   function  GetDescription: String;
   function  GetGrupp: Integer;
emd;
Нехочется наследоватся от TInterfacedObject.


← →
Romkin ©   (2004-06-10 11:49) [4]

Не хочется - реализуй три метода IUnknown. Подсмотреть можно в TInterfacedObject.
Примечание: Сразу говорю: передавать интерфейсы между потоками просто так нельзя, сразу получишь катастрофическую ошибку.



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

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



Память: 0.45 MB
Время: 0.022 c
1-1086678272
Глеб
2004-06-08 11:04
2004.06.27
Image - глюк


3-1086241896
Litr
2004-06-03 09:51
2004.06.27
Поиск по дате


14-1086697773
Обучающийся
2004-06-08 16:29
2004.06.27
Утилиты для измерения температуры CPU, материнской платы и др.


1-1087138341
Agent[007]
2004-06-13 18:52
2004.06.27
EAccessVolation


14-1086623030
Sanek_metaller
2004-06-07 19:43
2004.06.27
Outpost firewall pro




   Наверх