タブシート - CloseClickQuery イベント
FALSE に設定して、クリックでタブが閉じないようにします。
タブシート (PRIM_TBSH) のメンバ
| 名前 | ﾀｲﾌﾟ | ﾃﾞｰﾀ ﾀｲﾌﾟ | 記述 |
|---|---|---|---|
| Continue | *Both | ブール値 | Continue パラメータｰはフォームを閉じるかどうかを確認するためのパラメータｰです。 |
CloseClickQuery イベントは、タブ・シートの閉じるボタンをクリックすると起動されます。 Continue パラメータを False に設定すると、タブシートが閉じられなくなります。 Close ボタンは、 DockCloseButton プロパティが True の場合表示されます。
この例では、 Page2 は、閉じるチェックボックスをオンにすると閉じられます。
Begin_Com Role(*EXTENDS #PRIM_FORM) Clientheight(268) Clientwidth(592) Height(307) Left(188) Top(205) Width(608) Layoutmanager(#TableLayout1)
Define_Com Class(#PRIM_TBLO) Name(#TableLayout1)
Define_Com Class(#PRIM_TBLO.Column) Name(#Column1) Displayposition(1) Parent(#TableLayout1)
Define_Com Class(#PRIM_TBLO.Row) Name(#Row1) Displayposition(1) Parent(#TableLayout1)
Define_Com Class(#PRIM_TBLO.Item) Name(#LayoutItem1) Column(#Column1) Manage(#Tab1) Parent(#TableLayout1) Row(#Row1)
Define_Com Class(#PRIM_TAB) Name(#Tab1) Bottomlayoutpriority(4) Componentversion(2) Displayposition(1) Height(454) Left(0) Leftlayoutpriority(1) Parent(#COM_OWNER) Rightlayoutpriority(2) Tabposition(1) Top(0) Toplayoutpriority(3) Width(912) Closeposition(TabHeader)
Define_Com Class(#PRIM_TBSH) Name(#Sheet1) Caption('&Page1') Displayposition(1) Height(430) Left(0) Parent(#Tab1) Tabposition(1) Tabstop(False) Top(24) Width(912) Dockclosebutton(True)
Define_Com Class(#PRIM_TBSH) Name(#Sheet2) Caption('Pa&ge2') Displayposition(2) Height(430) Left(0) Parent(#Tab1) Tabposition(2) Tabstop(False) Top(24) Width(912) Dockclosebutton(True)
Define_Com Class(#PRIM_CKBX) Name(#Close) Displayposition(1) Left(16) Marginleft(2) Parent(#Sheet2) Tabposition(1) Top(7) Width(185) Caption('Close')
Evtroutine Handling(#Sheet2.CloseClickQuery) Continue(#Continue)
#Continue := (#Close.buttonState = checked)
Endroutine
End_Com
2018 - V14SP1