Шапка Cross-tab

Абис

Не поможете решить проблему. Описание находится в файле. Не получается проконотролировать высоту шапки в Cross-Tab. Заранее спасибо

gpi

К сожалению, без правки исходников frxCross.pas не обойтись
Придётся добавить в TfrxCustomCrossView поля
FMaxHeight: Integer;
FMinHeight: Integer;
свойства MaxHeight, MinHeight
property MaxHeight: Integer read FMaxHeight write FMaxHeight default 100;
property MinHeight: Integer read FMinHeight write FMinHeight default 0;
Модифицировать процедуры CalcSizes для TfrxCrossHeader, TfrxCrossColumnHeader, TfrxCrossRowHeader
procedure CalcSizes(MaxWidth, MinWidth, MaxHeight, MinHeight: Integer; AutoSize: Boolean);
Добавить проверку на MaxHeight, MinHeight в
procedure TfrxCrossColumnHeader.CalcSizes(MaxWidth, MinWidth, MaxHeight, MinHeight: Integer; AutoSize: Boolean);
...
if Item.FSize.X < MinWidth then
Item.FSize.X := MinWidth;
if Item.FSize.X > MaxWidth then
Item.FSize.X := MaxWidth;

if Item.FSize.Y < MinHeight then // добавлено
Item.FSize.Y := MinHeight;
if Item.FSize.Y > MaxHeight then
Item.FSize.Y := MaxHeight;
...
procedure TfrxCrossRowHeader.CalcSizes(MaxWidth, MinWidth, MaxHeight, MinHeight: Integer; AutoSize: Boolean);
...
if Item.FSize.X < MinWidth then
Item.FSize.X := MinWidth;
if Item.FSize.X > MaxWidth then
Item.FSize.X := MaxWidth;

if Item.FSize.Y < MinHeight then // добавлено
Item.FSize.Y := MinHeight;
if Item.FSize.Y > MaxHeight then
Item.FSize.Y := MaxHeight;
...
И в конструктор
constructor TfrxCustomCrossView.Create(AOwner: TComponent);
...
FMaxWidth := 200;
FMaxHeight := 100; // добавлено
...
P.S. Рекомендация для FR4, но, думаю, подойдёт с небольшими изменениями и для FR3

Абис

К сожалению, без правки исходников frxCross.pas не обойтись
[/quote]
А я сам смогу править этот файл? Что-то я его не нашел на диске!

gpi

В FR Professional и FR Enterprise должен быть. В FR Basic и FR Standart исходников нет

Абис

gpi написал: »

В FR Professional и FR Enterprise должен быть. В FR Basic и FR Standart исходников нет

Жаль, у меня FR Standart

gpi

Тогда просите Александра Цыганенко, чтобы он внёс изменения в следующие билды FR, при условии, что у Вас FR4, а не FR3