TDBGrid

[didier]

Hola amigos del club, quien me puede ayudar por favor
como puedo dejar una linea de un TDBGrid de otro color o en negrilla
ojo es solo un registro o varios no todos.
gracias

[marcoszorrilla]

Aquí tienes una muestra, cambia la condición y listo:

Código Delphi [-]
 procedure TfrConClientes.DBGrid1DrawColumnCell(Sender: TObject;
   const Rect: TRect; DataCol: Integer; Column: TColumn;
   State: TGridDrawState);
 begin
    if DmHH.CliBaja.Value = True then
    begin
    DBGrid1.Canvas.Brush.Color :=clInfobk;
    Dbgrid1.Canvas.Font.Style:=[fsBold];
    DBGrid1.Canvas.Font.Color:=ClBlack;
    DBGrid1.DefaultDrawColumnCell(Rect,Datacol,Column,State);
    end;
 end;

Un Saludo.