podrias hacer mas o menos esto
Cada instruccion en un componente Adoquery diferente
Código Delphi
[-]
Select Sum (Importe) As Suma from facturas where fecha =:Fecha
Select Sum (Importe) As Suma from remision where fecha =:Fecha
Select Sum (Importe) As Suma from compras where fecha =:Fecha
luego para sumarlos por ejemplo en un edit
Código Delphi
[-]
edit1.text := floattostr(qryFacturasSuma.Value + qryRemisionSuma.Value + qryComprasSuma.Value)
OJO es una idea... no lo tomes tan literal