TObjectList unterschiedliche Objekte erkennen?

[Andreas L.]

Du erstellst die Objekte falsch. Versuch es mal so:

Delphi-Quellcode:

var: AutoListe: TObjectList;
     Cabrio: TCabrio;
     Coupe: TCoupe:
     Auto: TAuto;

 AutoListe := TObjectList.Create;

 Coupe:= TCoupe.Create;
 Coupe.Hersteller := 'BMW';
 Coupe.Sitze := 4;

 AutoListe.Add(Coupe);

 Cabrio := TCabrio.Create;
 Cabrio.Hersteller := 'VW';
 Cabrio.Sitze := 2;

 AutoListe.Add(Cabrio);