ツールバーボタンコンポーネント - Menuプロパティ

ボタンに添付するメニューへの参照

ツールバーボタンコンポーネント (PRIM_SPBN) のメンバ
データタイプ - PRIM_PMNU - マウスの右ボタンをクリックするとポップアップメニューを表示します。

詳細

Menu プロパティは、ボタンに接続する PRIM_PMNU への参照です。
メニューが添付されると、 Click イベントはもう発生しません。
Enter キーを使用すると、 Default メニュー項目はそのクリックイベントを発生させます。
MenuPromptPosition プロパティは、メニュー矢印を配置するために使用されます。

例

この例では、同じポップアップメニューを使用するように設定された 2 つのボタンを示しています。 
MenuPosition と MenuSeparator プロパティは、第 2 ボタンを使用して、クリックや入力でメニューが表示される場所やどのようにボタンを管理するかを変更しています。 

     Function Options(*DIRECT)
     Begin_Com Role(*EXTENDS #PRIM_FORM) Clientwidth(660) Clientheight(338) Componentversion(2) Top(215) Left(237) 

        Define_Com Class(#PRIM_SPBN) Name(#Button1) Caption('Button1') Displayposition(1) Left(7) Parent(#COM_OWNER) Tabposition(1) Top(6) Menu(#PopupMenu1) Width(90)
        Define_Com Class(#PRIM_SPBN) Name(#Button2) Caption('Button2') Displayposition(2) Left(111) Parent(#COM_OWNER) Tabposition(2) Top(7) Width(138) Menu(#PopupMenu1) Menuposition(Right) Menuseparator(True)
        Define_Com Class(#PRIM_PMNU) Name(#PopupMenu1)
        Define_Com Class(#PRIM_MITM) Name(#MenuItem1) Caption('Item1') Displayposition(1) Parent(#PopupMenu1)
        Define_Com Class(#PRIM_MITM) Name(#MenuItem2) Displayposition(2) Parent(#PopupMenu1) Caption('Item2') Default(True)
        Define_Com Class(#PRIM_MITM) Name(#MenuItem3) Displayposition(3) Parent(#PopupMenu1) Caption('Item3') 

        Evtroutine Handling(#MenuItem1.Click #MenuItem2.Click #MenuItem3.Click) Com_Sender(#Sender) 

           #Com_owner.Caption := #Sender.Caption 

        Endroutine 

     End_Com

参照

すべてのコンポーネント クラス
テクニカル リファレンス

  • No labels