Instanz welcher abgeleiteten Klasse?

[stoermi]

Hallo!

Angenommen, ich habe eine abstrakte Klasse Fahrzeug;
Davon leiten sich die Klassen Auto, Fahrrad und Motorrad ab.

Im Quelltext arbeite ich dann mit der Variable einFahrzeug : TFahrzeug!
Kann ich nun irgend wie testen bzw. abfragen, von welcher Sub-Klasse das Fahrzeug nun genau ist, also ob es ein Auto, Fahrrad, etc. ist?

[dizzy]

Der is-Operator dürfte dein Problem lösen ;).

Gruss,
Fabian

[nailor]

du könntest mit dem is/as operator arbeiten. aber das ist in deinem falle wohl nicht im sinne von OOP.

[stoermi]

Zitat:

Zitat von dizzy

Der is-Operator dürfte dein Problem lösen ;).

Gruss,
Fabian

Danke! Wusste doch, dass es etwas ganz simples sein muss, hab aber wohl zwecks Wortwahl nichts gefunden.

[jim_raynor]

Erstmal bekommst du über Classname den Klassennamen als Text.
2. Kannst du den Operator is verwenden (also z.B. Fahrzeug is TAuto). Wobei das auch true ergibt wenn das Objekt widerrum von TAuto abgeleitet ist
3. Über ClassInfo bekommst du die genaue Klasse. Mit einer einfachen Abfrage Fahrzeug.ClassInfo=TAuto kannst du fragen, ob das Objekt wirklich TAuto ist. Ist es abgeleitet von TAuto ergibt der vergleich false (im Gegensatz zu is).

[stoermi]

Zitat:

Zitat von nailor

du könntest mit dem is/as operator arbeiten. aber das ist in deinem falle wohl nicht im sinne von OOP.

Das heißt? Hast du einen besseren Vorschlag?

[stoermi]

Zitat:

Zitat von jim_raynor

3. Über ClassInfo bekommst du die genaue Klasse. Mit einer einfachen Abfrage Fahrzeug.ClassInfo=TAuto kannst du fragen, ob das Objekt wirklich TAuto ist. Ist es abgeleitet von TAuto ergibt der vergleich false (im Gegensatz zu is).

Also mit Fahrzeug.ClassInfo=TAuto funktioniert es nicht!
Da meckert der Compiler! Er weis da nichts mit TAuto anzufangen.
Und ClassInfo gibt mir ja nur einen Pointer...

[stoermi]

Zitat:

Zitat von stoermi

Also mit Fahrzeug.ClassInfo=TAuto funktioniert es nicht!
Da meckert der Compiler! Er weis da nichts mit TAuto anzufangen.
Und ClassInfo gibt mir ja nur einen Pointer...

Gut, mein Fehler! Hatte gerade die Unit bei uses vergessen, mit der ich getestet habe.
Der Compiler bleibt still!
Dennoch klappt der if-Vergleich nicht.

[jim_raynor]

oh sorry. Hatte was verwechselt. Statt ClassInfo nimm ClassType. :duck:

[stoermi]

Zitat:

Zitat von jim_raynor

oh sorry. Hatte was verwechselt. Statt ClassInfo nimm ClassType. :duck:

Danke! So funktionierts.