Código Delphi
[-]if table1estatus := 'finalizado' then
DBGrid1.canvas.brush.color :=clBlue
else
DBGrid1.canvas.brush.color :=clRed;
DBGrid1.DefaultDrawColumnCell(rect,DataCol,Column,State);
Tenías el DefaultDrawColumnCell dentro del segundo bloque de la condición. Debe ser ejecutado en ambos casos por lo que hay que sacarlo fuera.