OpenGL в C++ Builder. Основы

#include <GL/gl.h> // описание непосредственно библиотеки OpenGL
#include <GL/glu.h> // описание дополнительной библиотеки со всякими полезностями

bool bSetupPixelFormat(HDC hdc);

bool bSetupPixelFormat(HDC hdc)
{	PIXELFORMATDESCRIPTOR pfd, *ppfd;
	int pixelformat;
	ppfd = &pfd;
	ppfd->nSize = sizeof(PIXELFORMATDESCRIPTOR);
	ppfd->nVersion = 1;
	ppfd->dwFlags = PFD_DRAW_TO_WINDOW | PFD_SUPPORT_OPENGL | PFD_DOUBLEBUFFER;
	ppfd->dwLayerMask = PFD_MAIN_PLANE;
	ppfd->iPixelType = PFD_TYPE_RGBA; // формат указания цвета 
	// (значение PFD_TYPE_RGBA означает, что цвет указывается
	// четырьмя параметрами RGBA - красный, зленный, синий и альфа)
	ppfd->cColorBits = 16;            // глубина цвета
	ppfd->cDepthBits = 16;            // размер буфера глубины (Z-Buffer)
	ppfd->cAccumBits = 0;
	ppfd->cStencilBits = 0;           // размер буфера трафарета (0 - не используется)
	if ((pixelformat = ChoosePixelFormat(hdc, ppfd)) == 0)
	// функция ChoosePixelFormat подбирает формат пикселей, максимально
	// удовлетворяющий нашим требованиям, и возвращает его дескриптор
	{	MessageBox(NULL, "ChoosePixelFormat failed", "Error", MB_OK);
		return FALSE;
	}
	if (SetPixelFormat(hdc, pixelformat, ppfd) == FALSE)
	// функция SetPixelFormat устанавливает выбранный
	// формат пикселей в контексте устройства (dc)
	{	MessageBox(NULL, "SetPixelFormat failed", "Error", MB_OK);
		return FALSE;
	}
	return TRUE;
}

HGLRC ghRC; // указатель на контекст воспроизведения (Rendering Context)
HDC   ghDC; // дескриптор устройства (указатель на окно, в котором будем рисовать)

ghDC = GetDC(Handle);
if (!bSetupPixelFormat(ghDC)) Close(); // устанавливаем формат пикселей
ghRC = wglCreateContext(ghDC);         // эта и следующая функция нужны для
wglMakeCurrent(ghDC, ghRC);            // создания контекста воспроизведения (Rendering Context)
glClearColor(0.85, 0.85, 0.85, 0.0);   // устанавливаем цвет, которым будет заполняться экран при
                                       // очищении (4 параметра соответствуют выбранной нами при
                                       // установке пикселей палитре RGBA)
FormResize(Sender);                 // здесь делаем тоже самое, что и при изменении
                                    // размеров формы, поэтому так
// в OpenGL всё включается/выключается (разрешается/запрещается) процедурами glEnable и glDisable
glEnable(GL_COLOR_MATERIAL);        // разрешаем давать нашим объектам какой-то цвет
glEnable(GL_DEPTH_TEST);            // разрешаем тест глубины, чтобы изображение было объёмным
glEnable(GL_LIGHTING);              // разрешаем освещение
glEnable(GL_LIGHT0);                // включаем "лампочку №0"
float p[4]={3,3,3,1},
      d[3]={-1,-1,-3};
glLightfv(GL_LIGHT0,GL_POSITION,p); // устанавливаем свойства "лампочки №0": позицию
glLightfv(GL_LIGHT0,GL_SPOT_DIRECTION,d); // и направление света

// устанавливаем область вывода - область, в которую OpenGL будет
// выводить изображение (в нашем случае - вся форма)
	glViewport( 0, 0, Width, Height );
 
// устанавливаем режим матрицы видового преобразования
// если вы меняете тип проецирования, положение или направление
// камеры, то параметр должен быть GL_PROJECTION
// после того, как вы завершили изменения, вызовите эту
// процедуру с параметром GL_MODELVIEW
	glMatrixMode( GL_PROJECTION );
 
// заменяем текущую матрицу видового преобразования
	glLoadIdentity();
 
// устанавливаем режим ортогонального (прямоугольного) проецирования;
// это значит, что изображение будет рисоваться как в изометрии
// 6 параметров типа GLdouble (или просто double): left, right, bottom,
// top, near, far определяют координаты соответственно левой, правой,
// нижней, верхней, ближней и дальней плоскостей отсечения,
// т.е. всё, что окажется за этими пределами, рисоваться не будет (на
// самом деле эта процедура просто устанавливает масштабы координатных осей)
// для того чтобы установить перспективное проецирование, используются
// процедуры glFrustum и gluPerspective        
	glOrtho(-5,5, -5,5, 2,12);
 
// устанавливаем параметры камеры: первая тройка - её координаты,
// вторая - вектор направления, третья - направление оси Y
	gluLookAt(5,5,5, 0,0,0, 0,0,1);
 
	glMatrixMode( GL_MODELVIEW );

// удаляем контекст воспроизведения и освобождаем окно, в котором рисовали
	if(ghRC)
        {       wglMakeCurrent(ghDC,0);
                wglDeleteContext(ghRC);
        }
    if(ghDC) ReleaseDC(Handle, ghDC);

void Draw();

void TForm1::Draw()
{	glClear(GL_DEPTH_BUFFER_BIT | GL_COLOR_BUFFER_BIT); // очищаем буфер кадра
 
	// рисуем, крутим, вертим
 
    SwapBuffers(ghDC); // выводим всё на экран
}

glBegin(Type); // указываем тип примитива, который будем рисовать
    glVertex3d(x,y,z); // первая вершина
          ...          // промежуточные вершины
    glVertex3d(x,y,z); // последняя вершина
glEnd;         // закончили рисовать примитив

glColor3d(r,g,b)