Vla-get-submenu

AutoLISP Home - AutoLISP 目次 - DCL - AutoLisp関数互換表 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター

構文: (vla-get-submenu vla-object )

機能: サブメニューに関連付けられたポップアップメニューを取得する。

引数

vla-object … PopupMenuItem のVLAオブジェクト

戻り値: サブメニューに関連付けられているポップアップメニュー

MEMO：ポップアップメニュー項目がサブメニューではない場合、このプロパティはエラーを返す。

サンプル

(vl-load-com)
(defun c:Example_SubMenu()
    ;; "Additional Resources" がサブ メニューかどうかを返す
    (setq acadObj (vlax-get-acad-object))
    (setq acadMenuGroup (vla-Item (vla-get-MenuGroups acadObj) "ACAD"))    
    (setq helpMenu (vla-Item (vla-get-Menus acadMenuGroup) "&Help"))
    (setq menuItem (vla-Item helpMenu 4))
    (setq subMenu (vla-get-SubMenu menuItem))
    (alert (strcat "サブメニューの名前は " (vla-get-TagString subMenu)))
)