Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.08.2010, 15:11   #1
Dima6120
Пользователь
 
Аватар для Dima6120
 
Регистрация: 04.06.2010
Сообщений: 18
Вопрос Проблема с поверхностью Безье...

Я строю поверхность безье 10x10 и больше. На одном компьютере всё нормально выводится, нормально накладываются текстуры, а на другом почему-то вообще не выводит поверхность, только разве поверхность размером >8x8. Подскажите чего делать!
Dima6120 вне форума Ответить с цитированием
Старый 13.08.2010, 15:31   #2
Selestis
Форумчанин
 
Аватар для Selestis
 
Регистрация: 21.01.2009
Сообщений: 719
По умолчанию

Код отрисовки в студию...
Изобретатель велосипедов
Selestis вне форума Ответить с цитированием
Старый 13.08.2010, 18:12   #3
Dima6120
Пользователь
 
Аватар для Dima6120
 
Регистрация: 04.06.2010
Сообщений: 18
По умолчанию

Вот код отрисовки:
Цитата:
...
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);
...
Dima6120 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема с рамами/Проблема с ЖД DRAGGER Компьютерное железо 6 04.01.2009 23:37
Кривая Безье ELL Помощь студентам 4 20.05.2008 22:56
Нужен фонт, описанный Безье Oak Помощь студентам 1 30.03.2008 00:10