ConnectNewPolygonToPoint

ConnectNewPolygonToPoint

導入

v1.5

詳細

ポイントを作成中のポリゴンに追加し、そのポリゴンを既存のポイントと共有します。

スクリプト構文

oLong = ConnectNewPolygonToPoint( InputObj, PointID, [InsertPosition], [InvertPolygon] );

戻り値

対象ポリゴンの ID が Long として戻されます(ポリゴンの頂点数が 3 個未満である場合は、-1 が戻されます)。

パラメータ

パラメータ タイプ 説明
InputObj 文字列 作成されるポリゴンを保持するメッシュ
PointID Integer 接続するターゲット ポイントの ID

指定可能な値:

説明:

0<=i メッシュのポイントのインデックス。
InsertPosition Long ポリゴンにおけるポイントの挿入位置である頂点の順序数

デフォルト値: 0

指定可能な値:

説明:

0 ポイントはリストの最後に追加されます。
0 ポイントは、ポリゴンの i-1 番目と i 番目の頂点間に挿入されます。
InvertPolygon Boolean CW-CCW 接続を提供する前に隣接するポリゴンを反転すべき場合は True

デフォルト値: false

VBScript の例

' Add a quad to a grid and connect one of its points to an existing point

dim obj, poly

set obj = CreatePrim( "Grid", "MeshSurface" )

SelectObj obj

ApplyOp "CreatePolygon", obj, siUnspecified

AddPointToNewPolygon obj, -6.088, 0.0, 0.864

AddPointToNewPolygon obj, -6.345, 0.0, 2.953

poly = ConnectNewPolygonToPoint( obj, 16, 0 )

SelectObj obj & ".poly[" & poly & "]"

関連項目

ApplyOp AddPointToNewPolygon ConnectNewPolygonToEdge