MODIFYMENUFLAGSQQ

QuickWin 関数：メニュー項目の状態を修正します。

モジュール：USE DFLIB

形式

result = MODIFYMENUFLAGSQQ (menuID, itemID, flag)

menuID
(入力) INTEGER(4)。状態を修正する項目を含むメニューのメニュー識別子。最も左のメニューが 1 です。

itemID
(入力) INTEGER(4)。状態を修正する項目のメニュー項目識別子。最上位メニュー項目が 0 です。

flags
(入力) INTEGER(4)。メニュー状態を示す定数。排他的 OR でフラグを結合することができます (結果を参照)。以下の定数が利用可能です。

• $MENUGRAYED - メニュー項目を無効にし，表示をグレーにします。

• $MENUDISABLED - メニュー項目を無効にしますが，表示をグレーにしません。

• $MENUENABLED - メニュー項目を有効にします。

• $MENUSEPARATOR - 区切りバーを描画します。

• $MENUCHECKED - メニュー項目にチェック印を置きます。

• $MENUUNCHECKED - メニュー項目のチェック印を取り除きます。

結果

結果の型は LOGICAL(4) です。成功すると .TRUE. が返され，そうでなければ .FALSE. が返されます。

flag で利用できる定数は，排他的 OR で結合することができます。たとえば，MENUCHECKED .OR. $MENUENABLED です。幾つかの組み合わせ (たとえば，$MENUENABLED と $MENUDISABLED) は意味を持ちませんし，未定義の動作を引き起こします。

互換性

QUICKWIN GRAPHICS LIB

関連情報

APPENDMENUQQ，DELETEMENUQQ，INSERTMENUQQ，MODIFYMENUROUTINEQQ，MODIFYMENUSTRINGQQ，QuickWin の使用

例

	! QuickWin アプリケーションでビルドします。
	USE DFLIB
	LOGICAL(4)    result
	CHARACTER(20) str

	! 第 1 メニュー (FILE) の最後に項目を追加します。
	str = '&Add to File Menu'C
	result = APPENDMENUQQ(1, $MENUENABLED, str, WINSTATUS)
	! 第 1 メニュー (FILE) の最初の 2 つのメニュー項目をグレーにして無効にします。
	result = MODIFYMENUFLAGSQQ (1, 1, $MENUGRAYED)
	result = MODIFYMENUFLAGSQQ (1, 2, $MENUGRAYED)
	END