Vla-get-area

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

構文

(vla-get-area vla-object)

機能

図形（円弧、円、楕円、ハッチング、ライトウェイト ポリライン、ポリライン、リージョン、平面上で閉じたスプライン）の囲まれた面積を取得する。

引数

• vla-object … VLA オブジェクト（Arc、Circle、Ellipse、Hatch、LightweightPolyline、Polyline、Region、Spline）

戻り値

平方作図単位によるオブジェクトの面積。倍精度浮動小数点数型

サンプル

(defun c:GZ-PlineAreaSum ( / sset i total g)
  ; 閉じたポリラインの面積合計
  (vl-load-com)
  (setq sset (ssget '((0 . "POLYLINE,LWPOLYLINE")(-4 . "&")(70 . 1))) 
        i    0 
        total  0.0)
  (while (< i (sslength sset))
    (setq g (vla-get-area (vlax-ename->vla-object (ssname sset i)))
          total (+ g total)
	   i (1+ i)))
total
)

---

関連事項

• vlax-get-acad-object
• vla-get-activedocument
• vlax-ename->vla-object
• ssname