is Operator akzeptiert auch Oberklassen?

[xZise]

Moin,
hmmm aber eigentlich wollte ich jetzt nicht mehrere Tausend Zeilen überprüfen und ersetzen.

Aber komisch, dass es in der Demo funktioniert. Weil ich habe folgende Klassen:

Delphi-Quellcode:

TPersonZeile = class(TZeile);
TLehrerZeile = class(TPersonZeile);
TSchuelerZeile = class(TPersonZeile);

Anfangs konnte gesagt werden: Suche nach "TSchuelerZeile" oder suche nach "TLehrerZeile". Jetzt gibt es aber auch Elemente die TPersonZeile direkt sind, aber dort findet er alles. Wenn ich jetzt da die Elemente rausnehme, dann sind auch TLehrerZeile dabei, obwohl nur TSchuelerZeile und TPersonZeile drin sein dürften.

Ich lasse das auf einen VST anzeigen. Und habe da im GetText:

Delphi-Quellcode:

if Zeile is TSchuelerZeile then
  foo
else if Zeile is TPersonZeile then
  Text := Zeile.Classname
else
  Text := 'Shit... ein Lehrer darf da gar net sein';

Und komischerweise tauchen im VST Werte wie TLehrerZeile auf.