Tinav:createvalignmentview

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年1月28日 (土) 08:51時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(Tinav:createvalignmentview ename ptMin ptMax )


機能
Horizontal Alignmentエンティティの ename を参照して、ptMin を左下隅、ptMax を右上隅とした Vertical AlignmentView エンティティを作成する。


引数
  • ename : HorizontalAlignment の参照として使用される HorizontalAlignment エンティティの ename または vlaオブジェクト。
  • ptMin : (現在のUCSにおける)アライメントビューエンティティの左下点
  • ptMax : (現在のUCSにおける)アライメントビューエンティティのための右上点


戻り値
Vertical AlignmentViewエンティティの ename、または NIL を返す。


メモ

ptMin と ptMax の Z 座標は無視される。 tinav:isverticalalignmenttinav:ishorizontalalignment 関数も参照。


サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(setq points '((20 20)(60 20)(60 60)(20 60)))
(tin:addpoints tin '((10 80 5) (50 50 10) (10 10 2) (80 20 7) (70 60 3) (40 70 10) (25 25 6) (55 55 2) (75 45 5) ))


(setq avEnt (tinav:createVAlignmentView (handent "7A") '(446780 112733) '(447226 113092)))
<Entity name: 492fb560>

関連事項