![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отчет с отчета (QuikReport)
Mintos © (2006-07-20 12:57:00)Кто может подсказать, как можно поучить все выведенные значения QRExpr`а в StringList формате?
Если непонятно спрашивайте, опишу конкретно для чего это надо...
Mintos (2006-07-20 15:32:00) [1]В моем случае результат текст (strResult).
Сенкс, очень помог.
Виталий Панасенко (2006-07-20 15:02:00) [2]procedure TForm1.DetailBand1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
begin
FSum := FSUm + QRExpr1.Value.dblResult;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
FSum := 0;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
QuickRep1.PreviewModal;
Button1.Caption := FloatToStr(FSum);
end;
Mintos (2006-07-20 14:29:00) [3]Дело в том что отчет с прим. QR`а был давно уже написан, в нем имеется QRExpr, Expression которого задается програмно и зависит от очень многих факторов. Переписывать логику QR`а(Expression) в паскаль займет очень много времени...
Поэтому думаю оптимальным пока вариантом будет получить выходные данные из QRExpr`а в StringList (Мне нужно этот же отчет выводить и в Worde).
Sergey13 (2006-07-20 13:00:00) [4]А зачем для этого QR? Пробегись по "отчетному" датасету да посчитай по такому же выражению.