[DELPHI] FORMATANDO O TÍTULO DAS COLUNAS DO DBGRID

O componente DBGrid é muito utilizado pelos desenvolvedores Delphi para apresentar dados de um DataSet para o usuário, seja esses dados resultado de um select no banco de dados, registros temporários, etc.

Neste post irei mostrar como alterar a formatação do título da coluna do DBGrid.

Para implementar essa rotina, iremos utilizar o evento OnTitleClick do DBGrid.

procedure TForm1.DBGrid1TitleClick(Column: TColumn);

var

  I: Integer;

begin

  // retira a formatação de todas as colunas

  for I := 0 to DBGrid1.Columns.Count - 1 do

  begin

// retira a formatação negrito/itálico

    DBGrid1.Columns[I].Title.Font.Style := [];

// altera a cor da fonte do título para Black

    DBGrid1.Columns[I].Title.Font.Color := clBlack;

  end;

  // formata o título da coluna em negrito/itálico

  Column.Title.Font.Style := [fsBold, fsItalic];

  // altera a cor da fonte do título para Red

  Column.Title.Font.Color := clRed;

end;

Gostou? Deixe seu comentário... Convido você a seguir meu blog, sua presença é bem vinda!【ツ】