Vla-put-revisionnumber

提供: GizmoLabs - だいたい CAD LISP なサイト
移動先: 案内検索
構文
(vla-put-revisionnumber vla-object name)


機能
図面の[改訂版号]プロパティを設定する。


引数
  • vla-object … SecurityParams の VLA オブジェクト
  • name … 改訂版号の文字列


戻り値
nil


サンプル
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
(setq acsum    (vla-get-summaryinfo  *ActDoc*))

(vla-get-author acsum)
(vla-put-author acsum "Me")

(vla-get-title acsum)
(vla-put-title acsum "My Title")

(vla-get-comments acsum)
(vla-put-comments acsum "My Comments")

(vla-get-subject acsum)
(vla-put-subject acsum "My Subject")

(vla-get-revisionnumber acsum)
(vla-put-revisionnumber acsum "1")

(vla-get-lastsavedby acsum)
(vla-put-lastsavedby acsum "Me")

(vla-get-hyperlinkbase acsum)
(vla-put-hyperlinkbase acsum "My HyperlinkBase")

(vla-get-keywords acsum)
(vla-put-keywords acsum "My Keywords")

関連事項