4D v15.4
Current form name
- ランゲージリファレンス
-
- フォーム
-
- Current form name
- FORM FIRST PAGE
- FORM Get current page
- FORM GET HORIZONTAL RESIZING
- FORM GET OBJECTS
- FORM GET PARAMETER
- FORM GET PROPERTIES
- FORM GET VERTICAL RESIZING
- FORM GOTO PAGE
- FORM LAST PAGE
- FORM LOAD
- FORM NEXT PAGE
- FORM PREVIOUS PAGE
- FORM SCREENSHOT
- FORM SET HORIZONTAL RESIZING
- FORM SET INPUT
- FORM SET OUTPUT
- FORM SET SIZE
- FORM SET VERTICAL RESIZING
- FORM UNLOAD
4D v15.4
Current form name
Current form name
| Current form name -> 戻り値 | ||||||||
| 引数 | 型 | 説明 | ||||||
| 戻り値 | テキスト |
|
プロセス中のカレントのプロジェクトフォーム名またはカレントのテーブルフォーム名 | |||||
Current form nameコマンドは、プロセスのために定義されたカレントのフォームの名前を返します。カレントフォームはプロジェクトフォームでもテーブルフォームでも可能です。
FORM LOADコマンドをカレントプロセス中に使用していなければ、デフォルトでのカレントフォームは表示または印刷されているフォームです。 FORM LOADコマンドをカレントプロセス中に呼び出していた場合、カレントフォームはこのコマンドによって設定されたフォームとなり、FORM UNLOAD (または CLOSE PRINTING JOB)コマンドを呼ぶまでそれが維持されます。
プロセスにおいて定義されたカレントフォームがなければ、コマンドは空の文字列を返します。
入力フォームにおいて、以下のコードをボタンに実装します。
C_TEXT($FormName)
$win:=Open form window([Members];"Input";Plain form window)
DIALOG([Members];"Input")
$FormName:=Current form name
// $FormName = "Input"
FORM LOAD([Members];"Drag")
$FormName:=Current form name
// $FormName = "Drag"
//...カレントフォームがプロジェクトフォームであればその名前を取得したいという場合を考えます。
$PointerTable:=Current form table
If(Nil($PointerTable)) // これがプロジェクトフォームであれば
$FormName:=Current form name
... // 処理
End if
参照
プロパティ
プロダクト: 4D
テーマ: フォーム
番号:
1298
履歴
初出: 4D v14
ARTICLE USAGE
ランゲージリファレンス ( 4D v15)
ランゲージリファレンス ( 4D v15.4)
ランゲージリファレンス ( 4D v15.3)
© 1985-2017 4D SAS / 4D, Inc. All rights reserved.