Typabfrage Interface

[scouty]

Meine Frage an das Forum ist folgende:


Ich habe ein Interface ICorrelation deklariert, welches von verschiedenen Klassen implementiert werden soll.

Innerhalb einer Klasse TCorrelation, welche das Interface implementiert, möchte ich in der Methode CheckObject eine Typabfrage machen, d.h. ich möchte herausbekommen , ob die Klasse, die das Interface ICorrelation implementierte auch vom Typ TCorrelation ist, damit ich später eine Typumwandlung vornehmen kann. Die Verwendung des Operator „is“ funktioniert leider nicht. Fehlermeldung:

Zitat:

Operator ist auf diesen Operantentyp nicht anwendbar.

Hat jemand eine Idee, wie man die Typabfrage noch gestalten könnte???

Delphi-Quellcode:

function TCorrelation.CheckObject(AObject: ICorrelation): Boolean;
begin
  if (AObject is TCorrelation) then Result := True
  else Result := False;
end;

Ich danke schon mal im Vorraus.

Grüße Scouty.