Vla-recomputetableblock

提供:GizmoLabs - だいたい CAD LISP なサイト
2015年11月3日 (火) 20:36時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-recomputetableblock ''vla-object'' ''bForceUpdate'' ) ; 機能 : 表ブロックを更新する。 ; 引数 :* vla-object … VLAオブ...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-recomputetableblock vla-object bForceUpdate )


機能
表ブロックを更新する。


引数
  • vla-object … VLAオブジェクト
  • bForceUpdate … ブール型
  • vlax-True: 表ブロックは更新される。
  • vlax-False: 表ブロックは更新されない。


戻り値
nil


  • 注意 : この関数は、表ブロック レコードが最後に更新されてから Table オブジェクトに加えられた変更に一致させるため、Table オブジェクトが参照する表ブロック レコードを更新する。


サンプル
(vl-load-com)
(defun c:Example_RegenerateTableSuppressed()
    (setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))

    (setq pt (vlax-3d-point 0 0 0))
  
    (setq MyModelSpace (vla-get-ModelSpace doc))
    (setq MyTable (vla-AddTable MyModelSpace pt 100 5 5 10))

    ;; テーブルブロックの再計算を無効化
    (vla-put-RegenerateTableSuppressed MyTable :vlax-true)

    (setq i 1
          j 0)
  
    (while (>= 99 i)
        (while (>= 4 j)
            (vla-SetText MyTable i j (strcat "my string " (itoa i) ", " (itoa j)))

            (setq j (1+ j))
        )

        (setq i (1+ i)
              j 0)
    )

    ;; テーブルブロックの再計算を有効化
    (vla-put-RegenerateTableSuppressed MyTable :vlax-false)

    ;; 変わりにこっちでもおk
    ;;(vla-RecomputeTableBlock MyTable :vlax-true)
)

関連事項