Spezielles Attribut aus Unterklasse durch Sammlung in Liste

[devnull]

Hiho,

ich habe noch eine Frage zu objektorientierter Programmierung
Also, wenn ich Objektreferenzen versch. Klassen, also lediglich die Zeiger, in einer Liste ablege
und später mit einer Schleife alle Einträge durchgehe, möchte ich auf spezielle Attribute einer
Unterklasse zugreifen. Also die Oberklasse fasst alle Gemeinsamkeiten zusammen, in der Unterklasse
PKW ist zum Beispiel ein Bild oder so...

Mit Aufruf von TKraftfahrzeuge ( Liste.Items[i] ).blabla kann ich Attribute der Oberklasse ansteuern.

Mit der Überprüfung der "Klassenangehörigkeit"

Delphi-Quellcode:

Obj := TKraftfahrzeuge (Liste.Items[i]);
if (Obj as TPKW) then
  TPKW(Obj).bla

kann ich auch direkt die Eigenschaften des PKW erreichen.

Ist das ein zulässiger Befehl??

mfg
devnull

[Bernhard Geyer]

Delphi-Quellcode:

Obj := Liste.Items[i] as TKraftfahrzeuge;
if (Obj is TPKW) then
  (Obj as TPKW).bla

[alcaeus]

Hallo devnull,

Zitat von devnull:

Delphi-Quellcode:

Obj := TKraftfahrzeuge (Liste.Items[i]);
if (Obj as TPKW) then
  TPKW(Obj).bla

fast richtig. Du musst den is-Operator verwenden, um eine Klasse zu pruefen:

Delphi-Quellcode:

if (Obj is TPKW) then
  TPKW(Obj).DoSomething();

In deinem Fall macht das aber wenig Sinn, da du ja auf TKraftfahrzeuge castest, und somit die Pruefung auf TPKW fehlschlaegt (IMO). Greife einfach direkt drauf zu, und es muesste funktionieren

Greetz
alcaeus

[devnull]

Oh äh ja, war ein Schreibfehler. Sollte natürlich ein "is" sein...

Danke nochmals