Cube Mapping

How to create CubeMap-Texture:

glGenTextures(1, Varptr(TextureID))

glBindTexture(GL_TEXTURE_CUBE_MAP,TextureID)
glTexImage2D(GL_TEXTURE_CUBE_MAP_POSITIVE_X_EXT, 0, GL_RGBA, ..
             Width, Height, 0, GL_RGBA, GL_UNSIGNED_BYTE, Data1)

glBindTexture(GL_TEXTURE_CUBE_MAP,TextureID)
glTexImage2D(GL_TEXTURE_CUBE_MAPNEGATIVE_X_EXT, 0, GL_RGBA, ..
             Width, Height, 0, GL_RGBA, GL_UNSIGNED_BYTE, Data2)

glBindTexture(GL_TEXTURE_CUBE_MAP,TextureID)
glTexImage2D(GL_TEXTURE_CUBE_MAP_POSITIVE_Y_EXT, 0, GL_RGBA, ..
             Width, Height, 0, GL_RGBA, GL_UNSIGNED_BYTE, Data3)

' ...

glBindTexture(GL_TEXTURE_CUBE_MAP,TextureID)
glTexImage2D(GL_TEXTURE_CUBE_MAP_NEGATIVE_Z_EXT, 0, GL_RGBA, ..
             Width, Height, 0, GL_RGBA, GL_UNSIGNED_BYTE, Data6)

How tu use it:

glEnable(GL_TEXTURE_CUBE_MAP)

glBindTexture(GL_TEXTURE_CUBE_MAP, TextureID)

glEnable(GL_TEXTURE_GEN_S)
glEnable(GL_TEXTURE_GEN_T)
glEnable(GL_TEXTURE_GEN_R)

glTexGeni(GL_S, GL_TEXTURE_GEN_MODE, GL_REFLECTION_MAP_ARB)
glTexGeni(GL_T, GL_TEXTURE_GEN_MODE, GL_REFLECTION_MAP_ARB)
glTexGeni(GL_R, GL_TEXTURE_GEN_MODE, GL_REFLECTION_MAP_ARB)

cu olli