Vla-put-comments

AutoLISP Home - AutoLISP 目次 - DCL - AutoLisp関数互換表 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター

構文: (vla-put-comments vla-object stirng)

機能: 図面の[最終保存]プロパティを設定する。

引数

vla-object … SecurityParams の VLA オブジェクト
string … コメントの文字列

戻り値: 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")