Edit

クラス

概要

4D ランゲージでは クラス の概念がサポートされています。 プログラミング言語では、クラスを利用することによって、属性やメソッドなどを持つ特定のオブジェクト種を定義することができます。

クラスが定義されていれば、そのクラスのオブジェクトをコード内で インスタンス化 することができます。 各オブジェクトは、それ自身が属するクラスのインスタンスです。 クラスは、別のクラスを継承することで、それらの機能を受け継ぐことができます。

4D におけるクラスモデルは JavaScript のクラスに類似しており、プロトタイプチェーンに基づきます。

Class オブジェクト

クラスとは、それ自身が "Class" クラスのオブジェクトです。 Class オブジェクトは次のプロパティやメソッドを持ちます:

• name: ECMAScript に準拠している必要があります
• superclass オブジェクト (任意。無ければ null)
• new() メソッド: Class オブジェクトをインスタンス化します

さらに、Class オブジェクトは次を参照できます:

• constructor オブジェクト (任意)
• prototype オブジェクト: 名前付きのメソッドオブジェクトを格納します (任意)

Class オブジェクトは共有オブジェクトです。したがって、異なる 4D プロセスから同時にアクセスすることができます。

プロパティ検索とプロトタイプ

4D のすべてのオブジェクトは、なんらかのクラスオブジェクトに内部的にリンクしています。 オブジェクト内にあるプロパティが見つからない場合、4D はそのクラスのプロトタイプオブジェクト内を検索します。見つからない場合、4D はそのクラスのスーパークラスのプロトタイプオブジェクト内を探します。これは、スーパークラスが存在しなくなるまで続きます。

すべてのオブジェクトは、継承ツリーの頂点である "Object" クラスを継承します。

  // クラス: Polygon
Class constructor
C_LONGINT($1;$2)
This.area:=$1*$2

 //C_OBJECT($poly)
C_BOOLEAN($instance)
$poly:=cs.Polygon.new(4;3)

$instance:=OB Instance of($poly;cs.Polygon)  
 // true
$instance:=OB Instance of($poly;4D.Object)
 // true 

オブジェクトのプロパティを列挙する際には、当該クラスのプロトタイプは列挙されません。 したがって、For each ステートメントや JSON Stringify コマンドは、クラスプロトタイプオブジェクトのプロパティを返しません。 クラスのプロトタイプオブジェクトプロパティは、内部的な隠れプロパティです。

クラス定義

ユーザークラスファイルは、オブジェクトのひな形を定義します。new() クラスメンバーメソッドを呼び出すことで、このひな形に基づいたオブジェクトをインスタンス化することができます。 クラスファイル内では、専用の クラスキーワード や クラスコマンド を使用します。

たとえば:

// クラス: Person.4dm
Class constructor
  C_TEXT($1) // 名前
  C_TEXT($2) // 名字
  This.firstName:=$1
  This.lastName:=$2

メソッド内で "Person" のインスタンスを作成します:

C_OBJECT($o)
$o:=cs.Person.new("John";"Doe")  
// $o: {firstName: "John";lastName: "Doe" }

空のクラスファイルを作成し、空のオブジェクトをインスタンス化することも可能です。 たとえば、次の Empty.4dm クラスファイルを作成します:

// Empty.4dm クラスファイル
// 空です

メソッドでは次のように書けます:

$o:=cs.Empty.new()  
// $o : {}
$cName:=OB Class($o).name // "Empty"

クラスストア

利用可能なクラスは、クラスストアよりアクセスすることができます。 クラスストアには次のものが存在します:

• ビルトイン 4Dクラス専用のクラスストア: 4D コマンドによって返されます。
• 開かれている各データベースおよびコンポーネントのクラスストア: cs コマンドによって返されます。 "ユーザークラス" ともいいます。

たとえば、cs.myClass.new() ステートメント (cs は クラスストア (classstore) を意味します) を使って myClass のオブジェクトインスタンスを新規作成できます。

ユーザークラス

クラスファイル

4D においてユーザークラスとは、/Project/Sources/Classes/ フォルダーに保存された専用のメソッドファイル (.4dm) によって定義されます。 ファイル名がクラス名になります。

たとえば、"Polygon" という名前のクラスを定義するには、次のファイルを作成する必要があります:

• データベースフォルダー
  • Project
    • Sources
      • クラス
        • Polygon.4dm

クラス名

クラスを命名する際には、次のルールに留意してください:

• ECMAScript に準拠した名前であること
• 大文字と小文字が区別されること
• 競合防止のため、データベースのテーブルと同じ名前のクラスを作成するのは推奨されないこと

4D 開発インターフェース

ファイル メニューまたはエクスプローラーなど、4D 開発インターフェースを介してクラスを作成した場合には、クラスファイルは自動的に適切な場所に保存されます。

ファイルメニューとツールバー

4D 開発の ファイル メニューまたはツールバーより 新規 > クラス... を選択することで、開いているプロジェクトのクラスファイルを新規作成することができます。

Ctrl+Shift+Alt+k ショートカットも使用できます。

エクスプローラー

エクスプローラーの メソッド ページにおいて、クラスは クラス カテゴリに分類されています。

クラスを新規作成するには次の方法があります:

• クラス カテゴリを選択し、 ボタンをクリックします。
• エクスプローラーウィンドウの下部にあるアクションメニュー、またはクラスグループのコンテキストメニューから 新規クラス... を選択します。
• エクスプローラーのホームページのコンテキストメニューより 新規 > クラス... を選択します。

クラスコードサポート

各種 4D 開発ウィンドウ (コードエディター、コンパイラー、デバッガー、ランタイムエクスプローラー) において、クラスコードは "特殊なプロジェクトメソッド" のように扱われます:

• コードエディター:
  • クラスは実行できません
  • クラスメソッドはコードのブロックです
  • オブジェクトメンバーに対する 定義に移動 操作はクラスの Function 宣言を探します。例: "$o.f()" の場合、"Function f" を見つけます。
  • クラスのメソッド宣言に対する 参照箇所を検索 操作は、そのメソッドがオブジェクトメンバーとして使われている箇所を探します。例: "Function f" の場合 "$o.f()" を見つけます。
• ランタイムエクスプローラーおよびデバッガーにおいて、クラスメソッドは <ClassName> コンストラクターまたは <ClassName>.<FunctionName> 形式で表示されます。

クラスの削除

既存のクラスを削除するには:

• ディスク上で "Classes" フォルダーより .4dm クラスファイルを削除します。
• エクスプローラーでは、クラスを選択した状態で をクリックするか、コンテキストメニューより 移動 > ゴミ箱 を選択します。

クラスキーワード

クラス定義内では、専用の 4Dキーワードが使用できます:

• Function <Name>: オブジェクトのメンバーメソッドを定義します。
• Class constructor: オブジェクトのプロパティを定義します (プロトタイプ定義)。
• Class extends <ClassName>: 継承を定義します。

Function

シンタックス

Function <name>
// コード

クラスメソッドとは、当該クラスのプロトタイプオブジェクトのプロパティです。 また、クラスメソッドは "Function" クラスのオブジェクトでもあります。

クラス定義ファイルでは、Function キーワードとメンバーメソッド名を使用してメンバーメソッド宣言をおこないます。 このとき、メンバーメソッド名は ECMAScript に準拠している必要があります。

クラスメソッド内でオブジェクトインスタンスを参照するには This を使います。 たとえば:

Function getFullName
  C_TEXT($0)
  $0:=This.firstName+" "+Uppercase(This.lastName)

Function getAge
  C_LONGINT($0)
  $0:=(Current date-This.birthdate)/365.25

クラスメソッドの場合には、Current method name コマンドは次を返します: "<ClassName>.<FunctionName>" (例: "MyClass.myMethod")。

データベースのコード内では、クラスメソッドはオブジェクトインスタンスのメンバーメソッドとして呼び出され、引数を受け取ることができます。 次のシンタックスがサポートされています:

• () 演算子の使用 例: myObject.methodName("hello")
• "Function" クラスメンバーメソッドの使用
  • apply()
  • call()

スレッドセーフに関する警告: クラスメソッドがスレッドセーフではなく、"プリエンプティブプロセスで実行可能" なメソッドから呼び出された場合:

• 普通のメソッドの場合とは異なり、コンパイラーはエラーを生成しません。

<

p>

• ランタイムにおいてのみ、4D はエラーを生成します。

例題

// クラス: Rectangle
Class Constructor
    C_LONGINT($1;$2)
    This.name:="Rectangle"
    This.height:=$1
    This.width:=$2

// Function 定義
Function getArea
    C_LONGINT($0)
    $0:=(This.height)*(This.width)

// プロジェクトメソッド
C_OBJECT($o)  
C_REAL($area)

$o:=cs.Rectangle.new()  
$area:=$o.getArea(50;100) //5000

Class Constructor

シンタックス

// クラス: MyClass
Class Constructor
// コード

クラスコンストラクターメソッドを使って、ユーザークラスを定義することができます。このコンストラクターは引数を受け取ることができます。

クラスコンストラクターが定義されていると、new() クラスメンバーメソッドを呼び出したときに、当該コンストラクターが呼び出されます (引数を指定している場合は new() メンバーメソッドに渡します)。

クラスコンストラクターメソッドの場合には、Current method name コマンドは次を返します: "<ClassName>.constructor" (例: "MyClass.constructor")。

例題:

// クラス: MyClass
// MyClass のクラスコンストラクター
Class Constructor
C_TEXT($1)
This.name:=$1

// プロジェクトメソッド
// オブジェクトをインスタンス化します
C_OBJECT($o)
$o:=cs.MyClass.new("HelloWorld")  
// $o = {"name":"HelloWorld"}

Class extends

シンタックス

// クラス: ChildClass
Class extends <ParentClass>

クラス宣言において Class extends キーワードを使うと、別のユーザークラスの子ユーザークラスを作成することができます。 この子クラスは、親クラスのすべての機能を継承します。

クラス継承は次のルールに沿っている必要があります:

• ユーザークラスはビルトインクラスを継承できません (例外は 4D.Object で、すべてのユーザークラスにデフォルトで継承されます)
• ユーザークラスは、別のデータベースやコンポーネントのユーザークラスを継承できません。
• ユーザークラスは、自身を継承することはできません。
• 間接的にも、自身を継承することはできません (例: "a" extends "b" かつ "b" extends "a")。

コードエディターやインタープリターは、これらのルールが破られていても検知することはできません。コンパイラーおよび "シンタックスチェック" のみがエラーを生成します。

派生クラスは、Super コマンドを使って親クラスのコンストラクターを呼び出すことができます。

例題

Polygon クラスを継承した Square クラスを作成します。

  // クラス: Square
  // パス: Classes/Square.4dm 

 Class extends Polygon

 Class constructor
 C_LONGINT($1)

  // 親クラスのコンストラクターを呼び出します
  // 長方形の高さ・幅パラメーターに正方形の一辺の長さを引数として渡します
Super($1;$1)
  // 派生クラスにおいては、'This' を使用するより先に
  // Super を呼び出しておく必要があります
 This.name:="Square"

Function getArea
C_LONGINT($0)
$0:=This.height*This.width

Super

Super {( param{;...;paramN} )} {-> Object}

引数	型		説明
param	混合	->	親コンストラクターに受け渡す引数
戻り値	Object	<-	親オブジェクト

Super キーワードによってスーパークラス (親クラス) を呼び出すことができます。

Super は次の2つの目的のために使います:

• コンストラクターコード 内において、 Super はスーパークラスのコンストラクターを呼び出すコマンドです。 コンストラクター内で使用する際には、Super コマンドは単独で使用され、また This キーワードよりも先に使用される必要があります。
  • 継承ツリーにおいて、すべてのクラスコンストラクターが正しく呼び出されていない場合には、エラー -10748 が生成されます。 呼び出しが有効であることを確認するのは、開発者の役目となります。
  • スーパークラスがコンストラクトされるより先に、This コマンドを使った場合には、エラー -10743 が生成されます。
  • Super を、オブジェクトのスコープ外で呼び出した場合、または、すでにスーパークラスがコンストラクトされたオブジェクトを対象に呼び出した場合には、エラー -10746 が生成されます。

  // myClass コンストラクター
 C_TEXT($1;$2)
 Super($1) // テキスト型引数をスーパークラスコンストラクターに渡します
 This.param:=$2 // 2番目の引数を使用します

• クラスメンバーメソッド 内において、Super はスーパークラスのプロトタイプを指し、スーパークラス階層のメンバーメソッドを呼び出すために使用します。

 Super.doSomething(42) // スーパークラスにて宣言されている
    // "doSomething" メンバーメソッドを呼び出します

例題 1

クラスコンストレクター内で Super を使う例です。 Rectangle と Square の共通要素がコンストラクター内で重複しないよう、このコマンドを呼び出します。

  // クラス: Rectangle

 Class constructor
 C_LONGINT($1;$2)
 This.name:="Rectangle"
 This.height:=$1
 This.width:=$2

 Function sayName
 ALERT("Hi, I am a "+This.name+".")

 Function getArea
 C_LONGINT($0)
 $0:=This.height*This.width

  // クラス: Square

 Class extends Rectangle

 Class constructor
 C_LONGINT($1)

  // 親クラスのコンストラクターを呼び出します
  // 長方形の高さ・幅パラメーターに正方形の一辺の長さを引数として渡します
 Super($1;$1)

  // 派生クラスにおいては、'This' を使用するより先に
  // Super を呼び出しておく必要があります
 This.name:="Square"

例題 2

クラスメンバーメソッド内で Super を使う例です。 メンバーメソッドを持つ Rectangle クラスを作成します:

  // クラス: Rectangle

 Function nbSides
 C_TEXT($0)
 $0:="I have 4 sides"

Square クラスには、スーパークラスメソッドを呼び出すメンバーメソッドを定義します:

  // クラス: Square

 Class extends Rectangle

 Function description
 C_TEXT($0)
 $0:=Super.nbSides()+" which are all equal"

すると、プロジェクトメソッド内には次のように書けます:

 C_OBJECT($square)
 C_TEXT($message)
 $square:=cs.Square.new()
 $message:=$square.description() // I have 4 sides which are all equal

This

This -> Object

引数	型		説明
戻り値	Object	<-	カレントオブジェクト

This キーワードは、現在処理中のオブジェクトへの参照を返します。 This は、4Dにおいて 様々なコンテキスト で使用することができます。

This の値は、呼ばれ方によって決まります。 This の値は実行時に代入により設定することはできません。また、呼び出されるたびに違う値となりえます。

オブジェクトのメンバーメソッドとしてフォーミュラが呼び出された場合、This はメソッドの呼び出し元であるオブジェクトを指します。 たとえば:

$o:=New object("prop";42;"f";Formula(This.prop))
$val:=$o.f() //42

クラスコンストラクター メソッドが new() キーワードで使用された場合、その内部の This はインスタンス化される新規オブジェクトを指します。

  // クラス: ob

Class Constructor  
    // This のプロパティを
    // 代入によって作成します
    This.a:=42 

    // 4D メソッド
$o:=cs.ob.new()
$val:=$o.a //42

コンストラクター内で Super キーワードを使ってスーパークラスのコンストラクターを呼び出す場合、必ず This よりも先にスーパークラスのコンストラクターを呼ぶ必要があることに留意してください。順番を違えるとエラーが生成されます。 こちらの例題 を参照ください。

基本的に、This はメソッドの呼び出し元のオブジェクトを指します。

  // クラス: ob

 Function f
    $0:=This.a+This.b

この場合、プロジェクトメソッドには次のように書けます:

$o:=cs.ob.new()
$o.a:=5
$o.b:=3
$val:=$o.f() //8

この例では、変数 $o に代入されたオブジェクトは f プロパティを持たないため、これをクラスより継承します。 f は $o のメソッドとして呼び出されるため、メソッド内の This は $o を指します。

クラスコマンド

4D ランゲージには、クラス機能を扱う複数のコマンドがあります。

OB Class

OB Class ( object ) -> Object | Null

OB Class は引数として渡したオブジェクトのクラスを返します。

OB Instance of

OB Instance of ( object ; class ) -> Boolean

object が class、またはその子クラスに属していれば、OB Instance of は true を返します。それ以外の場合は false を返します。