Hola de nuevo muli, te pone todos los registros en negrita, por que en tu codigo le dices que te lo ponga toda la columna 0 en negrita. Debes hacerlo en el evento OnDrawColumnCell.
Código Delphi
[-]
procedure TFListadoAlbFacturas.DBGridDrawColumnCell(
Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if (Column.Index = 0) then
begin
if tabla.fieldbyname('negrita').AsBoolean=True then
begin
DBGrid.Canvas.Font.Style := DBGrid.Canvas.Font.Style + [fsBold];
DBGrid.DefaultDrawColumnCell(rect,DataCol,Column,State);
end;
end;
Saluditos