Показать сообщение отдельно
  #2  
Старый 24.01.2011, 18:24
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

..........
var
p: TGLArrayf4;
begin
..........
p[0]:=4;
p[1]:=33;
p[2]:=35;
p[3]:=0;
p - "координаты солнца"
glLightfv(GL_LIGHT0,GL_POSITION,@p);
..........
end;

вроде так.
Ответить с цитированием