EJUNDBGRID改变行颜色 procedure TForm1.EjunDBGrid1CellGetColor(Sender: TObject; ACoord: TPoint; var AColor: TColor);begin if EjunDBGrid1.Cells[3, ACoord.Y].AsFloat < 0 then AColor := clRed else AColor := clWindow;end;