Fórum pesquisa por datas delphi #603535
09/07/2019
0
se alguem puder ajudar fico grato obrigado.
with dm.sql_sangria do
begin
close;
sql.Clear;
sql.Add('select * from sangria');
sql.Add('where s_data between :data_ini and :data_fim');
ParamByName('data_ini').Value := FormatDateTime('yyyy-mm-dd',data_ini.Date );
ParamByName('data_fim').Value := FormatDateTime('yyyy-mm-dd',data_fim.Date );
open;
if RecordCount > 0 then
end;
Anderson Saldanha
Curtir tópico
+ 0Posts
10/07/2019
Manoel Junior
Gostei + 0
11/07/2019
Anderson Saldanha
e sim
Gostei + 0
12/07/2019
Manoel Junior
.DateTime
Gostei + 0
13/07/2019
Anderson Saldanha
.DateTime
Entao coloquei mas continuou mesma coisa
close;
sql.Clear;
sql.Add('select * from sangria');
sql.Add('where s_data between :s_data_ini and :s_data_fim');
ParamByName('s_data_ini').Value := s_data_ini.Date;
ParamByName('s_data_fim').Value := s_data_fim.Date;
open;
Gostei + 0
13/07/2019
Anderson Saldanha
.DateTime
Entao coloquei mas continuou mesma coisa
close;
sql.Clear;
sql.Add('select * from sangria');
sql.Add('where s_data between :s_data_ini and :s_data_fim');
ParamByName('s_data_ini').Value := s_data_ini.Date;
ParamByName('s_data_fim').Value := s_data_fim.Date;
open;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)