[サンプルコード]
Form Form1 {
X = 0;
Y = 0;
Width = 234;
Height = 278;
/* タップ&ホールド操作を有効にする */
UseTapAndHold = $TRUE;
Label Label1 {
X = 5;
Y = 10;
Width = 130;
Height = 25;
Border = $TRUE;
BorderStyle = $ETCHED;
}
Function func_menuPopup() {
var top_menu1 = new String(" 登録 ");
var top_menu2 = new String(" クリア ");
var top_menu3 = new String("-"); /* セパレータ */
var top_menu4 = new String("~ 無効表示 "); /* 先頭に ~ を付加*/
var top_menu5 = new String("* チェック表示"); /* 先頭に * を付加 */
/* カスケード表示 */
top_menu1.append( new String( "○○○○"), "SUB101" );
top_menu1.append( new String( "△△△△"), "SUB102" );
top_menu1.append( new String( "□□□□"), "SUB103" );
var obj = top_menu1.getChildObjects();
var id = popupMenu( top_menu1, top_menu2, top_menu3, top_menu4 );
if( id <= 100 ){
if( id == 2 ){
Label1.Value = "";
}
} else {
/* メニューで選択された項目の文字列をセルにセットする */
Label1.Value = obj[ "SUB" + str( id ) ];
}
}
Function OnRClicked( e ) {
func_menuPopup();
}
if ( !$DESIGNTIME ) {
/* ここに初期化処理を記述してください */
}
}
|