Спасите пожалуйста! Кросс отчет в старов стиле.

zot17

Спасите! Уже собрался вешаться. Два дня убил на вот такую проблему:
Необходимо в кросс отчете(генериться с помощью 2-х мастердата) сделать столбцы разной ширены:
1. Если менять width в скрипте или в onGetValue то остальные клетки не сдвигаються и получаеться пустое пространство.
2. Если ставить align = baLeft то все клетки наезжают друг на друга.
Вопрос: Как мне програмно менять ширену столбца во время выполнения.

Спасибо.

kroxa

делается в скрипте обработчиком события- написано в документации

// прячем автоматические агрегаты столбцов сгенерированные FastReport-ом
// если столбец итоговый увеличиваем его ширину
procedure DBCross1OnCalcWidth(ColumnIndex: Integer; ColumnValues: Variant; var Width: Extended);
var
i : word;
begin
if DBCross1.isTotalColumn(ColumnIndex) then
Width := 0
end;

kroxa

ошибся это только для "новых" кросс отчетов