Geometry.CreateSubComponent

Geometry.CreateSubComponent

説明

指定したインデックスと一致するジオメトリのサブエレメントを含むSubComponentを作成します。インデックスを指定しない場合は、空の SubComponent オブジェクトが作成されます。

C#構文

SubComponent Geometry.CreateSubComponent( String in_Type, Object in_Indices );

スクリプト構文

oReturn = Geometry.CreateSubComponent( Type, [Indices] );

戻り値

SubComponent

パラメータ

パラメータ タイプ 説明
Type ClusterTypes SubComponent タイプを特定するためにクラスタタイプが使用されます。
Indices Array ジオメトリのサブコンポーネントのインデックスを含む1D 配列。

VBScript の例

set oObject = Application.ActiveProject.ActiveScene.root.AddGeometry("Cube","MeshSurface","MyCube")

myVertexArray = Array(2,3,34,56)

FindInvalidSubComponentIndex siVertexCluster, myVertexArray, oObject

' Procedure that, given an object, an array of indices and a cluster type, displays invalid

' indices in the array.

Sub FindInvalidSubComponentIndex( in_ClusterType, in_IndexArray, in_Object)

	Dim l_invalidIndexArray, l_validArray, l_subComponent, l_bNotFound

	set l_subComponent = oObject.ActivePrimitive.Geometry.CreateSubComponent(in_ClusterType, in_IndexArray)

	l_validArray = l_subComponent.ElementArray

	for i = lbound(in_IndexArray) to ubound(in_IndexArray)

		l_bNotFound = TRUE

		for j = lbound(l_validArray) to ubound(l_validArray)

			if in_IndexArray(i) = l_validArray(j) then

				l_bNotFound = FALSE

				Exit For

			end if

		next

		if l_bNotFound then

			Application.LogMessage in_IndexArray(i)

		end if				

	next

End Sub

関連項目

ClusterTypes