## ShowNextOGLProjection

### Introduced

v1.5

### Description

Switches the active OGL texture projection of all objects in the current selection.

### Scripting Syntax

    ShowNextOGLProjection();

### Examples

#### VBScript Example

    '

    ' This example shows how to use ShowNextOGLProjection.

    ' 2 texture projections are created on a sphere,

    ' and  call the ShowNextOGLProjection command

    ' to show texture projection one after the other.

    '

    NewScene , false

    CreatePrim "Sphere", "NurbsSurface", "MySphere"

    ' Create a shader and connect to the material property

    ApplyShader

    ' Add an image shader

    SIApplyShaderToCnxPoint "Image", "Sources.Materials.DefaultLib.Material.Phong.diffuse"

    ' Create 2 texture projections

    CreateProjection "MySphere", siTxtUV, siTxtDefaultPlanarXY, , "Texture_Projection"

    CreateProjection "MySphere", , siTxtDefaultPlanarXY, , "Texture_Projection1"

    ' Set initial value of the Material property

    SetValue "MySphere.Material.TextureSel", 3

    SetValue "MySphere.Material.ImageClipName", "Clips.noIcon_pic"

    SetDisplayMode "Camera", "textured"

    ' Show Next Projection

    msgbox "Click OK to run ShowNextOGLProjection"

    ShowNextOGLProjection

    msgbox "Click OK to run ShowNextOGLProjection again"

    ShowNextOGLProjection