QuickReport - UserDesigned-Reportvorlage verwenden!

[BadenPower]

Hallo zusammen,

ich glaube, ich sehe den Wald vor lauter Bäumen nicht.


Folgendes Problem:
Ich habe ein Programm in dem ich die Datenbankeinträge auslese und über "QuickRep" drucken lasse.

Funktioniert alles auch einwandfrei.

Nun wollte ich die Möglichkeit schaffen, dass man das Ausgabeformular selbst editieren kann, um somit die Möglichkeit zu haben eine eigene Reportvorlage zu generieren.

Ansatzpunkt war QREditor, welcher mir dann eine ".qr-Datei" speichert.

Aber wie verwende ich jetzt diese Vorlage?

Oder bin ich komplett auf dem Holzweg.


vielen Dank
BadenPower

[jaevencooler]

Moin, Moin,

dafür benötigst Du auch den Designer dazu, welche QR version benutzt Du ?
Mit dem Designer kannst Du dann vorhandene QR Dateien laden, bzw. erstellen.


Gruß
Michael

[BadenPower]

Hallo Michael,

ersteinmal herzlichen Dank.

Zitat:

Zitat von jaevencooler (Beitrag 1281330)

welche QR version benutzt Du ?

5.02

Zitat:

Zitat von jaevencooler (Beitrag 1281330)

dafür benötigst Du auch den Designer dazu,

Das ist genau das, was ich gemeint habe.

Vor lauter Bäumen den Wald nicht sehen.

Da ich bisher nur Reports direkt erstellt habe, hatte ich das Designer-Packet gar nicht installiert.

Zitat:

Zitat von jaevencooler (Beitrag 1281330)

Mit dem Designer kannst Du dann vorhandene QR Dateien laden, bzw. erstellen.

Das Laden und Ausdrucken geht auch mit dem QRLoader. Hat den Vorteil, dass man nicht den ganzen Overhead des Designers in der Print- und Preview-Anwendung hat.


viele Grüße

[jaevencooler]

Moin,

also wenn du möchtest das deine Nutzer den Report erzeugen / bearbeiten können, dann must Du den Designer nutzen :

Delphi-Quellcode:

procedure EditNewReport(RepName : string;var aReport : TMemoryStream; MyRowID : string);
begin
  ReportDrucken_w := TReportDrucken_w.Create(Screen.ActiveForm);

  if (aReport <> nil) then begin
    ReportDrucken_w.ReportDesignerDialog1.BeforeOpenDataset := nil;
    if aReport.Size = 0 then
      ReportDrucken_w.ReportDesignerDialog1.NewReport_InStream(aReport,RepName,False)
    else
      ReportDrucken_w.ReportDesignerDialog1.EditReport_FromStream(aReport,RepName);

    ReportDrucken_w.ReportDesignerDialog1.BeforeOpenDataset := ReportDrucken_w.ReportDesignerDialog1BeforeOpenDataset;
  end;

  ReportDrucken_w.Free;
end;

so lade ich den Report aus einem Stream, damit die Nutzer diesen dann bearbeiten können
wenn es keinen Stream gibt, dann erzeuge ich einfach einen neuen Report.

Klappt ganz prima !

wenn Du nur drucken willst, dann reicht der Loader.

Cu Michael