v10.0 (2012)
このレイヤ ノードのレイヤ子ノードを、LayerCollection オブジェクトとして戻します。
// get accessor LayerCollection rtn = Layer.Layers; |
NewScene ,False CreateLayer , "MyLayerExample" 'The command creates a Layer Group CreateLayerGroup , "Layers.MyLayerExample", "MyLayerGroup" set CurrentScene = Application.ActiveProject2.ActiveScene Logmessage CurrentScene.Layers.Count For each oLayer in CurrentScene.Layers Logmessage oLayer.fullname Next CurrentScene.Layers(1).AddLayer CurrentScene.Layers(0) Logmessage CurrentScene.Layers.Count For each oLayer in CurrentScene.Layers Logmessage oLayer.fullname Next Output from above script ' INFO : 2 ' INFO : Layers.Layer_Default ' INFO : Layers.MyLayerGroup ' INFO : 1 ' INFO : Layers.MyLayerGroup |