ich blick da noch nicht durch
Die Vorschau mache ich so:
Delphi-Quellcode:
procedure TListe1.Vorschau(ReportNr :string);
var
MeinNDRStream: TMemoryStream;
begin
MeinNDRStream := TMemoryStream.Create;
rvproject1.SelectReport(ReportNr,true);
RvProject1.Open;
RvProject1.Engine := RvNDRWriter1;
with RvNDRWriter1 do
begin
StreamMode := smUser;
Stream := MeinNDRStream;
end;
RvProject1.Execute;
MeinNDRStream.Position := 0;
with RvRenderPreview1 do
begin
ScrollBox := FPreview.ScrollBox1;
NDRStream := MeinNDRStream;
Render;
end;
showmessage('Anzahl der Seiten: ' + IntToStr(RvRenderPreview1.Pages));
FPreview.ShowModal;
end;
Danach rufe ich auf:
RvProject1.ExecuteReport('Report1');
Der Ausdruck klappt aber noch nicht.
Es passiert gar nichts.
Zitat:
-> hier die RvSystem oder nil eintragen; that's all
Das verstehe ich nicht. Kannst du mir mit etwas Code aushelfen?