Hola Luis77,
No lo he probado mira a ver si te vale.
Código Delphi
[-]...
var
BetweenStr: String;
begin
BetweenStr := QuotedStr(FormatDateTime('dd/mm/yyyy hh:nn:ss.000', DateTimePicker1.DateTime));
BetweenStr := BetweenStr + ' AND ' + QuotedStr(FormatDateTime('dd/mm/yyyy hh:nn:ss.999', DateTimePicker1.DateTime));
with AdoQuery1 do
begin
Close;
SQL.Add('SELECT *');
SQL.Add(' FROM Clientes');
SQL.Add(' WHERE FECHAALTA BETWEEN ' + BetweenStr);
Open;
end;
end;
Un saludo.