Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi RaveReport 7.7 und .JPG (https://www.delphipraxis.net/151371-ravereport-7-7-und-jpg.html)

Kurt56 14. Mai 2010 19:39


RaveReport 7.7 und .JPG
 
Für den alten Rave 5.08 gab es ein Zusatzteil, mit dem nicht nur .BMP oder .WMF, sondern auch .JPG-Dateien gedruckt werden konnten.

Das hieß nd_jpeg50 für .JPG und nd_gif50 für .GIF

Kann mir jemand sagen, wie ich mit D2010 und Rave 7.7BE diese Dateien (Bilder) drucken kann?

rawi 14. Mai 2010 20:24

Re: RaveReport 7.7 und .JPG
 
Hallo Kurt56,

vielleicht hilft dir das weiter.

Ich habe es bei mir mal so erledigt:

Delphi-Quellcode:
procedure TfrmMain.btnSavePDFClick(Sender: TObject);
var
  PageBitmap: TRavePage;
  imgRPT: TRaveBitmap;
begin
  RvProject1.Open;
  PageBitmap := RvProject1.ProjMan.FindRaveComponent('report1.Page1',nil) as TRavePage;
  imgRPT := RvProject1.ProjMan.FindRaveComponent('Bitmap1', PageBitmap) as TRaveBitmap;
  imgRPT.Image.Assign(imgMain.Picture.Graphic);

  RvSystem1.DefaultDest := rdFile;
  RvSystem1.DoNativeOutput := false;
  RvSystem1.RenderObject := RvRenderPDF1;
  RvSystem1.OutputFileName := strPDFPath + '\' + ChangeFileExt(ExtractFileName(flbMain.FileName), '.pdf');
  RvSystem1.SystemSetups := RvSystem1.SystemSetups - [ssAllowSetup];
  RvProject1.ExecuteReport('report1');

  RvProject1.Close;
end;
Nur das ich hier von einem TImage auf meiner Form ein PDF-File erzeuge.

gruß rawi

Kurt56 14. Mai 2010 20:44

Re: RaveReport 7.7 und .JPG
 
Vielen Dank.
Damit hast Du mir ein großes Problem gelöst.

Kurt


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz