QuickRep: Как сделать две копии документа на 1 странице?

← →
Tahion2 (2004-02-03 23:00) [0]

Delpi6
Создаю (частично вручную, частично программно) документ размером А5 (т.е. половилу обычного листа для принтера формата А4).
Как сделать так, чтоб на листе формата А4 печаталось две копии моего документа?

← →
Tahion2 (2004-02-05 00:30) [1]

Неужели никто не знает?

← →
Dmitriy O. © (2004-02-05 07:57) [2]

Если хошь чтобьы печаталось два раза в одном. Ну типа там бланки и т.д. То надо делать так делать два раза на одном. И печатать в A4.

← →
ЮЮ © (2004-02-05 08:08) [3]

Перевернуть страницу, всё равно её резать - документы-то разные

← →
Tahion2 (2004-02-06 00:29) [4]

А как перевернуть страницу? (Руками не предлагать!)

> Если хошь чтобьы печаталось два раза в одном. Ну типа там
> бланки и т.д. То надо делать так делать два раза на одном.
> И печатать в A4.

Т.е. способа автоматом сделать копию нет?

← →
Anatoly Podgoretsky © (2004-02-06 09:02) [5]

Ctrl+C, Ctrl+V

← →
Tahion2 (2004-02-06 09:13) [6]

>Ctrl+C, Ctrl+V
Я сейчас так и делаю, вот только кода писать приходится несколько листов дополнительно. Хочтелось бы автоматом!

Кода 0

Вот жизненный вариант. В наборе данных две идентичные записи, или в стринггриде, не знаю, что там у тебя...

procedure TForm1.Button1Click(Sender: TObject);
begin
QRCompositeReport1.Preview
end;

procedure TForm1.QRCompositeReport1AddReports(Sender: TObject);
begin
QRCompositeReport1.Reports.Add(QuickRep1);
QRCompositeReport1.Reports.Add(QuickRep1);
end;

Вот и все

QuickRep: Как сделать две копии документа на 1 странице? Найти похожие ветки