「Vla-remove」の版間の差分
細編集の要約なし |
細編集の要約なし |
||
21行目: | 21行目: | ||
(defun DeleteLayerStates () | (defun DeleteLayerStates () | ||
; 画層状態を削除してみたり | ; 画層状態を削除してみたり | ||
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object))) | |||
(vl-Catch-All-Apply | (vl-Catch-All-Apply | ||
'(lambda () | '(lambda () | ||
(vla-Remove (vla-GetExtensionDictionary | (vla-Remove (vla-GetExtensionDictionary (vla-Get-Layers *ActDoc*)) | ||
"ACAD_LAYERSTATES"))) | "ACAD_LAYERSTATES"))) | ||
(princ) | (princ) |
2014年4月13日 (日) 09:36時点における最新版
- 構文
- (vla-remove vla-object name)
- 機能
- 名前の付いたオブジェクトをディクショナリから除去する。
- 引数
- vla-object … VLAオブジェクト
- name … オブジェクトの名前
- 戻り値
- nil
- サンプル
(defun DeleteLayerStates () ; 画層状態を削除してみたり (setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object))) (vl-Catch-All-Apply '(lambda () (vla-Remove (vla-GetExtensionDictionary (vla-Get-Layers *ActDoc*)) "ACAD_LAYERSTATES"))) (princ) )
関連事項