[marcoszorrilla]

Código SQL [-]
       Qimp_total.Active:=False;
       Qimp_total.SQL.Clear;
       Qimp_total.SQL.Add('select sum(cantidad*precio_un) as imptot ');
       Qimp_total.SQL.Add(' from compras as C ');
   
       Qimp_total.Open;

Para ver si es problema de las fechas deja la consulta así.

Además antes del Open puedes poner:

Código Delphi [-]
   ShowMessage(Quimp_Total.Sql.Text);

Luego le vas añadiendo líneas para ir viendo lo que pasa y donde puede estar el fallo.
Para ver si hay algún problema en como queda armado el SQL.

Un Saludo.