印刷環境設定がモデル空間に適用されるのか図面全体に適用されるのかを指定します。
サポートされているプラットフォーム: Windows のみ
読み込み専用: はい
タイプ: ブール型
追加の注意はありません。
VBA:
Sub Example_ModelType() ' This example creates a plot configuration object ' and then finds the ModelType for the object. Dim PlotConfigObj As AcadPlotConfiguration ' Creates the MText Object Set PlotConfigObj = ThisDrawing.PlotConfigurations.Add("NewPlotConfiguration") ' Find the current ModelType Dim currModelType As Boolean currModelType = PlotConfigObj.ModelType MsgBox "The ModelType for the object is: " & currModelType End Sub
Visual LISP:
(vl-load-com) (defun c:Example_ModelType() ;; This example creates a plot configuration object ;; and then finds the ModelType for the object. (setq acadObj (vlax-get-acad-object)) (setq doc (vla-get-ActiveDocument acadObj)) ;; Creates the MText Object (setq PlotConfigObj (vla-Add (vla-get-PlotConfigurations doc) "NewPlotConfiguration")) ;; Find the current ModelType (setq currModelType (vla-get-ModelType PlotConfigObj)) (alert (strcat "The ModelType for the object is: " (if (= currModelType :vlax-true) "True" "False"))) )