Typ einer Objektinstanz prüfen

[FriendOfDelphi]

Hallo Allerseits,

wie kann ich in Delphi überprüfen, ob ein Objekt / eine Objektinstanz eine Instanz einer bestimmten Klasse ist (in Java gibt es dafür wohl den Befehl "instance of")?

Vielen Dank schon mal...

[Corpsman]

geht das nicht mit

Delphi-Quellcode:

is

also

Delphi-Quellcode:

if object is Tirgendwas then ..

das Problem dabei war glaub das es die Vorfahren auch als Tirgendwas erkennt, oder so...

[s-off]

Probier es mal mit

Delphi-Quellcode:

ClassType

Zitat:

Zitat von Corpsman

das Problem dabei war glaub das es die Vorfahren auch als Tirgendwas erkennt, oder so...

Das Problem dabei ist, dass Du nicht prüfen kannst, ob eine Instanz von TLabel von TEdit abstammt.
Somit würde sich folgendes nicht linken lassen:

Delphi-Quellcode:

  [...]
  private
    oFoo : TLabel;
  [...]
  if oFoo is TEdit then
  [...]

Macht also keinen Sinn ;)

[Neutral General]

Also entweder mit "is", wobei "is" auch "true" bei der Überprüfung auf Elternklassen liefert:

Delphi-Quellcode:

if Button is TButton then // true

if Button is TWinControl then //true

if Button is TObject then // true

if Button is TListbox then // false

oder per ClassType:

Delphi-Quellcode:

if Button.ClassType = TButton then // true

if Button.ClassType = TWinControl then // false

if Button.ClassType = TObject then // false

if Button.ClassType = TListbox then // false

Oder wenns unbedingt sein muss auch über den Classname. Ist aber meiner Meinung nach die hässlichste Methode!