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

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

← →
nippo   (2005-07-29 12:47) [0]

Пишу некоторый объект и interface для него.
К проекту DLL-ки цепляю модуль с декларацией интерфейсов.
Далее из этой DLL-ки будут вызываться некоторые функции, параметрами которых будут указанные выше объекты.
Подскажите пожалуйста, как правильно увязать объект с интерфейсом, потому как у меня возникает ошибка

[Error] Ask.pas(15): Declaration of "GetElement" differs from declarationin interface "IDOMNodeList"

Привожу код двух модулей

unit Ask;

interface

uses
 AskInf;

type
 TCustomElementNode = class(TInterfacedObject, ICustomElementNode)
   function IsList: Boolean;
 end;

 TDOMNodeList = class(TCustomElementNode, IDOMNodeList)
   function GetElement(Index: Integer): TCustomElementNode;
 end;

implementation

{ TCustomElementNode }

function TCustomElementNode.IsList: Boolean;
begin

end;

{ TDOMNodeList }

function TDOMNodeList.GetElement(Index: Integer): TCustomElementNode;
begin

end;

end.

unit AskInf;

interface

type
 ICustomElementNode = interface
   function IsList: Boolean;
 end;

 IDOMNodeList = interface(ICustomElementNode)
   function GetElement(Index: Integer): ICustomElementNode;
 end;

implementation

end.


← →
REA   (2005-07-29 13:14) [1]

Читай ошибку, см. описание GetElement в IDOMNodeList, делай реализацию в соответствии с описанием.


← →
han_malign ©   (2005-07-29 13:23) [2]

TDOMNodeList
function GetElement(Index: Integer): TCustomElementNode;

IDOMNodeList
function GetElement(Index: Integer): ICustomElementNode;

- ни на какие мысли не наводит?


← →
nippo   (2005-07-29 14:37) [3]


> - ни на какие мысли не наводит?


пора к окулисту



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

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



Память: 0.45 MB
Время: 0.027 c
4-1120039713
Maxk
2005-06-29 14:08
2005.08.21
как получить и название видюхи, материнки и т. д.


4-1119619778
NikNet
2005-06-24 17:29
2005.08.21
Как найти конец сектора, что бы завершить поиск в ROOTDIR?


1-1122903827
MaxNq
2005-08-01 17:43
2005.08.21
Panel


1-1122974812
kyn66
2005-08-02 13:26
2005.08.21
Listbox с разными картинками из TImageList


14-1122481763
Empleado
2005-07-27 20:29
2005.08.21
Что они знают о нас?




   Наверх