error con mas de dos querys en un boton

[douglas]

gracias amigos del foro, funciono muy bien eso de los corchetes marcozorrilla gracias, de verdad gracias no sben del apuro que me han salvado, hey y como siempre dejo el codigo final, para que otro cualquier forista, ingrese encuentre medio detallado el problema y la solucion, gracias amigos gracias

Código Delphi [-]
   with adoquery1 do begin
 If active then close;
 SQL.Clear;
 SQL.Add('select sum(ganancia) as ganancia, sum(capital) as capital, sum([imp]) as imp, sum(gas) as gas from diario');
 SQL.Add('where fecha between :Fechain and :Fechafin');
 Parameters.ParamByName('Fechain').Value:=datetimepicker1.DateTime;
 Parameters.ParamByName('Fechafin').Value:=datetimepicker2.DateTime;
 Open;
 edit1.Text:=floattostr(FieldByName('Ganancia').AsFloat);
 edit2.Text:=floattostr(FieldByName('Capital').AsFloat);
 edit3.Text:=floattostr(FieldByName('imp').AsFloat);
 edit4.Text:=floattostr(FieldByName('gas').AsFloat);
 Close;