OpenGL в Delphi



         

Рисунок 2. 17. Еще один пример





glTranslatef (-0. 3, 0. 3, 0. 0);
glRotatef (60, 0, 0, 1);

Кружочки рисуются в текущей точке отсчета системы координат, относительно которой происходят каждый раз преобразования. По завершении цикла точка зрения возвращается точно в начальное положение, поэтому дополнительных манипуляций с системой координат не требуется. Перед циклом делаем перенос для выравнивания картинки на экране:

glTranslatef (0. 4, 0. 1, 0. 0);

После цикла, конечно, требуется восстановить первоначальное положение системы координат:

glTranslatef (-0. 4, -0. 1, 0. 0);

Разобравшись с этим примером, перейдите к примеру, располагающемуся в следующем подкаталоге, Ex58. Здесь строятся шесть квадратов по кругу, как показано на Рисунок 2. 17.




Содержание  Назад  Вперед