Vla-remove

提供:GizmoLabs - だいたい CAD LISP なサイト
2014年4月13日 (日) 09:29時点におけるGizmon (トーク | 投稿記録)による版
構文
(vla-remove vla-object name)


機能
名前の付いたオブジェクトをディクショナリから除去する。


引数
  • vla-object … VLAオブジェクト
  • name … オブジェクトの名前


戻り値
nil


サンプル
(defun DeleteLayerStates  ()
 ; 画層状態を削除してみたり
 (vl-Catch-All-Apply
  '(lambda ()
    (vla-Remove (vla-GetExtensionDictionary
                 (vla-Get-Layers 
                  (vla-Get-ActiveDocument
                   (vlax-Get-Acad-Object))))
                "ACAD_LAYERSTATES")))
 (princ)
)

関連事項