| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Наследование интерфейсов [D7, Win2k, WinXP]

nippo ©   (2005-07-29 12:47:00) 

Пишу некоторый объект и 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.

---

nippo   (2005-07-29 14:37:00) [1]

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


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

---

han_malign   (2005-07-29 13:23:00) [2]

TDOMNodeList
function GetElement(Index: Integer): TCustomElementNode;

IDOMNodeList
function GetElement(Index: Integer): ICustomElementNode;

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

---

REA   (2005-07-29 13:14:00) [3]

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

---

Наверх