Ordenando dbgrid
16/12/2003
0
FIZ UM SELECT CODIGO, DESCRICAO FROM TABELA....
ESTOU UTILIZANDO O DBGRID, E QUERO QUE QUANDO CLICAR NO
TITULO CODIGO O DBGRID ORDENA O CODIGO, QUANDO CLICAR
NA DESCRICAO ORDENA A DESCRICAO...
COMO EU FACO ISSO
ESTOU UTILIZANDO QUERY
EVANDRO
ESTOU UTILIZANDO O DBGRID, E QUERO QUE QUANDO CLICAR NO
TITULO CODIGO O DBGRID ORDENA O CODIGO, QUANDO CLICAR
NA DESCRICAO ORDENA A DESCRICAO...
COMO EU FACO ISSO
ESTOU UTILIZANDO QUERY
EVANDRO
Evandro_araujo
Curtir tópico
+ 0
Responder
Posts
16/12/2003
Pr.mas
No DBGrid não sei, mas no RXDBGrid é muito fácil.
Em primeiro lugar distribua sua sentença sql em varias linhas na query assim:
Select *
From Tabela
Where
Order by
Asc
Isso facilitará quando você quiser tornar Ascendente/Descendente
Eu uso a biblioteca RXLib pois ela contem um evento chamado OnTitleBtnClick e também permite que a linha título seja como botões quando clicado.
Basta Basta mudar a propriedade TitleButtons para true.
Em seguida vá no evento OnTitleBtnClick e digite
try
application.processmessages;
Tabela.Close;
Tabela.SelectSQL[3]:=´Order by ´+Campo;
Tabela.Open;
finally
Result := True;
end;
Substituindo Tabela pelo nome da tabela e campo pela instrução
Field.FieldName e pronto pode testar.
Espero ter ajudado
pr.mas
Em primeiro lugar distribua sua sentença sql em varias linhas na query assim:
Select *
From Tabela
Where
Order by
Asc
Isso facilitará quando você quiser tornar Ascendente/Descendente
Eu uso a biblioteca RXLib pois ela contem um evento chamado OnTitleBtnClick e também permite que a linha título seja como botões quando clicado.
Basta Basta mudar a propriedade TitleButtons para true.
Em seguida vá no evento OnTitleBtnClick e digite
try
application.processmessages;
Tabela.Close;
Tabela.SelectSQL[3]:=´Order by ´+Campo;
Tabela.Open;
finally
Result := True;
end;
Substituindo Tabela pelo nome da tabela e campo pela instrução
Field.FieldName e pronto pode testar.
Espero ter ajudado
pr.mas
Responder
Clique aqui para fazer login e interagir na Comunidade :)