Form Fcs_008{
/* Enterキーで移動 */
NextTabKey = $Enter;
・・・(略)・・・
OptionButton OptionButton1 {
・・・(略)・・・
OptionItem item[6] {
・・・(略)・・・
Function OnTouch( e ) {
/* 選択値を変数に格納する */
var ptn = e.From.Index;
Switch(ptn){
/* パターン1選択時 */
case 0:
//.AltKeyPriority = 0;
^.^.EditBox1.Value = ^.^.txt1;
break;
/* パターン2選択時 */
case 1:
//.AltKeyPriority = 1;
^.^.EditBox1.Value = ^.^.txt2;
break;
/* パターン3選択時 */
case 2:
//.AltKeyPriority = 2;
^.^.EditBox1.Value = ^.^.txt3;
break;
/* パターン4選択時 */
case 3:
//.AltKeyPriority = 16;
^.^.EditBox1.Value = ^.^.txt4;
break;
/* パターン5選択時 */
case 4:
//.AltKeyPriority = 17;
^.^.EditBox1.Value = ^.^.txt5;
break;
/* パターン6選択時 */
case 5:
//.AltKeyPriority = 18;
^.^.EditBox1.Value = ^.^.txt6;
break;
}
/* ラベル初期化 */
^.^.Label1.Value = "";
}
}
・・・(略)・・・
}
Button Button1 {
・・・(略)・・・
/* Touchイベントの代替キー */
AltKey = $F04;
Function OnTouch( e ) {
/* F4キー押下後、メッセージボックスを表示 */
//.MessageBox("F4キーのTouchイベントが発生しました。");
^.Label1.Value = "";
}
}
Button Button2 {
・・・(略)・・・
/* Touchイベントの代替キー */
AltKey = $Tab;
Function OnTouch( e ) {
/* Tabキー押下後、メッセージボックスを表示 */
//.MessageBox("TabキーのTouchイベントが発生しました。");
^.Label1.Value = "";
}
}
Function OnKeyDown( e ){
/* 押下したキーを判別し、ラベルに表示するメッセージを決定する */
if(e.key == "RETURN"){
this.Label1.Value = "EnterキーのKeyDownイベントが
発生しました。";
}else if(e.key == "F4"){
this.Label1.Value = "F4キーのKeyDownイベントが
発生しました。";
}else if(e.key == "TAB"){
this.Label1.Value = "TabキーのKeyDownイベントが
発生しました。";
}
}
}
|