FastReport und PDF Export

[uwewo]

Da war mal wieder einer schneller!

Hier ein Bsp. für FreeReport keine Ahnung ob identisch mit FastReport.
Den ExportFilter für PDF's gibt im www nach der Adresse kann ich schauen.

Das nur falls untenstehendes Bsp. nicht funktioniert.

Delphi-Quellcode:

procedure TForm.PDFBtnClick(Sender: TObject);
begin
    Table.Open;
    Report.LoadFromDB(FormTable,MKey,FormularCB.Text,2);
    Report.PrepareReport;
    Table.close;

    SaveDialog.Filter := 'Acobat Reader (*.pdf)|*.PDF';
    if SaveDialog.Execute then
       Report1.ExportTo(TfrTNPDFExportFilter ,SaveDialog.FileName);
end;

TfrTNPDFExportFilter ist der Filtername sieht sehr wahrscheinlich bei Dir anders aus.

Bin mir nicht sicher ob das Dir wirklich hilft, vielleicht aber doch.

Uwe