Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Thiago Delalibera

[Resolvido] Mudar o nome dos campos no DBGrid?

Recommended Posts

To preenchendo um DBGrid usando uma Query, portanto não posso dar o duplo clique nele, criar o campo e associar ao field name, pois a query iria parar de apresentar os dados no grid, preciso mudar o nome em tempo de execução, conforme a query executa coloca um outro nome de campo e também tem como eu especificar o espaçamento entre campos para que eles não fiquei tao distantes e tenha que ficar deslizando horizontalmente?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Se você usar o 'AS' na sua select deve funcionar, no que se refere ao nome do campo exibido.

 

SELECT CODCLI AS 'CÓDIGO DO CLIENTE', NOMECLI AS 'NOME'
FROM TABELA

A outra questão eu não lembro agora de cabeça o comando... se eu tiver um tempo no trampo dou uma pesquisada depois.

 

[]'s

Compartilhar este post


Link para o post
Compartilhar em outros sites

Se você usar o 'AS' na sua select deve funcionar, no que se refere ao nome do campo exibido.

 

SELECT CODCLI AS 'CÓDIGO DO CLIENTE', NOMECLI AS 'NOME'
FROM TABELA

A outra questão eu não lembro agora de cabeça o comando... se eu tiver um tempo no trampo dou uma pesquisada depois.

 

[]'s

muito obrigado Chrnos

=D

Compartilhar este post


Link para o post
Compartilhar em outros sites

Acho que é isso que você quer:

 

No evento onDrawColumnCell do DBgrid

 

with TDBGrid(NOme_DBGrid) do
		begin
		   Column.Title.color		:= ClMedGray; {cor bakground do título do DBgrid }
		   Column.Title.Font.Style := [fsBold]; { fonte irá estar em negrito }
		   Column.Title.Font.Color := clBlack; { cor da fonte }
		   RowsHeight := 20; { aqui voce especifica a altura da linha no dbgrid }
		   Canvas.Brush.Style := bsClear;
		   case Column.Index of 
								{ aqui vai a quantidade de colunas que voce está selecionando na query }
				0: Column.Title.Caption := 'Denominação 1';
				1: Column.Title.Caption := 'Denominação 2';
				2: Column.Title.Caption := 'Denominação 3';
				3: Column.Title.Caption := 'Denominação 4';
				4: Column.Title.Caption := 'Denominação 5';
				5: Column.Title.Caption := 'Denominação 6';
				6: Column.Title.Caption := 'Denominação 7';
		end;
end;

espero ter ajudado!

abraço

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.