1、換整個背景色用Font屬性。
2、不同行不同色情況（例隔行換色）
Procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
Begin
With StringGrid1 Do
Begin
If acol = 0 Then //標題欄退出
exit;
If ARow Mod 2 = 0 Then //偶數欄背景色和字體色
Begin
