anchor.diff:      C.ColumnType := act_account_number;
       C.width := -1;
     end;
  -  DrawGrid.Canvas.Font.Color:=clBlack;
  +  DrawGrid.Canvas.Font.Color:=clWindowText;
     if (ARow=0) then begin
       // Header
       s := CT_ColumnHeader[C.ColumnType];
  
positive.code:   deviation : Real;
    hr_base : Int64;
  begin
    DrawGrid.Canvas.Font.Color:=clBlack;
    if (ARow=0) then begin
      // Header
      case ACol of
  
negative.code: Var s : String;
    opr : TOperationResume;
  begin
    DrawGrid.Canvas.Font.Color:=clWindowText;
    opr := CT_TOperationResume_NUL;
    Try
    if (ARow=0) then begin
  