QuickReport Problem

[zenobi]

Hallo zusammen :cheers: ,

ich habe folgendes Problem: ich möchte ein Report erstellen, der 2 Seiten umfasst. Ich nutze dabei die QuickReport-Komponente. Alles läuft wundderbar mit einer Seite, dh. 1-seitige Reports werden problemlos erstellt. Ich nutze aber für meinen Report über einem Product Informationen aus 3 Tabellen und dort befinden sich insgesamt 200 Features. Um diese 200 Features anzuzeigen fällt Platz auf einem Blatt. Ich brauche zumindest 2 Blätter. Ich weiss aber nicht wie ich solche 2-seitige Reports erstellen kann. Kann mir bitte jemand helfen? Ist das überhaupt möglich?

schöne Grüße aus Dresden,

zenobi

[omata]

Hallo zenobi,

meinst du jetzt zwei Seiten in der Breite?
Normalerweise wird doch automatisch eine neue Seite erzeugt, wenn die aktuelle voll ist. (siehe auch Self.NewPage)

Gruss
Thorsten

[zenobi]

Hallo Torsten :cheers: ,

ich meine keine Breite, sondern ganz normal zweite Seite. Um das Report zu erstellen, muss man zuerst den Layout des Reports vorbereiten. Also bestimmte Features auf dem Formular anordnen. Ich habe erste Seite voll und moechte noch zweite Seite auf die gleiche Weise fuer den Report vorbereiten und erst dann compilieren das ganze.

Gruesse,
zenobi

[mikhal]

Dann schau dir mal die Komponente QRCompositeReport an, damit kannst du mehrere QReports zu einem Report zusammenfügen.

Grüße
Mikhal

[zenobi]

Hallo Mikhal,
erstmal danke für die Antwort :lol:
ja ich habe die Komponente TQRCompositeReport jetzt auch genutzt. Ich habe aber folgendes Problem:

meine genze Report soll aus zwei Seiten bestehen. Ich habe jede QuickRep1-Komponente auf separaten Formular (Form10, Form12) benutzt.

Ich habe folgende Code jetzt:

Delphi-Quellcode:

procedure TForm3.Drucken1Click(Sender: TObject);
begin

MyQuery1.Open;
QRCompositeReport1.Preview;

end;

procedure TForm3.QRCompositeReport1AddReports(Sender: TObject);
begin
  with  QRCompositeReport1 do
   begin

       Reports.Add(Form10.QuickRep1);
       Reports.Add(Form12.QuickRep1);

     end;
end;
end.

Als Ergebnis bekomme ich einen Report, aber statt 2 Seiten, gibt es nur eine Seite, und zwar die zweite Seite zu sehen. Die erste Seite des Reports ist überhaupt nicht angezeigt. Woran kann das liegen?
In meinem Delphi - Buch kann ich nicht dazu finden :(

[mikhal]

Das liegt daran, dass die TCompositeReport die beiden QuickReports einfach aneineder hängt. Du mußt im ObjectInspector die Property ForceNewPage des ersten Bandes auf dem zweiten Report auf True setzen, dann sollte dieses Band auf jeden Fall auf einer neuen Seite ausgedruckt werden.

Grüße
Mikhal