FastReport + DelphiXE8交叉表,粗体行

时间:2017-03-13 22:00:40

标签: fastreport

是否可以在Delphi的FastReport中的交叉表中加粗一些行? 我动态地使用MS SQL过程创建报告。 对于连续的某些值(特别是ID),我想快速加粗整行。 行数是常量,但数据的列数不是。 下面的例子,当Salary = Ben然后Ben的行应该加粗。 Example pic

1 个答案:

答案 0 :(得分:0)

在报告的脚本中使用:

procedure Cross1OnPrintRowHeader(Memo: TfrxMemoView; HeaderIndexes, 

HeaderValues, Value: Variant);
begin
  if Value = 'Ben' then Memo.Font.Style := fsBold;                                                                                                 
end;

procedure Cross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant);
begin
  if RowValues[0] = 'Ben' then Memo.Font.Style := fsBold;                                                              
end;