|目次前ページ次ページ|
───────────────────────────────────
◆ メニュー作成シーケンス    
 <esc> % [1]control ;  
         [2]command  
         [3]cid ;  
         [4]edit ;  
         [5]rect ;  
         [6]action ;  
         [7]parent ;  
         [8]group;  
         [9]form ;  
         [10]opt ;  
         [11]pm1;[12]pm2;[13];pm3;[14]pm4;  sp M 
───────────────────────────────────
◆ メニュー作成シーケンス(TMainMenu/TPopupMenu/TMenuItem) 
 ※発生イベント(Click) 
※※※作成の為のオプション情報    
 [1]command -> 1:メインメニュー作成 
                2:ポップアップメニュー作成 
                3:メニュー項目作成 
                4:メニュー/メニュー項目削除[04-jul-2000(一部修正)] 
                5:選択可能/不可能(edit=0:不可能,=1:可能) 
                6:チェックマーク(edit=0:無し,=1:有り) 
                9:表示(edit=0:非表示,=1:表示) 
              101:メニュー項目をメニューに追加 
              102:ポップアップニュー起動 
                 -->  parent=0ならVcom主窓 
                 -->  parent>0ならVCMフォーム 
                 -->  メニューを表示するテキスト位置(x=rect,y=action) 
                ※メニューをウィンドウ内相対位置に表示する修正[08-apr-2003] 
              103:メインニューをウィンドウに接続する(起動) 
                 -->  parent=0ならVcom主窓 
                 -->  parent>0ならVCMフォーム 
                ※メニューをVCMフォームに作成可能にする修正[07-apr-2003] 
              105:メニュー項目名称変更 
              106:メニュー項目をメニューから全て除去 
              107:メニュー項目をメニューから除去(editで指定した番号) 
              108:メニュー項目をメニューに挿入(editで指定した番号,0:先頭) 
              109:vcomウィンドウからメインメニューを除去する[04-jul-2000] 
                 -->  parent=0ならVcom主窓 
                 -->  parent>0ならVCMフォーム 
              110:vcomウィンドウのメインメニューを再表示する[04-jul-2000] 
                 -->  parent=0ならVcom主窓 
                 -->  parent>0ならVCMフォーム 
 [2]id       ->menu管理番号(1->511)[2007-10-16] 
 [3]edit     -> メニュー項目の文字列 $ checked $ [2008-4-4]修正
               又は index番号 又は on/off 
               -->  メニュー項目の文字列に&を指定するとアクセラレータキーとなる 
    [編集領域番号の内容]-> 
 $ [2]x $ [3]y $ [4]w $ [5]h $ [6](length) $ [7]color  
 $ [8]font $ [9](selno) $ [10]focus $ [11] 
 [6]action -> 動作が及ぶ範囲を指定(グループ/フォーム) 
     メニューを選択した時に メニューに対してVCM が行う動作を指定 
 0: 動作無し(※リスポンスは応答する※) 
     ※ V2モードではイベントマスクのみに依存します(リスポンス) 
       (以下はリスポンスを返す) 
 1: 指定コントロール番号のみ操作不能(Disable/hide/削除)にする 
 2: 同一のグループ番号のコントロールを全て操作不能(Disable/hide/削除) 
 3: 同一のフォーム番号のコントロールを全て操作不能(Disable/hide/削除) 
 4: フォーム番号=0(vcom画面)のコントロールを全て操作不能(Disable/hide/削除)
 5: 全コントロールを操作不能(Disable/hide/削除)にする 
 15: (リスポンスを返すが動作無し) 
※ メニューでは何度でもリスポンスを返します 
※(Disable/hide)にされたコントロールはid毎/同一フォーム/同一グループで 
 メニューに対して表示/操作可能に変更できます。 
───────────────────────────────────
新イベントコード[Revent2]= (1)クリック 
メニュー識別番号[Rcid] = メニュー識別番号(1->511)  
選択番号[Rselno] = チェック状態(0:無し 1:チェック状態)[2008-4-4] 
主結果文字列[Rmain] = メニュー項目の文字列 
───────────────────────────────────
◆ メインメニュー作成(TMainMenu) 
 <esc>%1000;1;[3]mid;;;;;[8]group;[9]form;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [8]group <-- 動作が及ぶ範囲を指定 
※ [9]form <-- 動作が及ぶ範囲を指定 
───────────────────────────────────
◆ ポップアップメニュー作成(TPopupMenu) 
 <esc>%1000;2;[3]mid;;;;;[8]group;[9]form;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [8]group <-- 動作が及ぶ範囲を指定 
※ [9]form <-- 動作が及ぶ範囲を指定 
───────────────────────────────────
◆ メニュー項目作成(TMenuItem) 
 <esc>%1000;3;[3]mid;[4]edit;;[6]action;[7]parent;[8]group;[9]form;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [4]edit <--  メニューに表示する文字列とチェック状態(string$check) 
      チェック状態は、0:無し 1:チェック状態 
※ [7]parent <-- 親のメインメニュー/ポップアップメニュー/メニュー項目のmid 
※ [8]group <-- 動作が及ぶ範囲を指定 
※ [9]form <-- 動作が及ぶ範囲を指定 
───────────────────────────────────
◆ メインメニュー/ポップアップメニュー/メニュー項目の削除(Delete()) 
 <esc>%1000;4;[3]mid;;;;;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
───────────────────────────────────
◆ メニュー項目の操作無効/有効を設定(Enabled) 
 <esc>%1000;5;[3]mid;[4]sw;;;;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [4]sw  <-- 0:操作無効 1:有効 
───────────────────────────────────
◆ メニュー項目のチェック状態を設定(Checked)) 
 <esc>%1000;6;[3]mid;[4]sw;;;;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [4]sw  <-- 0:チェック無 1:チェック有 
───────────────────────────────────
◆ メニュー項目の表示/非表示を設定(Visible) 
 <esc>%1000;9;[3]mid;[4]sw;;;;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [4]sw  <-- 0:非表示 1:表示 
───────────────────────────────────
◆ メニュー項目を追加する(Add()/Items->Add()) 
 <esc>%1000;101;[3]mid;;;;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [7]parent <-- 追加する親のメインメニュー/ポップアップメニュー/メニュー項目のmid 
───────────────────────────────────
◆ ポップアップメニューを起動する(Popup()) 
 <esc>%1000;102;[3]mid;;[5]x;[6]y;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [5]x <-- メニューを表示する桁位置 
※ [6]y <-- メニューを表示する行位置 
※ [7]parent <-- 起動するメニュー親となるのフォームのcid 
───────────────────────────────────
◆ メインメニューをウィンドウに接続する(SetMenu()) 
 <esc>%1000;103;[3]mid;;;;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [7]parent <-- 接続するメニュー親となるのフォームのcid 
───────────────────────────────────
◆ ユーザが右クリックした時に自動的にポップアップメニューを起動する(AutoPopup) 
 <esc>%1000;104;[3]mid;[4]sw;;;;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [4]sw <--  
              0:自動的にポップアップメニューを起動する(AutoPopup=True) 
              1:プログラムで指定する(AutoPopup=False) 
───────────────────────────────────
◆ メニュー項目の文字列を設定(Caption) 
 <esc>%1000;105;[3]mid;[4]edit;;;;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511) 
※ [4]edit <-- 文字列を転送した編集エリア番号 
───────────────────────────────────
◆ 親のメインメニュー/ポップアップメニュー/メニュー項目から指定メニュー項目を取り除く 
   メニュー項目とその項目のサブメニュー項目を削除(Remove()/Items->Remove()) 
 <esc>%1000;106;[3]mid;;;;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511)(メニュー項目のmidを指定) 
※ [7]parent <-- 親のメインメニュー/ポップアップメニュー/メニュー項目のmid 
───────────────────────────────────
◆ 親のメインメニュー/ポップアップメニュー/メニュー項目から1項目を取り除く 
  メニュー項目とその項目のサブメニュー項目を削除(Delete()/Items->Delete()) 
 <esc>%1000;107;[3]mid;[4]index;;;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511)(メニュー項目のmidを指定) 
※ [4]index <-- 取り除くメニュー項目の親における位置番号(0:先頭) 
※ [7]parent <-- 親のメインメニュー/ポップアップメニュー/メニュー項目のmid 
───────────────────────────────────
◆ 親のメインメニュー/ポップアップメニュー/メニュー項目に1項目挿入する(Insert()/Items->Insert()) 
 <esc>%1000;108;[3]mid;[4]index;;;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511)(メニュー項目のmidを指定) 
※ [4]index <-- 挿入するメニュー項目の親における位置番号(0:先頭) 
※ [7]parent <-- 親のメインメニュー/ポップアップメニュー/メニュー項目のmid 
───────────────────────────────────
◆ メインメニューをウィンドウから除去する(SetMenu()) 
 <esc>%1000;109;[3]mid;;;;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511)(メインメニュー) 
※ [7]parent <-- 除去するメニュー親のフォームのcid 
───────────────────────────────────
◆ メインメニューを再表示する(Repaint()) 
 <esc>%1000;110;[3]mid;;;;[7]parent;;;;; sp M 
※ [3]mid <-- メニュー識別番号(1->511)(メインメニュー) 
※ [7]parent <-- 接続するメニュー親となるのフォームのcid(0:Vcom窓) 
───────────────────────────────────
               30-1 
     |目次前ページ次ページ