Con parámetros:
Código SQL
[-]SELECT i.DeptoE, SUM(b.TotalRecibido) AS Cant
FROM dbo.BDinscripcion i INNER JOIN
dbo.BDBeca b ON i.IdE = b.IdE
Where year(b.fecha)= :fecha //aqui se :fecha indica que es un parámetro
GROUP BY i.DeptoE
luego en delphi hace algo como:
Código Delphi
[-]ADOQuery.Close;
ADOQuery.ParamByName('fecha').asDate := strToDate(TEdit1.text);
ADOQuery.Open;