Скрин окна приложения

[Demien]

Здраствуйте!
На форме установлен Chart. Как сделать скрин именно этого компонента? Или же как сделать скрин всей формы?
(Alt+Prt Sc потом в пейнт - не подходит... Необходимо в автоматическом режиме!)

[ZuBy]

Form1.GetFormImage;

[Demien]

procedure TForm1.SpeedButton1Click(Sender: TObject);
var
  imgWindow: TBitmap;
begin
  imgWindow := Form1.GetFormImage;
  imgWindow.SaveToFile('d:\FormImage.bmp');
end;

Все работает!
Спасибо!

[~=DEN=~]

Сохраняет результат графика

Chart1.SaveToBitmapFile('C:\Chart.bmp');

[Demien]

Сообщение от ~=DEN=~

Сохраняет результат графика

Chart1.SaveToBitmapFile('C:\Chart.bmp');

Огромнейшее спасибо!!! Именно то, что надо!