Prueba con una consulta parametrizada, por ejemplo:
Código Delphi
[-]
with Query1 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT * FROM REGISTROS');
SQL.Add('WHERE FECHA_ENTRADA =:MiFecha');
SQL.Add('ORDER BY ID_REGISTRO');
ParamByName('MiFecha').AsDateTime:=Calendar.Date;
Open;
end;
Saludos