OpenGL, сохранение изображения в файл

[Syn-McJ]

Доброго времени суток. Пишу курсовую работу: вращение пирамиды. Изображение вывожу на TPanel с использованием OpenGL. Проблема возникла при попытке вывести изображение в файл - в картинке оказывается пустая панель, будто никакой пирамиды нет.

void __fastcall TForm1::FormCreate(TObject *Sender)
{
	ghDC = GetDC(Panel1->Handle);

	if(!bSetupPixelFormat(ghDC))
	Close();
	ghRC = wglCreateContext(ghDC);
	wglMakeCurrent(ghDC, ghRC);

	glClearColor(1.0, 1.0, 1.0, 1.0);

	FormResize(Sender);

	glEnable(GL_COLOR_MATERIAL);
	glEnable(GL_DEPTH_TEST);
}

//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
void __fastcall TForm1::FormResize(TObject *Sender)
{
	ww = 800;
	hh = 500;
	glViewport(0, 0, ww, hh);
	glMatrixMode(GL_PROJECTION);
	glLoadIdentity();
	glOrtho(-5,5, -5,5, 0,20);
	gluLookAt(0,0,5, 0,0,0, 0,1,0);
	glMatrixMode(GL_MODELVIEW);
}

//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
void TForm1::Draw()
{
	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);     

	glLoadIdentity();                                     
	glTranslatef(-2.0, 0.0, 0.0);                      
	glRotatef(rtri, 1.0, 1.0, 0.0);                      

	glPolygonMode(GL_FRONT_AND_BACK, GL_LINE);

	glColor3f(0.0, 0.0, 0.0);
	glBegin(GL_TRIANGLES);
		glVertex3f(0.0, 1.0, 0.0);                       
		glVertex3f(-1.0, -1.0, 1.0);                  
		glVertex3f(1.0, -1.0, 1.0);                                             
		glVertex3f(0.0, 1.0, 0.0);                                     
		glVertex3f(1.0, -1.0, 1.0);                                          
		glVertex3f(1.0, -1.0, -1.0);                  
		glVertex3f(0.0, 1.0, 0.0);         
		glVertex3f(1.0, -1.0, -1.0);                
		glVertex3f(-1.0, -1.0, -1.0);                    
		glVertex3f(0.0, 1.0, 0.0);                      
		glVertex3f(-1.0, -1.0, -1.0);                    
		glVertex3f(-1.0, -1.0, 1.0);                     
	glEnd();

	rtri += 0.2;

	SwapBuffers(ghDC);

}

//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
	Draw();
}

//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
void __fastcall TForm1::Button1Click(TObject *Sender)
{

	Graphics::TBitmap *bm = new Graphics::TBitmap();
	bm->Height = Panel1->Height;
	bm->Width = Panel1->Width;

	BitBlt(bm->Canvas->Handle, 0, 0, ww, hh, ghDC, 0, 0, SRCCOPY);
	bm->SaveToFile("D:\\123.bmp");

	delete bm;
}

Ну и там конечно ещё закрытие окна и т.п., с координатами пирамиды тоже не все гладко, но не это главное.
Помогите, пожалуйста, с сохранением изображения в файл.