マテリアルに直接アタッチされているすべてのシェーダを含むをShaderCollection戻します。
注:このシェーダは、マテリアルに直接付加されいるシェーダのみを戻すもので、レンダツリー全体に付加されている全シェーダを戻すものではありません。
// get accessor ShaderCollection rtn = Material.Shaders; |
' ' This example illustrates how to enumerate all parameters under a material and ' any connected shaders. ' if Selection.Count <> 0 then set oObject = Selection(0) else set oRoot = Application.ActiveProject.ActiveScene.Root set oObject = oRoot.AddGeometry("Cylinder", "MeshSurface") ApplyShader "Material\Constant", oObject end if set oMaterial = oObject.Material ' Log material parameters Application.LogMessage "Material: " & oMaterial.FullName For each oParam in oMaterial.Parameters Application.LogMessage oParam.FullName Next ' Log shader parameters For each oShader in oMaterial.Shaders Application.LogMessage "Shader: " & oShader.FullName For each oParam in oShader.Parameters Application.LogMessage oParam.FullName Next Next |