Thema: Delphi arbeiten mit tobjectlist

Einzelnen Beitrag anzeigen

Benutzerbild von uligerhardt
uligerhardt

Registriert seit: 19. Aug 2004
Ort: Hof/Saale
1.746 Beiträge
 
Delphi 2007 Professional
 
#9

AW: arbeiten mit tobjectlist

  Alt 2. Aug 2013, 10:23
Dann würde ich, ganz grob, so vorgehen:
Delphi-Quellcode:
if kiObjectList.Items[i] is TKIClass then
  (kiObjectList.Items[i] as TKiClass).DoSomething;
if kiObjectList.Items[i] is TPlayerClass then
  (kiObjectList.Items[i] as TPlayerClass).DoSomethingDifferent;
Wobei ich hier einfach mal den "SoftCast" as anstelle des HardCasts verwendet habe
Was aber in genau dem Konstrukt überflüssig ist: Das "is" prüft den Typ ja schon, da musst du nicht mit "as" nochmal prüfen.
Uli Gerhardt
  Mit Zitat antworten Zitat