Изменение состояния из индекса столбца со значением столбца в кросс вкладке DB в Fast Report

Question

У меня есть сумы на вкладке DB Креста в быстром отчете, но я хочу изменить состояние от ColumnIndex до ColumnValue

procedure DBCross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant); 
begin 
if ColumnIndex = 0 then 
if Value <> null then 
Set('Var0', Value) 
else 
Set('Var0', 0); 
if DBCross1.IsGrandTotalColumn(ColumnIndex) then 
Memo.Text := Format('%2.0n', [StrToFloat(VarToStr(value- Get('Var0')))]); 
end; 

enter image description here

Я хочу вместо ColumnIndex = 0. У меня есть, например, если ColumnValue = 'радость' и columnvalue = 'Джек' ...

Answer 1

Попробуйте

procedure Cross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant); 
begin 
    if ColumnValues[0] = '2000' then if ColumnValues[1] = '2' then Memo.Color := clRed;                            
end;