DBGrill o CRDBGrill

[emeritos]

Muchas gracias, pero lo que pretendo es que la fila selecionada, ademas de ponerse toda en un color (elegido por mi), sobre salte sobre las demas poniendose mas grande, es decir en un tamaño de letra mas grande.

Gracias.

[loxod]

Pues en lo mismo, solo tienes que agregar un par de lineas mas:

Código Delphi [-]
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
   If (gdFocused in State) then
     begin
        dbgrid1.canvas.brush.color := clYellow;
        dbgrid1.Canvas.Font.Size := 10;
        dbgrid1.Canvas.Font.Style := [fsBold]
     end;

    dbgrid1.DefaultDrawColumnCell(rect,DataCol,Column,State)
end;