Hola tengo una programa que tiene un apartado "reporte diario" donde me muestra las ventas del dia , el problema es que si pasan de las 12am cambia la fecha y por supuesto ya no sale en el reporte , entonces como podria hacer una consulta que filtre por hora (12 pm a 6 am ) y fecha (dia actual y dia siguiente ) asi tengo mi codigo con solo el dia en curso , la hora tambien se guarda en la BD (access), gracias de antemano
Código Delphi
[-]procedure Tfrm_menu.FlatButton2Click(Sender: TObject);
begin
Buscarf (label7.Caption, encontrado);
if encontrado then
with frm_reportediario.ADOQuery1 do
begin
close;
sql.clear;
SQL.Text:= 'select * from ventas where Fecha like'+quotedstr('%'+frm_menu.label7.Caption+'%')+' ; '; ;
Open;
begin
a:=label7.Caption;
frm_reportediario.RLReport1.Prepare;
frm_reportediario.RLReport1.SaveToFile('C:\Billar\Reportes\Reportediario_' + (a) + ('.pdf') );
frm_reportediario.RLReport1.Preview;
end;
end
else
Showmessage('No hay ordenes en el día')
end;