Código Delphi [-] if variable>=0 then DBGrid1.canvas.brush.color :=clBlue else DBGrid1.canvas.brush.color :=clRed; end;
if variable>=0 then DBGrid1.canvas.brush.color :=clBlue else DBGrid1.canvas.brush.color :=clRed; end;