ОФИЦИАЛЬНЫЙ ФОРУМ ГРУППЫ КОМПАНИЙ «ТЕХНОКОМ»

ОФИЦИАЛЬНЫЙ ФОРУМ ГРУППЫ КОМПАНИЙ «ТЕХНОКОМ» (http://forum.tk-chel.ru/index.php)
-   Система «АвтоГРАФ»: Программное обеспечение (http://forum.tk-chel.ru/forumdisplay.php?f=4)
-   -   Доработка: Подсчёт колличества групп в отчете (http://forum.tk-chel.ru/showthread.php?t=2148)

CraK 09.08.2012 13:34

Подсчёт колличества групп в отчете
 
Как подсчитать колличество групп в отчет, с помощью команды Line Получается подсчитать колличество строк в группе, необходимо посчитать колличество групп

SK 09.08.2012 19:46

Количество групп в списке транспорта вообще или количество групп в которые входят отмеченные машины ?
И в каком отчете ?

SK 09.08.2012 20:47

Для отчета "Список транспорта". Пример:
Если нужно пронумеровать группы, то в бэнде GroupHeader:GroupHeader1 нужно использовать тот же [Line]
Если, кстати, нужно пронумеровать машины сквозной нумерацией, а не каждый раз с 1 в каждой группе, то вместо [Line] использовать [Line#] (см. http://www.fast-report.com/documenta...rMan-ru/36.htm)


Чтобы вывести количество групп в подвале отчета, нужно выполнить немного более сложную процедуру:
1. Во вкладке "Код" в объявление переменных var добавить переменную подсчета групп, например: grc: integer=0;
2. Выделить бэнд GroupHeader:GroupHeader1 и слева, на вкладке "События" дважды щелкнуть по пустому полю напротив "OnAfterPrint" - при этом в ней создатся обработчик "GroupHeader1OnAfterPrint" и Вас перебросит на вкладку "Код" в тело этого обработчика:
procedure GroupHeader1OnAfterPrint(Sender: TfrxComponent);
begin
end;

В него нужно добавить увеличение переменной на 1 при каждом вызове:
procedure GroupHeader1OnAfterPrint(Sender: TfrxComponent);
begin
grc := grc + 1;
end;


Таким образом, если нет других функций, вкладка "Код" будет выглядеть так:

var
grc: integer=0;

procedure GroupHeader1OnAfterPrint(Sender: TfrxComponent);
begin
grc := grc + 1;
end;

begin
end.

3. Теперь в бэнд подвала отчета, например "ReportSummary:ReportSummary1"
нужно вставить текстовое поле с этой переменной [grc]. Всё.

Один раз разобраться, потом можно творить чудеса с событиями вывода.
http://www.fast-report.com/documenta...rMan-ru/90.htm


Текущее время: 08:09. Часовой пояс GMT.

Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot