コントロール - PopupMenuプロパティ 

右クリックで表示されるポップアップメニューへの参照

コントロール (PRIM_CTRL) のメンバ

データタイプ - PRIM_PMNU - マウスの右ボタンをクリックするとポップアップメニューを表示します。

詳細

PopupMenu プロパティは、右クリックで表示される PopupMenu を指定します。

例

この例では、ポップアップがメインページに添付されています。 

     Begin_Com Role(*EXTENDS #PRIM_FORM) Height(456) Width(864) Popupmenu(#PopupMenu) 

        Define_Com Class(#PRIM_PMNU) Name(#PopupMenu)
        Define_Com Class(#PRIM_MITM) Name(#MenuItem1) Caption('Item1') Displayposition(1) Parent(#PopupMenu)
        Define_Com Class(#PRIM_MITM) Name(#MenuItem2) Caption('Item2') Displayposition(2) Parent(#PopupMenu)
        Define_Com Class(#PRIM_MITM) Name(#MenuItem3) Caption('Item3') Displayposition(3) Parent(#PopupMenu) 

        Define_Com Class(#PRIM_LABL) Name(#Label) Displayposition(1) Ellipses(Word) Height(42) Left(6) Parent(#COM_OWNER) Tabposition(1) Tabstop(False) Top(7) Verticalalignment(Center) Width(195) Alignment(Center) Caption('Right click to see the menu') 

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

           #Label := #Sender.Caption 

        Endroutine 

     End_Com


参照

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

  • No labels