Tweet
Hallo
ich habe folgendes Problem mit QuickReport 3.0:
Ich möchte auf einer DIN A4-Seite zwei DIN A5-Seiten ausdrucken. Wenn ich das Seitenformat A5 einstelle, macht QR natürlich am Ende einen Seitenvorschub und der Rest der A4-Seite bleibt unbedruckt. Diesen Vorschub möchte ich verhindern.
Zur Verdeutlichung: Es handelt sich um Kontenblätter mit Buchungen, wobei oftmals nur eine Buchung auf dem Konto steht. Es ist deshalb unsinnig, dafür eine ganze A4-Seite zu verschwenden. Statt 180 Blättern bräuchte ich dann nur ca. 90 Blätter.
ForceNewpage ist in allen Bändern auf "false" gesetzt. Das DruckProgramm läuft in einer SQL-Schleife ab:
while not query1.EOF do
begin
with query2 do
begin
close;
sql.clear;
sql.Add('SELECT * FROM "KDRUCK1.DB"');
sql.Add('WHERE konto='+query1.fieldbyname
('KTO').ASString);
sql.Add(' OR ggkto='+query1.fieldbyname
('KTO').ASString);
sql.Add('ORDER BY ddatum,beleg');
open;
end;
quickrep1.print;
query1.next;
end;
Wäre nett, wenn jemand dazu eine Lösung hätte.
Danke!
ich habe folgendes Problem mit QuickReport 3.0:
Ich möchte auf einer DIN A4-Seite zwei DIN A5-Seiten ausdrucken. Wenn ich das Seitenformat A5 einstelle, macht QR natürlich am Ende einen Seitenvorschub und der Rest der A4-Seite bleibt unbedruckt. Diesen Vorschub möchte ich verhindern.
Zur Verdeutlichung: Es handelt sich um Kontenblätter mit Buchungen, wobei oftmals nur eine Buchung auf dem Konto steht. Es ist deshalb unsinnig, dafür eine ganze A4-Seite zu verschwenden. Statt 180 Blättern bräuchte ich dann nur ca. 90 Blätter.
ForceNewpage ist in allen Bändern auf "false" gesetzt. Das DruckProgramm läuft in einer SQL-Schleife ab:
while not query1.EOF do
begin
with query2 do
begin
close;
sql.clear;
sql.Add('SELECT * FROM "KDRUCK1.DB"');
sql.Add('WHERE konto='+query1.fieldbyname
('KTO').ASString);
sql.Add(' OR ggkto='+query1.fieldbyname
('KTO').ASString);
sql.Add('ORDER BY ddatum,beleg');
open;
end;
quickrep1.print;
query1.next;
end;
Wäre nett, wenn jemand dazu eine Lösung hätte.
Danke!
Comment