VPF::Light & Ortho - Форум программистов

ImA

Дата 4.1.2008, 12:36 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 129
Регистрация: 8.12.2005

Репутация: нет
Всего: нет

Моё почтение.
Собственно, странная штука, какие бы координаты позиции источника света я не ставила, осветленная сторона делается белой, а та, что в тени красится в соответствии с заданными параметрами цвета примитивов...
в другом проекте, точно такая же запись работает правильно, отличие только в задании орто.
вот, код

Код


 LightPos : Array [0..3] of GLfloat = (-10800, 0, 0, 1.0);
  svet2 : Array [0..3] of GLfloat = (0.5, 0.5, 0.5, 0.5);
  svet : Array [0..3] of GLfloat = (0.6, 0.6, 0.6, 0.5);
  Specular : Array[0..3] of glFloat = (0.6, 0.6, 0.6, 1.0);
  Shine    : glFloat = 50.0;
................................
glEnable(GL_COLOR_MATERIAL);
glColorMaterial(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE);
glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, @Specular);
glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, @shine);
glEnable (GL_LIGHTING); 
glEnable(GL_LIGHT0);
glLightfv(GL_LIGHT0, GL_POSITION, @LightPos);
glLightfv(GL_LIGHT0,GL_AMBIENT, @svet);
glLightfv(GL_LIGHT0,GL_DIFFUSE, @svet2);
  glpushmatrix();
glortho(-12500, 12500, -9800, 9800, 40000, -45500);
...........................

если поставлю после орта, картина не изменится... так же как и после попматрикс

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Звук, графика и видео \| Следующая тема »