Interface Listen

[mjustin]

Zitat von kaju74:

Hallo.

Das schon, aber dessen Verwendung verstehe ich nicht, da ich ja irgendwelche Methoden überschreiben muss, um via "for each" darauf zugreifen zu können. Wie ich das verstehe, muss ich irgendwelche Enumerator-Ableitungen machen, die dann pro Typ das entsprechende Interface entsprechend Typecastet...hmmm...naja, ich probier's dann mal irgendwie hinzukriegen....thx.

Gruß,
Marc

Mit Generics ginge es theoretisch (Code kompiliert in Delphi 2009, aber ungetestet!):

Delphi-Quellcode:

program Project14;

{$APPTYPE CONSOLE}

uses
  Generics.Collections;

type
  MyInterface = interface
  procedure SayHello;
  end;

  InterfaceList = TList<MyInterface>;
var
  IL: InterfaceList;
  I: MyInterface;

begin
  IL := InterfaceList.Create;

  for I in IL do
  begin
    I.SayHello;
  end;

end.