04 lipca 2007

Zapis do pliku PDF[DELPHI]

Jeśli chodzi o raport w rave reports to można to zrobić tak:

1.Umieść na formularzu komponenty RvProject1, RvSystem1, RvRenderPDF1, przycisk (Button).
2. Zmień właściwość Caption przycisku na:
Zapisz raport jako PDF
3. Ustaw właściwość Engine komponentu RvProject1 na RvSystem1.
4. Ustaw właściwość ProjectFile komponentu RvProject1 na plik raportu Raport.rav. (trzeba sobie wcześniej zrobic raport np w rave vusual designerze)
5. Oprogramuj zdarzenie onClick dla przycisku zapisującego raport do pliku *.pdf.

procedure TForm1.Button1Click(Sender: TObject);
begin
//przeznaczeniem raportu ma być plik
RvSystem1.DefaultDest := rdFile;
RvSystem1.DoNativeOutput := false;
//obiektem renderującym będzie komponent RvRenderPDF1
RvSystem1.RenderObject := RvRenderPDF1;
//plik zostanie zapisany pod nazwą plikpdf.pdf w katalogu projektu
RvSystem1.OutputFileName := 'plikpdf.pdf';
RvSystem1.SystemSetups := RvSystem1.SystemSetups - [ssAllowSetup];
//wywołanie metody Execute zapisze raport do pliku plikpdf.pdf
RvProject1.Execute;
end;

1 komentarz:

  1. Niech cię bozia w tłuste i wyszczekane dzieci wynagrodzi czegoś takiego szukałem dokładniej zaczołem szukac 3 minuty temu i patrz juz mam jak zadziała to pasz pifo ale się nie dopominaj :)

    OdpowiedzUsuń