Zweiseitiger Quickreport, wie geht das? *grübel

[dlenz]

Hallo Liebe Delphi-Gemeinde :hi: ,

ich möchte gerne aus meinem Programm heraus einen zweiseitigen Quickreport erstellen. Einseitig ist kein Problem, das läuft alles. Das Formualr, dass damit bedruckt werden soll ist allerdings zweiseitig und ich weiß nicht, wie ich die Zweite Seite gleichzeitig drucken kann. Ein Extra Button für die zweite Seite wäre mir nämlich zu blöde :) Sieht ja nicht so prickelnd aus mit nem zweiten Button. Wie kann ich das am besten machen?

Vielen Dank schonmal vorab für Eure Hilfe

[v2afrank]

Nimm einen QRCompositeReport. Im onAddEreignis fügst Du beide Reports via

Delphi-Quellcode:

    QRCompositeReport1.Reports.Add(Report1);
    QRCompositeReport1.Reports.Add(Report2);

hinzu und druckst das ganze über QRCompositeReport1.Print aus.

[dlenz]

ok, ich habe bisher folgenden code:

Delphi-Quellcode:

procedure Tfrm_main.BitBtn1Click(Sender: TObject);
 var db : string;
begin
 db := ExtractFilePath(ParamStr(0))+'db\db.tdbd';

 liste.TdbQuery1.Close;
 liste.TdbQuery1.DatabaseName := db;

 liste.TdbQuery1.SQL.Clear;
 liste.TdbQuery1.SQL.Add('SELECT * FROM antragsgegner WHERE ID =' + DBEdit1.Text);

 showmessage(liste.TdbQuery1.SQL.text);

 liste.TdbQuery1.Open;

 liste.preview;
end;

wie muss ich dann so vorgehen?