Vla-get-submenu

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(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)))
)

関連事項