Текстурирование куба разными текстурами

glGenTextures(1,@texture);
glBindTexture(GL_TEXTURE_2D_ARRAY, texture);
// Allocate the storage. 
// Выделяем память под пачку(layerCount) текстур формата GL_RGBA8 (4 байта на пиксель)
// при width, height и layerCount = 256 это уже 64Мб (для каждой карты свои ограничения)
width := 256;
height := 256; 
layerCount := 256;// уникальных текстур
mipLevelCount :=1;// мипы пока не задействуем
glTexStorage3D(GL_TEXTURE_2D_ARRAY, mipLevelCount, GL_RGBA8, width, height, layerCount);
// Upload pixel data.
// The first 0 refers to the mipmap level (level 0, since there's only 1)
// The following 2 zeroes refers to the x and y offsets in case you only want to specify a subrectangle.
// The final 0 refers to the layer index offset (we start from index 0 and have 2 levels).
// Altogether you can specify a 3D box subset of the overall texture, but only one mip level at a time.
// Загружаем данные
// Удобнее, мне кажется, в цикле по текстурам:
format := GL_RGBA;
for i:=0 to layerCount-1 do
begin
  texels  := LoadTextureFromFile( filename[i], width, height, format );
  glTexSubImage3D(GL_TEXTURE_2D_ARRAY, 0, 0, 0, i, width, height, 1, format, GL_UNSIGNED_BYTE, texels);
end;
 
// Always set reasonable texture parameters
// Настраиваем фильтрацию и прочие функции текстурных координат если нет объекта семплера.
glTexParameteri(GL_TEXTURE_2D_ARRAY,GL_TEXTURE_MIN_FILTER,GL_LINEAR);
glTexParameteri(GL_TEXTURE_2D_ARRAY,GL_TEXTURE_MAG_FILTER,GL_LINEAR);
glTexParameteri(GL_TEXTURE_2D_ARRAY,GL_TEXTURE_WRAP_S,GL_CLAMP_TO_EDGE);
glTexParameteri(GL_TEXTURE_2D_ARRAY,GL_TEXTURE_WRAP_T,GL_CLAMP_TO_EDGE);

glUseProgram( prog );
glBindVertexArray( vao );
glUniform1i( locSampler, 0 );
glUniformMatrix4fv( locMatrix, 1, GL_FALSE, @u_MVP );
glBindTexture(GL_TEXTURE_2D_ARRAY, texture);
glDrawArrays(GL_TRIANGLES, 0, N*36 );