Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.27;
Скачать: CL | DM;

Вниз

Снова Qreport!!!!   Найти похожие ветки 

 
OLa   (2002-05-15 07:05) [0]

Привет, уважаемые мастера!!! есть проблема нужно сначала печатать нечетные страницы, а потом четные, как это сделать? Заранее спасибо


 
Lusha ©   (2002-05-15 09:54) [1]

Написать свою процедуру печати. Сие несложно...


 
Ola   (2002-05-15 10:30) [2]

а есть пример.....


 
Lusha ©   (2002-05-15 11:03) [3]

Создать свое окно предварительного просмотра и навоять там нечто такое...

tRectDraw := Rect(0, 0, Printer.PageWidth, Printer.PageHeight);
with Printer do
begin
BeginDoc;
i := Self.QRPreview.QRPrinter.FirstPage;
while i <= Self.QRPreview.QRPrinter.LastPage do
begin
Canvas.StretchDraw(tRectDraw, Self.QRPreview.QRPrinter.GetPage(i));
NewPage;
inc(i, 2);
end;
i := Self.QRPreview.QRPrinter.FirstPage + 1;
while i <= Self.QRPreview.QRPrinter.LastPage do
begin
Canvas.StretchDraw(tRectDraw, Self.QRPreview.QRPrinter.GetPage(i));
if i < Self.QRPreview.QRPrinter.LastPage then NewPage;
inc(i, 2);
end;



 
Lusha ©   (2002-05-15 11:05) [4]

EndDoc;
end;



Страницы: 1 вся ветка

Текущий архив: 2002.05.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
3-88389
Snake
2002-05-02 14:26
2002.05.27
Не работает Locate!


1-88494
Abu
2002-05-15 17:30
2002.05.27
Как убрать конечные пробелы в строке ?


1-88469
Лёша
2002-05-17 22:31
2002.05.27
Просмотр HTML


3-88322
Vladimir V.N
2002-04-30 08:52
2002.05.27
InterBase and Internet Explorer


14-88627
DRUG
2002-04-19 17:59
2002.05.27
Regedit