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

Registrado: Quarta-Feira, 6 de Junho de 2018 Mensagens: 10
|
Enviada: Ter Ago 28, 2018 12:27 pm Assunto: Delphi Filtrar valores por intervalos data e hora banco Acce |
|
|
Boa noite amigos !
Por favor !
Tenho um sistema de cadastro com banco de dados access, neste banco eu tenho um tabela chamada: clientes, e nesta tabela um campo chamado: data, gostaria com ajuda dos colegas criar um filtro onde eu consiga filtrar intervalos de valores:
EX: tenho neste campo data, valores da seguinte forma:
12/04/2018 04:10:40
12/04/2018 07:10:00
12/04/2018 08:10:40
12/04/2018 09:10:40
12/04/2018 11:10:40
12/04/2018 12:10:40
12/04/2018 13:10:40
12/04/2018 14:10:40
12/04/2018 15:10:40
12/04/2018 18:10:40
Como exemplo Gostaria de filtra os intervalos inicio= 12/04/2018 04:10:40, e fim= 12/04/2018 12:10:40, assim trazendo os seguintes valores neste espaço de tempo:
inicio= 12/04/2018 04:10:40, 12/04/2018 07:10:00, 12/04/2018 08:10:40, 12/04/2018 09:10:40, 12/04/2018 11:10:40 e Fim = 12/04/2018 12:10:40.
gerando assim o relatório que preciso.
OBS.: utilizo
ADOConnect = conexão com banco = Access
ADOQuery = para consultas
Obs.: eu já utilizo um filtro, porem, consigo filtra o dia todo, gostaria de filtrar por intervalos.
Desde já agradeço ajuda !! |
|
| Voltar ao Topo |
|
 |
imex Moderador

Registrado: Sexta-Feira, 7 de Janeiro de 2011 Mensagens: 11666
|
Enviada: Ter Ago 28, 2018 2:37 pm Assunto: |
|
|
Bom dia,
Experimente deixar a query mais ou menos dessa forma na propriedade SQL da ADOQuery (via código ou via Object Inspector):
| Código: | | select * from Clientes where Data between :DataIni and :DataFim |
E utilize código para passar o intervalo para os parâmetros da query mais ou menos conforme o exemplo abaixo:
| Código: | ADOQuery1.Parameters.ParamByName('DataIni').Value := EncodeDateTime(2018, 04, 12, 4, 10, 40, 0);
ADOQuery1.Parameters.ParamByName('DataFim').Value := EncodeDateTime(2018, 04, 12, 12, 10, 40, 0); |
Espero que ajude
_________________
Assinatura: https://www.imoveisemexposicao.com.br/imoveis-venda-guarulhos-residencial-apartamento |
|
| Voltar ao Topo |
|
 |
|
|
Enviar Mensagens Novas: Proibido. Responder Tópicos Proibido Editar Mensagens: Proibido. Excluir Mensagens: Proibido. Votar em Enquetes: Proibido.
|
|