OB Instance of
OB Instance of ( object ; class ) -> 戻り値
引数 | 型 | 説明 | |
---|---|---|---|
object | Object | → | クラスをテストするオブジェクト |
class | Object | → | 属しているかをテストするクラス |
戻り値 | Boolean | ← | オブジェクトが指定されたクラスまたはその子クラスに属する場合にはTrue、それ以外の場合にはfalse |
説明
OB Instance of コマンドはobject 引数のオブジェクトがclass 引数で指定されたクラスまたはその子クラスに属していればtrue を、それ以外の場合にはfalse を返します。
class 引数のクラスが有効なクラスオブジェクトでない場合、エラー-10745 が返されます。
例題
Polygon というクラスを作成した場合を考えます:
//Class: Polygon
Class constructor
var $1;$2 : Integer
This.area:=$1*$2
その後、メソッド内において、以下のように書くことができます:
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