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

参照

OB Class