|
#1
|
||||
|
||||
скриншот
такая задача на форме есть 5 чартов(tchart) ну и другие компоненты там кнопки итдитп. нужно сделать один скриншот всех чартов (и сохранить как один бмп файл) чтобы он не затрагивал остальные компоненты????
|
#2
|
||||
|
||||
Лучше в голову не чего не приходит. Просто делай скриншот по координатам (то есть только то, где есть чарты).
Код:
procedure TForm1.Button1Click(Sender: TObject); var bmp:TBitmap; begin bmp := TBitmap.Create; bmp.Width := form1.Width div 2; bmp.Height := form1.Height div 2; BitBlt(bmp.Canvas.Handle, 0,0, Screen.Width, Screen.Height, GetDC(0), 0,0,SRCCOPY); bmp.SaveToFile('mybmp.bmp'); bmp.Free; end; Ну а вместо GetDC(0) пиши хендл своей формы (GetDC(Handle)). Помогаю за Спасибо |