Ayuda con consulta fecha y hora

[rafaelon]

Gracias por la repuesta , pero eso es básicamente lo que hago arriba ,

Código Delphi [-]
SQL.Text:= 'select * from ventas where Fecha like'+quotedstr('%'+frm_menu.label7.Caption+'%')+' ; '; ;

label7.Caption es la fecha

y lo que necesitaria seria al como

Código Delphi [-]
 SQL.Text:= 'select * from ventas where Fecha between (dia actual desde las 12pm  hasta dia siguiente a las 6am)

pero no lo he conseguido