Автоматический экспорт

Firhov

Здравствуйте! После запуска отчета, в диалоговом окне задается диапазон дат и нажимается кнопка ok. Выводится отчёт. Если надо сделать экспорт, то нажимаем кнопку экспорта, выбираем нужный формат и т.д..
Вопрос, можно ли сделать автоматический экспорт в xml после выбора дат и нажатия кнопки ok? C++Script.

DimaBr

procedure TForm1.FormClick(Sender: TObject);
begin
  frxReport1.ShowReport();
end;

procedure TForm1.frxReport1EndDoc(Sender: TObject);
begin
  frxXMLExport1.FileName := 'c:\1.xml';
  frxXMLExport1.ShowDialog := false;
  frxReport1.Export(frxXMLExport1);
end;

Firhov

Спасибо! А можете написать это для С++ Script?