2005/06/15

隣接したポリゴンを1つに結合する

仕事の合間に5分で書いたスクリプトです。



やっていることは選択したポリゴンを削除してキャップしているだけです(^^;

--------------------------------------------------------------
rollout sft_rollout "Square from triangle"
(
button go_btn "Connect" width:50 pos:[5,5]
on go_btn pressed do
(
disableSceneRedraw()
undo on(
$.EditablePoly.ConvertSelection #Face #Edge
$.EditablePoly.delete #Face
$.EditablePoly.capHoles #Edge
)
enableSceneRedraw()
completeRedraw()
)
)
createDialog sft_rollout width:60 height:30

--------------------------------------------------------------

使い方は以下のとおり。
①スクリプトをコピー&ペーストして実行
②1つに結合したいポリゴンを複数選択
③"connect"ボタンを押す