「Vla-saveas」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
編集の要約なし
 
35行目: 35行目:
::* ac2013_dxf : AutoCAD 2013 DXF (*.dxf)
::* ac2013_dxf : AutoCAD 2013 DXF (*.dxf)
::* ac2013_Template : AutoCAD 2013 図面テンプレート ファイル(*.dwt)
::* ac2013_Template : AutoCAD 2013 図面テンプレート ファイル(*.dwt)
::* ac2018_dwg : AutoCAD 2018 DWG (*.dwg)
::* ac2018_dxf : AutoCAD 2018 DXF (*.dxf)
::* ac2018_Template : AutoCAD 2018 図面テンプレート ファイル(*.dwt)
::* acNative : 最新の図面のバージョンと同じ意味。  
::* acNative : 最新の図面のバージョンと同じ意味。  
:* SecurityParams … SecurityParams オブジェクト。暗号化された図面のオプション省略可
:* SecurityParams … SecurityParams オブジェクト。暗号化された図面のオプション省略可
43行目: 46行目:




memo: セキュア URL に保存するとき、パスワードの入力を求めるダイアログ ボックスが表示される。 このときに、メッセージ ボックスも表示される(ブラウザでこの動作をオフにしていない場合)。  
memo:  
 
* セキュア URL に保存するとき、パスワードの入力を求めるダイアログ ボックスが表示される。このときに、メッセージ ボックスも表示される(ブラウザでこの動作をオフにしていない場合)。  




66行目: 71行目:
   (vla-SaveAs *ActDoc* (strcat fld "2010-" (getvar "DWGNAME") ) ac2010_DWG)
   (vla-SaveAs *ActDoc* (strcat fld "2010-" (getvar "DWGNAME") ) ac2010_DWG)
   (vla-SaveAs *ActDoc* (strcat fld "2013-" (getvar "DWGNAME") ) ac2013_DWG)
   (vla-SaveAs *ActDoc* (strcat fld "2013-" (getvar "DWGNAME") ) ac2013_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "2018-" (getvar "DWGNAME") ) ac2018_DWG)
   (vla-SaveAs *ActDoc* (strcat fld "native-" (getvar "DWGNAME") ) acnative)
   (vla-SaveAs *ActDoc* (strcat fld "native-" (getvar "DWGNAME") ) acnative)
   (princ)
   (princ)
77行目: 83行目:
* [[vlax-get-acad-object]]
* [[vlax-get-acad-object]]
* [[vla-get-activedocument]]
* [[vla-get-activedocument]]
[[Category:AutoLISP]]
-----
関連事項
* [[vlax-get-acad-object]]
* [[]]




[[Category:AutoLISP]]
[[Category:AutoLISP]]

2023年12月19日 (火) 08:07時点における最新版

構文
(vla-saveas vla-object FileName FileType SecurityParams)


機能
指定したファイルにドキュメントを保存する。
AutoCAD 2006以降から、メニュー グループの保存は非サポート。


引数
  • vla-object … ドキュメントの VLA オブジェクト
  • FileName … AcSaveAsType列挙型 保存するファイル名の文字列
  • FileType … ファイルの形式
  • 使える値は使ってる CAD のバージョンで変わるので注意
  • acR12_DXF : AutoCAD Release12/LT2 DXF (*.dxf)
  • acR13_DWG : AutoCAD Release13/LT95 DWG (*.dwg)
  • acR13_DXF : AutoCAD Release13/LT95 DXF (*.dxf)
  • acR14_DWG : AutoCAD Release14/LT97 DWG (*.dwg)
  • acR14_DXF : AutoCAD Release14/LT97 DXF (*.dxf)
  • acR14_dwg : AutoCAD R14 DWG (*.dwg)
  • ac2000_dwg : AutoCAD 2000 DWG (*.dwg)
  • ac2000_dxf : AutoCAD 2000 DXF (*.dxf)
  • ac2000_Template : AutoCAD 2000 図面テンプレート ファイル(*.dwt)
  • ac2004_dwg : AutoCAD 2004 DWG (*.dwg)
  • ac2004_dxf : AutoCAD 2004 DXF (*.dxf)
  • ac2004_Template : AutoCAD 2004 図面テンプレート ファイル(*.dwt)
  • ac2007_dwg : AutoCAD 2007 DWG (*.dwg)
  • ac2007_dxf : AutoCAD 2007 DXF (*.dxf)
  • ac2007_Template : AutoCAD 2007 図面テンプレート ファイル(*.dwt)
  • ac2010_dwg : AutoCAD 2010 DWG (*.dwg)
  • ac2010_dxf : AutoCAD 2010 DXF (*.dxf)
  • ac2010_Template : AutoCAD 2010 図面テンプレート ファイル(*.dwt)
  • ac2013_dwg : AutoCAD 2013 DWG (*.dwg)
  • ac2013_dxf : AutoCAD 2013 DXF (*.dxf)
  • ac2013_Template : AutoCAD 2013 図面テンプレート ファイル(*.dwt)
  • ac2018_dwg : AutoCAD 2018 DWG (*.dwg)
  • ac2018_dxf : AutoCAD 2018 DXF (*.dxf)
  • ac2018_Template : AutoCAD 2018 図面テンプレート ファイル(*.dwt)
  • acNative : 最新の図面のバージョンと同じ意味。
  • SecurityParams … SecurityParams オブジェクト。暗号化された図面のオプション省略可


戻り値
nil 保存できなかった場合はエラー。


memo:

  • セキュア URL に保存するとき、パスワードの入力を求めるダイアログ ボックスが表示される。このときに、メッセージ ボックスも表示される(ブラウザでこの動作をオフにしていない場合)。


サンプル
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
(setq *prefs* (vla-get-preferences (vlax-get-Acad-Object)))
(setq *sys* (vla-get-system *prefs*))
(setq *prefs_ad* (vla-get-preferences *actdoc*))
(setq *util* (vla-get-utility *actdoc*))
(setq *views* (vla-get-views *actdoc*))

(defun ax-saveas ()
  (vl-load-com)
  (setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
  (setq fld "c:/temp/")

  (vla-SaveAs *ActDoc* (strcat fld "R14-")(getvar "DWGNAME") ) acR14_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "2000-" (getvar "DWGNAME") ) ac2000_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "2004-" (getvar "DWGNAME") ) ac2004_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "2007-" (getvar "DWGNAME") ) ac2004_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "2010-" (getvar "DWGNAME") ) ac2010_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "2013-" (getvar "DWGNAME") ) ac2013_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "2018-" (getvar "DWGNAME") ) ac2018_DWG)
  (vla-SaveAs *ActDoc* (strcat fld "native-" (getvar "DWGNAME") ) acnative)
  (princ)
);defun



関連事項