送分:大家请进!

Question

我还想请大家讨论一下:如果我想改变TSTRINGGRID的个别单元格的颜色,就是有些单元格不变色,有些要变色,能不能实现?
谢谢大家了!!

Answer 1

刚调试完，一个单元格变红色，其它默认的。你可以再扩充一下
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  if (acol=2)and(arow=3) then
     StringGrid1.Canvas.Brush.Color:=clred;
  StringGrid1.Canvas.TextRect(Rect, Rect.Left + 2, Rect.Top + 2,
       StringGrid1.Cells[ACol, ARow]);
end;