ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Ordenar Access!

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
Karrasco
Aprendiz
Aprendiz


Registrado: Quinta-Feira, 6 de Março de 2008
Mensagens: 143

MensagemEnviada: Seg Mai 12, 2008 11:43 am    Assunto: Ordenar Access! Responder com Citação

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
Ver o perfil de Usuários Enviar Mensagem Particular
BugsBunny
Mestre
Mestre


Registrado: Quarta-Feira, 19 de Novembro de 2003
Mensagens: 890

MensagemEnviada: Seg Mai 12, 2008 3:42 pm    Assunto: Re: Ordenar Access! Responder com Citação

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
Ver o perfil de Usuários Enviar Mensagem Particular
Karrasco
Aprendiz
Aprendiz


Registrado: Quinta-Feira, 6 de Março de 2008
Mensagens: 143

MensagemEnviada: Ter Mai 13, 2008 10:23 am    Assunto: Responder com Citação

Vlw amigo!!
Vou usar essa dica...caso não consiga eu volto a postar!!
Obrigado!!
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB