Delphi6 + QReport проблема, может кто сталкивался ...

← →
DiLLeR (2002-12-17 14:38) [0]

Может кто сталкивался с такой проблемой ... Создается отчет без каких либо проблем на превью все выглядит абсолютно прекрасно, но!!! именно при печати на принтере в итоге на бумаге получается так что в rbSummary все числовые значения которые расчитываютя по ходу формирования отчета - больше ровно в два раза!!! ... и только на печать в превью - все выглядит абсолютно нормально, видны правильные значения!!! ... Delphi6 + (QReport 3.0 or QReport 3.5.1) проблема с обоими QReport.

← →
Anatoly Podgoretsky © (2002-12-17 14:48) [1]

Обнули суммы в самом начале, а то если попробуешь больше одного раза печатать то получишь и утроение и более

← →
DiLLeR (2002-12-17 14:54) [2]

... Так подожди ... Числа расчетные храняться в переменных ... потом выводяться в TQRLabel вре обнуляется перед запуском превью ...

← →
Anatoly Podgoretsky © (2002-12-17 15:01) [3]

Наше дело предложить ваше отказаться

← →
DenK_vrtz © (2002-12-17 15:13) [4]

DiLLeR, Anatoly Podgoretsky © совершенно прав!!!
Проверьте события AfterPrint и BeforePrint

Удачи

← →
Johnmen © (2002-12-17 15:17) [5]

1) Печать из превью ?
2) Превью стандартный ?

← →
DiLLeR (2002-12-17 15:22) [6]

Проверить события у чего??? у rbSummary ???

← →
DiLLeR (2002-12-17 15:23) [7]

Да печать только из превью ... и превью стандартный.

← →
DenK_vrtz © (2002-12-17 15:30) [8]

DiLLeR, у rbSummary!

← →
DenK_vrtz © (2002-12-17 15:33) [9]

Хотя, простите, а где расчитываются значения? Уточните!!!

← →
DiLLeR (2002-12-17 15:36) [10]

У rbSummary в BeforePrint как раз и наполняются TQRLabel значениями типа QRLabel20.Caption:="Всего получено: "+inttostr(OstatokCount);
Где OstatokCount - переменная которую Я расчитываю в процессе формирования отчета

← →
DiLLeR (2002-12-17 15:38) [11]

Да сорри .. забыл сказать сами значения расчитываются в rbDetail

← →
DenK_vrtz © (2002-12-17 15:54) [12]

А обнуляется значение где?
А в rbDetail в каких событиях?
В общем, ошибка где-то рядом!!!
Совет один. Во избежания ошибок итоговое значение лучше расчитать до загрузки отчета!

Удачи.

← →
DiLLeR (2002-12-17 16:00) [13]

Значение обнуляется в вызове Превью отчета
rbDetail тоже BeforePrint потому как там тоже идет вывод на печать

А можно ли как - то отловить нажатие кнопки печати???

← →
DiLLeR (2002-12-17 16:17) [14]

Попробовал распечатать два раза ... получается оно к этим переменным добавляет значение которое расчитаось и получается при второй печати уже значение в 3 раза больше

← →
DenK_vrtz © (2002-12-17 16:25) [15]

В общем так!
Как Anatoly Podgoretsky © говорил, так и получилось! :-)
По превью обнуляет, а по BeforePrint rbDetail, когда делается превью считает сумму, когда первый раз печатает к первоначальной сумме прибавляется еще сумма, расчитанная по BeforePrint rbDetail и т.д. и т.д.

Теперь понятно?

← →
DiLLeR (2002-12-17 16:34) [16]

DenK_vrtz © ... да кажеться понял в чем лажа ... щас попробую поправить. Да а что превью вызывается каждый раз когда нажимается кнопка печать??? ....

Большое Всем спасибо!!!

← →
Johnmen © (2002-12-17 16:40) [17]

>DiLLeR (17.12.02 16:34)
>Да а что превью вызывается каждый раз когда нажимается кнопка
>печать??? ....

Нет. Когда нажимается печать происходит вывод на принтер области памяти, где лежит сгенеренный отчет в виде метафайла...

← →
DiLLeR (2002-12-17 16:42) [18]

В QuickRep1BeforePrint стал дополнтельно обнулять расчетные переменные переменные и все заработало как положено!!! ... Всем большое спасибо без Вашей помощи бы не разобрался ..

Вот а не хотел нам верить :-)

Вот и славно! :-)

← →
DiLLeR (2002-12-17 17:04) [21]

Я не сравзу понял где проблема ... %)) ... и не сразу понял то куда Вы Мне указываете :)))))

Но все таки прислушался и запустил печать в третий раз и сразу стало понятно.
А вкратче отчет ничем логически не отличается от любых других фещей, например форм, по сути это и есть форма и если ты тризды проводишь сумирование в форме не обнуляя переменные ты точно также получишь утроенный результат.
Вот если бы у тебя был другой отчет скажем FastReport то там совсем другая модель. А в QR ты имешь правло делать в любом обработчике что угодно, хоть видео показывай или файлы стирай по одной штуке на запись.

← →
DiLLeR (2002-12-17 17:22) [23]

Anatoly Podgoretsky © ... да запустил ... %)) ... Я к сегодняшнему дню уже всяко разно перепробовал не мог понять где собака порылась ... почему отчет выглядит нормально а при печати лажа ...

А в QR мне понравилось, что еще можно внутри Band еще и .Next выполнять и в течении одной ячейки получить две записи ... Мне в этом отчете это очень пригодилось ... я поначалу не думал что он такое позволит ... но попробовал и проканало ...

← →
Сергєєв Володимир (2002-12-17 20:28) [24]

2 DiLLeR
1) Я вот только одного не понял, а на фига тебе надо было че-то расчитывать вручную в обработчике событий, если есть QRExpr ?
Тем более, скорее всего надо было посчитать Тотал.

2) А ты слушай дедушку Anatoly Podgoretsky. Посмотри, ведь он сразу тебе сказал, де собака порылась. Я вот и сам со своим болезненно развитым самомнением до сих пор прислушиваюсь к его советам и считаю его одним из своих учитилей.
Тут вот недавно в форуме на такой фигне попался, с QReport кстати тоже, а он единственный показал куда смотреть надо. Я потом сам багу нашел, да и немного в другом отчасти проблема была, но направление, где копать показа только только он.

Сергєєв Володимир (17.12.02 20:28)
Просто я на нем много шишек набил, включая приведенную :-)

← →
DiLLeR (2002-12-18 14:42) [26]

Сергєєв Володимир ... не совсем ... не тотал нужно было считать там очень извращенный расчет и считает он в заваисисимости от входных данных а на выходе расчета может появляться как integer так и StringList ... и внешний вид ячеек от этого формируется по разному ... вот такая вот фигня ...

Delphi6 + QReport проблема, может кто сталкивался ... Найти похожие ветки