Vla-reload

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(vla-reload vla-object)


機能
外部参照を再ロードする。


引数
  • vla-object … VLAオブジェクト


戻り値
nil


サンプル
(defun c:rax (/ blks)
  (vl-load-com)
  (setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))

  (setq blks (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object))))
  (vlax-for blk blks
    (if (equal (vla-get-isxref blk) :vlax-true)
      (progn (vla-reload blk)
             (princ (strcat "\nReloading " (vla-get-name blk) "..."))
      )))
  (princ)
)


関連事項