Записать содержимое окна OpenGL в BMP файл
Falk0ner, вс, 06/07/2008 - 15:35.
Записать содержимое окна OpenGL в BMP файл gr - объект, в канве которого я рисую с помощью OpenGL
bt := TBitmap.Create;
with bt do
begin
Width := gr.Width;
Height := gr.Height;
Canvas.CopyRect(ClientRect, gr.Canvas, gr.ClientRect);
SaveToFile('e:\bt.bmp');
Free;
end;
with bt do
begin
Width := gr.Width;
Height := gr.Height;
Canvas.CopyRect(ClientRect, gr.Canvas, gr.ClientRect);
SaveToFile('e:\bt.bmp');
Free;
end;
DelphiWorld 6.0
Отправить комментарий