オープンパラメータを取得します。フォームのOnInitializeイベントなどで本メソッドを呼び出す事で、呼び出し元からOpenFormメソッドなどで指定されたオープンパラメータを取得することができます。
取得したオープンパラメータを利用する際は、呼び出し元からどのような値で渡されたのかに応じて適切な処理を行う必要があります。
例1)呼び出し元から文字列や配列で渡された場合は、データ型を意識して型変換を行う必要がある場合があります。
呼び出し元の記述:
::OpenForm("Form01","",c("Param1:ABC","Param2:123","Param3:T"));
呼び出し先フォームの記述:
var vParam1 = ::CStr(GetOpenParam("Param1")); //文字列
var vParam2 = ::CInt(GetOpenParam("Param2")); //数値
var vParam3 = ::CBool(GetOpenParam("Param3")); //Bool値
例2)呼び出し元からMAPルートメソッドによるマップ値で渡された場合は、データ型を意識することなく利用することができます。配列やオブジェクトをマップ値に含めて渡すこともできます。
呼び出し元の記述:
var vParam = ::MAP("Param1","ABC","Param2",123,"Param3",T,"Param4",c("AAA","BBB","CCC"));
::OpenForm("Form01","",vParam);
呼び出し先フォームの記述:
var vParam1 = GetOpenParam("Param1"); //文字列 "ABC"
var vParam2 = GetOpenParam("Param2"); //数値 123
var vParam3 = GetOpenParam("Param3"); //Bool値 T
var vParam4 = GetOpenParam("Param4"); //配列 c("AAA","BBB","CCC")
|