ツールバー ボタン コンポーネント - MenuPosition プロパティ
表示時のメニューの位置
ツールバー ボタン コンポーネント (PRIM_SPBN) のメンバ
データ タイプ - 列挙
MenuPosition プロパティは、表示されるときにメニューが表示される場所を指定します。 十分なスペースがない場合、メニューは自動的に移動されます。
| 列挙値 | 説明 |
|---|---|
| Bottom | ボタンの下に表示 |
| Right | ボタンの右側に表示 |
この例では、同じポップアップメニューを使用するように設定された 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
2018 - V14SP1