Nomadic советует:
Вот что попробовал - вроде получилось:
bt := TBitmap.Create; bt.Width := gr.Width; bt.Height := gr.Height; bt.Canvas.CopyRect(ClientRect, gr.Canvas, gr.ClientRect); bt.SaveToFile('e:\bt.bmp'); bt.Free; |
(gr - объект, в канве которого я рисую с помощью OpenGL) [001108]