「Tin:merge」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (Tin:merge ''tinEname'' ''otherTin'' ) ; 機能 : tinEname TinSurface エンティティに otherTin のTinSurface エンティティ…」)
 
編集の要約なし
 
44行目: 44行目:


[[Category:AutoLISP]]
[[Category:AutoLISP]]
[[Category:BricsCADのLISP]]

2023年1月28日 (土) 08:45時点における最新版

構文
(Tin:merge tinEname otherTin )


機能
tinEname TinSurface エンティティに otherTin のTinSurface エンティティをマージする


引数
  • tinEname : TinSurface エンティティの ename または vla-object
  • otherTin : マージする TinSurface エンティティの ename または vla-object


戻り値
マージ成功なら T、それ以外は nil


  • メモ :
    • マージされても otherTin の エンティティは消去またはクリアされない。
    • tinEname、otherTin は重なってなくてもマージされる。


サンプル

(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(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 tin2 (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tin:addpoints tin2 '((0 0 0) (5 5 1) (10 10 2) (80 20 7) (90 90 8) (90 70 10)))
(tin:merge tin tin2)
T

関連事項