Проблема с поверхностью Безье...

[Dima6120]

Я строю поверхность безье 10x10 и больше. На одном компьютере всё нормально выводится, нормально накладываются текстуры, а на другом почему-то вообще не выводит поверхность, только разве поверхность размером >8x8. Подскажите чего делать!

[Selestis]

Код отрисовки в студию...

[Dima6120]

Вот код отрисовки:

...
if frmGL.idCurGLObj=idObj
then begin
if dr_ctrl_ps=true
then glColor4f(0,0,1,0.6)
else glColor3f(0,0,1);
end
else begin
if (dr_ctrl_ps=true) or (frmGL.ChBP.BesPlaneChouse=true)
then glColor4f(Color[0],Color[1],Color[2],0.6)
else glColor3f(Color[0],Color[1],Color[2])
end;
if (mode=GL_SELECT) and (dr_ctrl_ps=false)
then glLoadName(idObj);
if DrawTexture=true
then begin
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, TexFilter);
glTexParameteri(GL_TEXTURE_2D,GL_TE XTURE_MIN_FILTER,TexFilter);
glTexParameteri(GL_TEXTURE_2D,GL_Te xture_Wrap_S,GL_Repeat);
glTexParameteri(GL_TEXTURE_2D,GL_Te xture_Wrap_T,GL_Repeat);
glTexGeni (GL_S, GL_TEXTURE_GEN_MODE, GL_OBJECT_LINEAR);
glTexGeni (GL_t, GL_TEXTURE_GEN_MODE, GL_OBJECT_LINEAR);
glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_DECAL);

glMap2f(GL_MAP2_TEXTURE_COORD_2, 0, 1, 2, 2, 0, 1, 4, 2,@TexCoord);
gluBuild2DMipmaps(GL_TEXTURE_2D, 3, Texture.Width, Texture.Height,
GL_RGB, GL_UNSIGNED_BYTE, Texture.pTexture);
glEnable(GL_TEXTURE_2D);
end;
glMap2f (GL_MAP2_VERTEX_3, 0, 1, 3, G, 0, 1, G*3, I, @ctrlpoints);
glEnable (GL_MAP2_VERTEX_3);
glMapGrid2f (20, 0.0, 1.0, 20, 0.0, 1.0);
glEvalMesh2 (GL_Fill, 0, 20, 0, 20);
...