Filtro por data utilizando MaskEdit

Delphi

29/08/2007

[quote:5fee2db914=´Moderação´][color=red:5fee2db914]Tópico bloqueado por Massuda

Tópico duplicado. Por favor, mantenha a discussão no tópico original...
http://forum.devmedia.com.br/viewtopic.php?t=89647[/color:5fee2db914][/quote:5fee2db914]Pessoal,

Estou tendo dificuldades em fazer um filtro por data utilizando o MaskEdit.
O problema é o seguinte: na tela do programa, o usuário deverá digitar uma data (data nascimento) que deverá ser filtrada através do clique de um botão. Ou seja, ao clicar no botão, somente as pessoas que possuírem a data informada no componente, deverão aparecer no DBGrid da tela. Não há período de datas. É somente uma data que deverá ser informada. E o componente, necessariamente, tem quer ser o MaskEdit. Estou utilizando o banco Access.

Será que alguém poderia me ajudar?

Obrigado.


Sgrandini

Sgrandini

Curtidas 0

Respostas

Daykas

Daykas

29/08/2007

Var
dt_nasc: String;
begin
dt_nasc := maskedit1.text;
query1.Close;
query1.SQL.Clear;
query1.SQL.Text := ´SELECT * FROM mailing_contato WHERE dt_nasc >=:pdt_nasc order by nome asc´;
query1.ParamByName(´pdt_nasc´).AsDateTime := StrToDate(dt_nasc);
query1.Open;
showmessage(´Registros: ´ + IntToStr(query1.RecordCount));



Divirta-se!!!


GOSTEI 0
POSTAR