DELETEMENUQQ

QuickWin 関数：QuickWin メニューからメニュー項目を削除します。

モジュール：USE DFLIB

形式

result = DELETEMENUQQ (menuID, itemID)

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

itemID
(入力) INTEGER(4)。削除するメニュー項目識別子。最上位メニュー項目が 0 です。

結果

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

互換性

QUICKWIN GRAPHICS LIB

関連情報

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

例

	! QuickWin アプリケーションでビルドします。
	USE DFLIB
	LOGICAL(4) result
	CHARACTER(25) str
	str = 'Add to EDIT Menu'C	! 第 2 メニューを追加
	result = APPENDMENUQQ(2, $MENUENABLED, str, WINSTATUS)
	! メニュー 1 (FILE) から第 3 項目(EXIT) を削除します。
	result = DELETEMENUQQ(1, 3)
	! 第 5 メニュー (WINDOW) 全部を削除します。
	result = DELETEMENUQQ(5,0)
	END