const
CubeMapFileName : array[0…5] of String = (‘cm_right.tga’,‘cm_left.tga’,‘cm_top.tga’,
‘cm_bottom.tga’,‘cm_front.tga’,‘cm_back.tga’);
for i := 0 to 5 do
begin
Target := GL_TEXTURE_CUBE_MAP_POSITIVE_X_ARB+i;
LoadTexture(CubeMapFileName[i],Cubemap[i], False, GL_LINEAR, GL_LINEAR_MIPMAP_LINEAR, False);
glTexParameteri(GL_TEXTURE_CUBE_MAP, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
glTexParameteri(GL_TEXTURE_CUBE_MAP, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
end;
But this code not completed until I changed file form tga to jpg or bmp.