Delphi DBGrid图显用法
procedure TForm10.DBGrid1DrawColumnCell(Sender: ...