Tomado del ejemplo que trae QuickRepor:
Código Delphi
[-]procedure TfrmQR3Demo.btnExportClick(Sender: TObject);
begin
btnExport.Enabled := False;
with SaveDialog1 do
begin
if Execute then
begin
frmFormLetter.QuickRep1.ExportToFilter(TQRCommaSeparatedFilter.Create(FileName));
end;
end;
btnExport.Enabled := True;
end;
Un Saludo.