Нумерация в CrossTab

pasko

По-моему вопрос такой был (хотя я не нашел).
Как пронумеровать строки в CrossTab-отчете? Т.е. добавить первой колонку с номерами?

vlad_galaxy

В дизайнере CrossTab сделай 2 колонки и 2 столбца. В обработчике напиши что-то вроде
procedure Cross1OnBeforePrint(Sender: TfrxComponent);
var
row : Integer;
begin
row := 1;
with Cross1 do
begin
AddValue([row,'Ann'], [2001, 2], [1500]);
AddValue([row,'Ann'], [2001, 3], [1600]);
AddValue([row,'Ann'], [2002, 1], [1700]);
Inc(row);
AddValue([row,'Ben'], [2002, 1], [2000]);
Inc(row);
AddValue([row,'Den'], [2001, 1], [4000]);
AddValue([row,'Den'], [2001, 2], [4100]);
end;
end;

pasko

Так не получается:
1. у меня DBCross
2. надо номер ставить как в нормальной таблице ПЕРВОЙ колонкой

|_______ | Янв|Фев|
|1|Петров| 3.50|4.00|
|2|Иванов| 3.10|4.50|

vlad_galaxy

Могу посоветовать изменить логику: предварительно загнать данные во временную таблицу с дополнительным реквизитом, соответствующим порядковому номеру фамилии, а затем оттуда передать на DBCross.
Работает ли DBCross с дополнительными вычисляемыми полями, в документации не описано.

pasko

Я так тоже думал, но увы. И Query и Database находяться в файле FR3. Я сама программа является DLL и служит ТОЛЬКО для печати отчетов (их порядка 60 штук) и подстраивать ее под один отчет не хочется.

pasko

Пришлось вставлять в запрос нумерацию. Кого интерисует это http://www.sql.ru/faq/faq_topic.aspx?fid=126