OB Instance of
OB Instance of ( objeto ; clase ) -> Resultado
| Parámetro | Tipo | Descripción | |
|---|---|---|---|
| objeto | Object | → | Objeto cuya clase se va a probar |
| clase | Object | → | Clase para probar pertenencia |
| Resultado | Boolean | ← | True si objeto pertenece a la clase especificada o a una clase hijo, y false en caso contrario |
Descripción
El comando OB Instance of devuelve true si objeto pertenece a clase o una de sus clases hijo, y en caso contrario false.
Si clase no es un objeto Clase válido, se devuelve el error -10745.
Ejemplo
Creó la clase Polygon:
//Clase: Polygon
Class constructor
var $1;$2 : Integer
This.area:=$1*$2
Luego, en un método, puede escribir:
var $poly : Object
var $instance : Boolean
$poly:=cs.Polygon.new(4;3)
$instance:=OB Instance of($poly;cs.Polygon)
// true
$instance:=OB Instance of($poly;4D.Object)
// true
$instance:=OB Instance of($poly;cs.Circle)
// false