AdvStringGrid 单元格字体颜色、背景颜色

procedure TForm5.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  AdvStringGrid1.RowCount := ;//一共50行0..49
  AdvStringGrid1.ColWidths[] := ;//改变第一列的宽度。
  AdvStringGrid1.AddCheckBoxColumn();//表示这一列都需要复选框
  //第0行是标题头,所以从1..49开始
  for I :=  to  do
  begin
    //AdvStringGrid1.AddCheckBox(0, I, False, False); //可以写在这里, 表示某个单元格 需要增加 复选框
    AdvStringGrid1.Cells[,I] := '第二列' + I.ToString;
    AdvStringGrid1.Cells[,I] := '第三列' + I.ToString;
  end;
end;

procedure TForm5.Button2Click(Sender: TObject);
begin
  AdvStringGrid1.Colors[,] := clBlue;//直接把某一个单元格的背景色修改

  AdvStringGrid1.ColorsTo[,] := clBlue; //从白色渐变到蓝色

  AdvStringGrid1.FontColors[,] := clRed; //修改某一个单元格字体的颜色

  AdvStringGrid1.Color := clYellow; //整体背景变成黄色
end;