Form1.Acciones.Sql.Add('Select Seccion, Grupo, SUM(Entregados) as Entregas
From Datos
Where (Fecha Between :Fecha_Min And :Fecha_Max) And
(Grupo=:Grupo)
Group By Seccion, Grupo');
form1.acciones.ParamByName('Fecha_Min').asString:=fecha1;
form1.acciones.ParamByName('Fecha_Max').asString:=fecha2;
form1.acciones.ParamByName('Grupo').asstring :='grupo1';
form1.acciones.Open;