Problema con consulta (Extraño)

[roman]

Pues no. Al menos en mi caso, si pongo

Código Delphi [-]
ADOQuery1.Active := false;

ADOQuery1.Parameters.ParamByName('fecha').DataType := ftDate;
ADOQuery1.Parameters.ParamValues['fecha'] := DateTimePicker1.Date;

ADOQuery1.Active := true;

no funciona. Pero si pongo

Código Delphi [-]
ADOQuery1.Active := false;

ADOQuery1.Parameters.ParamByName('fecha').DataType := ftDate;
ADOQuery1.Parameters.ParamValues['fecha'] := Trunc(DateTimePicker1.Date);

ADOQuery1.Active := true;

funciona bien. Incluso puedo quitar la asignación del tipo de datos:

Código Delphi [-]
ADOQuery1.Active := false;

ADOQuery1.Parameters.ParamValues['fecha'] := Trunc(DateTimePicker1.Date);

ADOQuery1.Active := true;

pero entonces me falla si quiero una segunda consulta con otro parámetro.

// Saludos