Delphi - Cambiar fuente el DBGrill

Hola a todos, uso el delphi 3.0, y estoy haciendo un programa de contabilidad, y me gusta poner el color de la fuente en rojo si el numero de la celda es negativa, y azul si es positiva.
Un saludo y muchas gracias.

Tienes que utilizar el evento OnDrawColumnCell. El siguiente código es para modificar el aspecto de toda la fila, pero no creo que te resulte difícil deducir cómo se cambia una sola celda (Utiliza el parámetro DataCol).

procedure TFormulario.DBGridDrawColumnCell(
Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);

begin
inherited;

// establezco la condición para la cual quiero remarcar la fila de tdbgrid:
if condicion then begin
// establezco el color del pincel
TDrawGrid(sender).canvas.Brush.Color := clGreen;

// repinto la celda
TdbGrid(sender).DefaultDrawColumnCell(Rect, Datacol, Column, State);
end;
end;

Un saludo.