(1)分行不同颜色设置;在DBGridEh1DrawColumnCell中写; if ADOQuery1.RecNo mod 2=0 then begin DBGridEh1.Canvas.Font.Color := clRed; DBGridEh1.DefaultDrawColumnCell(Rect, DataCol, Column, State); end else begin DBGridEh1.Canvas.Font.Color := clGreen;