(Resolvido) Editar Titulo de um DBgrid em tempo de execução

[laine]

olá Pessoal estou precisando editar titulos em um dbgrid em tempo de execução e esta mais complicado do que pensei . será que alguém pode me ajudar?

[Jhonas]

olá Pessoal estou precisando editar titulos em um dbgrid em tempo de execução e esta mais complicado do que pensei .

É mais simples do que voce pensa.

procedure TForm1.Button1Click(Sender: TObject);
begin
   DBGrid1.Columns[0].FieldName := 'PAPEL'; // nome verdadeiro do Campo da sua tabela
   DBGrid1.Columns[1].FieldName := 'COD';  // nome verdadeiro do Campo da sua tabela
   DBGrid1.Columns[2].FieldName := 'NUM';  // nome verdadeiro do Campo da sua tabela


   DBGrid1.Columns[0].Title.Caption := 'BOLA';  // novo nome do campo PAPEL será BOLA
   DBGrid1.Columns[1].Title.Caption := 'PRATO';  // novo nome do campo COD será PRATO
   DBGrid1.Columns[2].Title.Caption := 'SABONETE';  // novo nome do campo NUM  será SABONETE
end;

obs: Os valores de Columns representa os indices dos campos de sua tabela ... começando por 0

abraço

[laine]

olá Pessoal estou precisando editar titulos em um dbgrid em tempo de execução e esta mais complicado do que pensei .

É mais simples do que voce pensa.

procedure TForm1.Button1Click(Sender: TObject);
begin
   DBGrid1.Columns[0].FieldName := 'PAPEL'; // nome verdadeiro do Campo da sua tabela
   DBGrid1.Columns[1].FieldName := 'COD';  // nome verdadeiro do Campo da sua tabela
   DBGrid1.Columns[2].FieldName := 'NUM';  // nome verdadeiro do Campo da sua tabela


   DBGrid1.Columns[0].Title.Caption := 'BOLA';  // novo nome do campo PAPEL será BOLA
   DBGrid1.Columns[1].Title.Caption := 'PRATO';  // novo nome do campo COD será PRATO
   DBGrid1.Columns[2].Title.Caption := 'SABONETE';  // novo nome do campo NUM  será SABONETE
end;

obs: Os valores de Columns representa os indices dos campos de sua tabela ... começando por 0

abraço

muito Obrigada funcionou perfeitamente