Rave einzelne Seiten drucken

[merlin17]

Oliver,

aus meinem Rave-Buch (dass evtl. noch im Juni, endlich , fertig wird)....

Delphi-Quellcode:

procedure TFExport.DruckReportDetails;
var
  OldEngine: TRpComponent;
  ReportStream: TMemoryStream;
  RvNDRWriter1: TRvNDRWriter;
  RvRenderPrinter2: TRvRenderPrinter;
begin
  ReportStream := TMemoryStream.Create;
  RvRenderPrinter1 := TRvRenderPrinter.Create(nil);
  RvNDRWriter1 := TRvNDRWriter.Create(nil);
  with RvNDRWriter1 do
  begin
    StreamMode := smUser;
    Stream := ReportStream;
  end;
  OldEngine := RM.RavePro.Engine;
  RvNdrWriter1.Title := 'TITEL_WINDOWS_DRUCKMANAGER';
  RM.RavePro.Engine := RvNDRWriter1;
  RM.RavePro.ExecuteReport('RepVerschiedeneSeiten');
  RvRenderPrinter1.NDRStream := ReportStream;
  RvRenderPrinter1.RenderPage(1);
  RvRenderPrinter1.RenderPage(4);
  RvRenderPrinter1.RenderPage(2);
  RvRenderPrinter1.RenderPage(2);
  RvRenderPrinter1.RenderPage(4);
  RvRenderPrinter1.RenderPage(3);
  RM.RavePro.Engine := OldEngine;
  RvRenderPrinter1.Free;
  RvNDRWriter1.Free;
  ReportStream.Free;
  OldEngine.Free;
end;

in dem Beispiel habe ich den Ausdruck dargestellt, analog geht es auch mit PDF-Rendern, of course <g>


thomas, TeamNevrona