Условное выделение в CrossTab

отредактировано May 2020 Раздел: FastReport 4.0

Есть крос таблица


Никак не получается написать условие, чтобы строка "внос наличных" вместе с данными была другого цвета"


Как должно быть:


FastReport4

Комментарии

  • отредактировано May 2020


  • procedure Cross1OnPrintRowHeader(Memo: TfrxMemoView; HeaderIndexes, HeaderValues, Value: Variant);

    begin

     if HeaderValues[1] <> null then

       if HeaderValues[1] = 'взнос наличных' then

         Memo.Color := clRed;

    end;


    procedure Cross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant);

    begin

     if RowValues[1] <> null then

       if RowValues[1] = 'взнос наличных then                                                           

         Memo.Color := clRed;

    end;

  • procedure Cross1OnPrintRowHeader(Memo: TfrxMemoView; HeaderIndexes, HeaderValues, Value: Variant);

    begin

     if HeaderValues[1] <> null then

       if HeaderValues[1] = 'взнос наличных' then

         Memo.Color := clRed;

    end;

    procedure Cross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant);

    begin

     if RowValues[1] <> null then

       if RowValues[1] = 'взнос наличных then                                                           

         Memo.Color := clRed;

    end;

    Спасибо большое!!!! Всё получилось.

Оставить комментарий