Fórum delphi xe 7 data #603311

Boa noite fiz este codigo mas quando seleciono a data que preciso nao acha, alguem ja passou por isso, se sim por favor me de uma ajuda

with sql_ListarLancamentos do
begin
close;
sql.clear;
sql.Add('select * from view_listar_pedidos');
sql.Add('where ped_faturado = "SIM"');
sql.Add('and ped_data between :data_ini and :data_fim');
sql.add('group by ped_cod_venda');
ParamByName('data_ini').Value := data_ini.Date;
ParamByName('data_fim').Value := data_fim.Date;
open;

end;
//sql que gera o relatorio por data
with dm.sql_relatoriovenda do
begin
close;
sql.clear;
sql.Add('select * from view_listar_pedidos');
sql.Add('where ped_faturado = "SIM"');
sql.Add('and ped_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;

end;
end;