Реферат Розробка програми створення віртуальної фотогалереї

Тема: Курсовые обзорные

0, 0.2); f (0, -9, 0.2); f (0, -9, 0.0);; (-1.6, -9, -0.1);;; (- 7.3, -11.9, 1);;

{========================================= ==============================

Перемальовування вікна} TfrmGL.FormPaint (Sender: TObject);

[0]: = 0;// Установка [1]: = 3;// положення [2]: = 4;// джерел [3]: = 12;// світла

(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT) ;//очищення буфера кольору (GL_LIGHT0, GL_PosiTion, @ position1);// Завантаження джерел світла (GL_FRONT, GL_SPECULAR, @ Position);// установка властивостей матеріалаLock// Перевірка блокування указателяSetCursorPos (wrkX, wrkY);

not modeglPolygonMode (GL_FRONT_AND_BACK, GL_LINE)// Установка стилю малювання лініяміglPolygonMode (GL_FRONT_AND_BACK, GL_FILL);// Установка стилю малювання з заповненням

glPushMatrix;// Збереження вихідного стану матриці (f, 0, 0, 1);// поворот "світу" на кут f (tx, ty, tz);// Переміщення по галереї

;;// виклик процедури малювання першої кімнати;

; (0, -24,0);;// виклик процедури малювання другої кімнати

glPopMatrix;

room> = 3 then (24.2,0,0);

glPushMatrix;;// виклик процедури малювання третьої кімнати

glPopMatrix;;

room> = 4 then (-48.4,0,0); (180,0,0,1);;;// виклик процедури малювання четвертої кімнати;;; demonstr// Запуск режиму демонстрації : = count +1;: = 0;: = 0; count of

: begin: = 0;: = 1;;

.. 61: f: = f +6;

.. 78: ty: = (count-62) * 0.5;

.. 92: begin: = 8;: = tx + (count-78) * 0.5;: = f +6;;

.. 133: begin: = - (count-93) * 0.4 +8;: = 7;;

.. 150: begin: = -8;: = 7;: = f +6;

.. 177: begin: = -7.5;: = - (count-151) * 0.5 +7;;

.. 193: begin: = -7.5;: = -6;: = f +6;;

.. 223: begin: = (count-193) * 0.5-7.5;: = -6.5;;

.. 229: begin: = -6.5;: = 7.5;: = f +6;;

.. 236: begin: = 2;: = -6.5;: = 7.5;: = f +6;;

.. 256: begin: = 2;: = -6.5;: = (count-236) * 0.5 +7.5;;