Einzelnen Beitrag anzeigen

Benutzerbild von FAlter
FAlter

Registriert seit: 21. Jul 2004
Ort: Ostfildern
1.095 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#4

Re: for-in und Defaultwert bei TList-Nachfahre

  Alt 16. Jan 2009, 18:46
Hi,

danke... Dachte es hat was mit dem default zu tun, dabei wars ganz war anderes.

Einen eigenen brauch ich aber gar nicht schreiben (obwohl es sehr einfach aussieht, hab mit die verlinkte Seite mal angesehen) denn ich kann auch einfach den Enumerator für TList wrappen (schließlich hab ich auch die TList gewrappt und lediglich Typecasts hinzugefügt, sollte also nicht langsamer werden):

Delphi-Quellcode:
  TNeuronEnumerator = class(TListEnumerator)
public
  function GetCurrent: INeuron; inline;
  property Current: INeuron read GetCurrent;
end;

//in der Liste
function GetEnumerator: TNeuronEnumerator; inline;
Damit klappt jetzt auch die for-in-Schleife.

Mfg
FAlter
Felix Alter
Japanurlaub 2015
  Mit Zitat antworten Zitat