Vla-get-stylename

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

構文

(vla-get-stylename vla-object)

機能

オブジェクトのスタイル名前を取得する。

引数

• vla-object … VLA オブジェクト（Attribute、AttributeReference、Dim3PointAngular、DimAligned、DimAngular、DimArcLength、DimDiametric、DimOrdinate、DimRadial、DimRadialLarge、DimRotated、Leader、MLeader、MLine、MText、Text、Tolerance）

戻り値

スタイル名の文字列

サンプル

(defun C:xxx (/ ss)
  ; 図面内の1行文字図形のスタイルをダーっと表示するだけのコマンド
  (vl-load-com)
  (setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
  (if (ssget "_x" '((0 . "TEXT")))
    (vlax-for item
      (setq ss (vla-get-activeSelectionSet *ActDoc*) )
      (princ (strcat "\n" item ": " (vla-get-Stylename item)))
    ))
  (if ss (vla-delete ss))
(princ)
)

---

関連事項

• vlax-get-acad-object
• vla-get-activedocument
• vla-put-stylename