Thema: Delphi Recursives Interface

Einzelnen Beitrag anzeigen

brieker

Registriert seit: 2. Jun 2015
11 Beiträge
 
Delphi XE7 Architect
 
#5

AW: Recursives Interface

  Alt 25. Jun 2015, 10:43
Danke das mit der Vorwärtsdeklaration wars.
Ich hab es nur bisher falsch geschrieben und deshalb hab ich gedacht das es nicht geht.

So funktioniert es Danke.

Code:
IModelItem = interface;

IModelItem = interface(IInterface)
  function GetChild(aIndex: Integer): IModelItem;
  procedure SetChild(aIndex: Integer; aItem: IModelItem);
  procedure AddChild(aItem: IModelItem);
  property Child[aIndex: Integer]: IModelItem read GetChild write SetChild;
end;
  Mit Zitat antworten Zitat