空のコレクションを作成し、Add メソッドまたは CollectionItem オブジェクトの Value プロパティを使ってそのコレクションに項目(CollectionItem)を追加できます。 ワイルドカードを使って登録オブジェクトを作成することもできます。
空のコレクションを作成するには
Softimage でコレクションを作成するには、CreateObject(VBScript コマンド)を使用して、汎用の XSICollection オブジェクトを作成します。
' Create XSI.Collection object
Set oCollection = CreateObject( "XSI.Collection" )
Add メソッドを使ってコレクションに項目を追加するには
コレクションに項目を追加するには、コレクションの Add メソッドを使用します。 たとえば、コレクションを oCollection とする場合は以下のようにします。
oCollection.Add "CameraInterest"
CollectionItem.Value プロパティでコレクションに項目を追加するには
CollectionItem を作成してその値を設定することもできます。たとえば、oCollection がすでに作成してある場合は、以下のようにします。
set oItem = CreateObject( "XSI.CollectionItem" )
oItem.value = "Camera"
oCollection.Add oItem
ワイルドカードを使って登録コレクションを作成するには
Set oLayers = CreateObject("XSI.Collection")
oLayers.Items = "Layers.List.*"
For Each oLayer In oLayers
LogMessage oLayers.Name
Next