「Vla-put-plotorigin」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{AutoLISP}} ; 構文 : (vla-put-plotorigin ''vla-object'' ''PlotOrigin'') ; 機能 : UCS、ブロック、印刷、またはラスター イメージの原点を WCS...」)
 
編集の要約なし
 
(同じ利用者による、間の1版が非表示)
18行目: 18行目:
; サンプル
; サンプル
<pre class="brush:autolisp;">
<pre class="brush:autolisp;">
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
(setq *actlay* (vla-get-ActiveLayout (vla-get-activedocument (vlax-get-acad-object))))
(setq *actlay* (vla-get-ActiveLayout *actdoc*))
(setq Config (vla-get-Configname *actlay*)
      StlSht (vla-get-StyleSheet *actlay*)
      CanMed (vla-get-CanonicalMediaName *actlay*)
      CnPlot (vla-get-CenterPlot *actlay*)
      PUnits (vla-get-PaperUnits *actlay*)
      PHiddn (vla-get-PlotHidden *actlay*)
      PltRot (vla-get-PlotRotation *actlay*)
      PltTyp (vla-get-PlotType *actlay*)
      PltOri (vla-get-PlotOrigin *actlay*)
      PltWSt (vla-get-PlotWithPlotStyles *actlay*)
      SclLwt (vla-get-ScaleLineweights *actlay*)
      StdScl (vla-get-UseStandardScale *actlay*))


(vla-put-configname *actlay* "A3-printer1.pc3")
(vla-put-stylesheet *actlay* "monocrome.ctb")
(vla-put-canonicalmedianame *actlay* "UserDefinedMetric (594.00 X 841.00ミリ)")
(vla-put-centerplot *actlay* :vlax-true)
(vla-put-paperunits *actlay* 1)
(vla-put-plothidden *actlay* :vlax-true)
(vla-put-plotrotation *actlay* 1)
(vla-put-plottype *actlay* 4)
(vla-put-plotorigin *actlay* (vlax-make-safearray vlax-vbdouble (cons 0 1)))
(vla-put-plotwithplotstyles *actlay* :vlax-true)
(vla-put-scalelineweights *actlay* :vlax-true)
(vla-put-usestandardscale *actlay* :vlax-true)


</pre>
</pre>
38行目: 37行目:
-----
-----
関連事項
関連事項
<div class="mcol3">
* [[vlax-get-acad-object]]
* [[vlax-get-acad-object]]
* [[vla-get-activedocument]]
* [[vla-get-activedocument]]
67行目: 67行目:
* [[vla-put-usestandardscale]]
* [[vla-put-usestandardscale]]
* [[vla-put-windowstate]]
* [[vla-put-windowstate]]
 
</div>


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

2013年3月24日 (日) 14:19時点における最新版

構文
(vla-put-plotorigin vla-object PlotOrigin)


機能
UCS、ブロック、印刷、またはラスター イメージの原点を WCS 座標で指定する。


引数
  • vla-object … VLAオブジェクト
  • PlotOrigin … XY座標値のバリアント型(2 要素の倍精度浮動小数点数型配列)
戻り値
バリアント値


サンプル
(setq *actlay* (vla-get-ActiveLayout (vla-get-activedocument (vlax-get-acad-object))))

(vla-put-configname *actlay* "A3-printer1.pc3")
(vla-put-stylesheet *actlay* "monocrome.ctb")
(vla-put-canonicalmedianame *actlay* "UserDefinedMetric (594.00 X 841.00ミリ)")
(vla-put-centerplot *actlay* :vlax-true)
(vla-put-paperunits *actlay* 1)
(vla-put-plothidden *actlay* :vlax-true)
(vla-put-plotrotation *actlay* 1)
(vla-put-plottype *actlay* 4)
(vla-put-plotorigin *actlay* (vlax-make-safearray vlax-vbdouble (cons 0 1)))
(vla-put-plotwithplotstyles *actlay* :vlax-true)
(vla-put-scalelineweights *actlay* :vlax-true)
(vla-put-usestandardscale *actlay* :vlax-true)


関連事項