 |
ActiveDelphi .: O site do programador Delphi! :.
|
Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
Karrasco Aprendiz

Registrado: Quinta-Feira, 6 de Março de 2008 Mensagens: 143
|
Enviada: Seg Mai 12, 2008 11:43 am Assunto: Ordenar Access! |
|
|
Olá programadores! Minha dúvida é a seguinte:
Uso bd access, e preciso ordenar os dados de 2 tabelas, uma ordenando alfabeticamente, e outra, numéricamente. Uso 1 ADOConnection, e 1 ADOQuery para cada tabela, e um 1 DataSource para cada tabela. Quero que ele faça a ordenação após o clique em um botão especifico, onde ele ordenará os dados, e jogará no QReport para a impressão do relatório.
Como faço??
Desde já agradeço a colaboração!! |
|
Voltar ao Topo |
|
 |
BugsBunny Mestre


Registrado: Quarta-Feira, 19 de Novembro de 2003 Mensagens: 890
|
Enviada: Seg Mai 12, 2008 3:42 pm Assunto: Re: Ordenar Access! |
|
|
Karrasco escreveu: | Olá programadores! Minha dúvida é a seguinte:
Uso bd access, e preciso ordenar os dados de 2 tabelas, uma ordenando alfabeticamente, e outra, numéricamente. Uso 1 ADOConnection, e 1 ADOQuery para cada tabela, e um 1 DataSource para cada tabela. Quero que ele faça a ordenação após o clique em um botão especifico, onde ele ordenará os dados, e jogará no QReport para a impressão do relatório.
Como faço??
Desde já agradeço a colaboração!! |
Ora velinho,
Na montagem de sua query vc pode colocar um sentença do tipo:
select campos from tabela where condição order by lista
Vc mantem num constante a base de sua consulta, por exemplo:
Código: | const
_SQL_Base = 'select * from Clientes order by ';
procedure TForm1.ClicouNome(Sender : TObject)
begin
ADOQuery.Close
ADOQuery.SQL.Text := _SQL_Base + 'nome_cli';
AdoQuery.Open;
end; |
Essa á apenas uma sugestão, dependendo de como vc projetou sua aplicação, vc pode desenvolver rotinas mais eficientes.
Conforme for, mostre algum código.
Bugs |
|
Voltar ao Topo |
|
 |
Karrasco Aprendiz

Registrado: Quinta-Feira, 6 de Março de 2008 Mensagens: 143
|
Enviada: Ter Mai 13, 2008 10:23 am Assunto: |
|
|
Vlw amigo!!
Vou usar essa dica...caso não consiga eu volto a postar!!
Obrigado!! |
|
Voltar ao Topo |
|
 |
|
|
Enviar Mensagens Novas: Proibido. Responder Tópicos Proibido Editar Mensagens: Proibido. Excluir Mensagens: Proibido. Votar em Enquetes: Proibido.
|
|