Fórum Soma MySQL com select sum #608121

Tiago Modena:
Bom dia pessoal, estou fazendo uma soma com MYSQL Delphi Mobile mas não esta funcionando, alguém pode ajudar por favor?

dm.QueryCadastro.Close;
dm.QueryCadastro.SQL.Clear;
dm.QueryCadastro.SQL.Add('select SUM(valor) AS TOTAL FROM cadastro');
dm.QueryCadastro.SQL.Add('WHERE data >= :DATAINI and data <= :DATAFIM');
dm.QueryCadastro.ParamByName('DATAINI').Value := DataInicio.Date;
dm.QueryCadastro.ParamByName('DATAFIM').value := DataFim.Date;
dm.QueryCadastro.open;

Label1.text := FloatToStr(dm.QueryCadastro.FieldByname('TOTAL').AsFloat);