Exportar reporte a pdf de crystal desde delhpi

[GUILLERMOMEJIA]

//** Supongo que estás utilizando Crystal Reports VCL component.

//* Primero el nombre del reporte
Shopping.ReportName:='C:\Program Files\SitiSystems\SmartQuote\DetProZeusGen.rpt';

//** Luego te deshaces de los datos antigüos:
Shopping.DiscardSavedData;

//** Luego los cambios que quieras hacer al archivo de reporte
Shopping.ReportName:='C:\Program Files\SitiSystems\SmartQuote\DetProZeusGen.rpt';
Shopping.ReportTitle:='Payment Order: '+inttostr(Qry_ult.fieldbyname('id').value)+' '+Qry_BusSup.fieldbyname('supplier').Value;
Shopping.Paramfields[0].currentvalue:=dbgrid1.Fields[0].Value;
Shopping.Paramfields[1].currentvalue:=Qry_BusSup.fieldbyname('supplier').Value;

//** Luego lo demás
Shopping.Refresh;

//** Y aquí es donde te estás equivocando:
Shopping.ExportOptions.FileType := AdobeAcrobatPDF;

//** Aquí decides si quieres que se abra Acroban o que se guarde como archivo: (toApplication, toFile, toEmailViaMapi... etc)
Shopping.ExportOptions.Destination := toApplication;

//** Si el anterior lo pusiste tofile, la siguiente línea dirá donde:
Shopping.ExportOptions.FileName :=
'\\Sitiserver\users\PaymentOrder\'+inttostr(Qry_ult.fieldbyname('id').value)+' '+Qry_BusSup.fieldbyname('supplier').Value+'.PDF';

//*** Y ahora sí: TIENES QUE USAR EXPORT:
Crpe_REPORTE.Refresh;
Crpe_REPORTE.Export;