Programmiersprache Pascal

Operatoren zur Typprüfung

Delphi

  objekt IS klasse

objekt ist eine Variable mit Objekttyp, klasse ist der Bezeichner eines Objekttyps.
Es kann ermittelt werden, ob objekt den Typ klasse besitzt bzw. einen Typ, der Subtyp von klasse ist.

Beispiel (Delphi):

  PROGRAM class_info(OUTPUT);

  TYPE obj = CLASS
               x, y : INTEGER;
             END;

  VAR o : obj;

  BEGIN
    o := obj.create;

    IF o IS obj THEN
      Writeln('okay');
                         { Informationen über den Typ von o einholen }
    Writeln(o.ClassName);                 { liefert "obj" }
    Writeln(o.ClassType.ClassName);       { liefert "obj" }
    Writeln(o.ClassParent.ClassName);     { liefert "TObject" }
  END.

P. Böhme, 27.09.1996