la consulta sería
Código SQL
[-]Select sum(precio) Suma from tabla
después la asignas a un query y igualas la propiedad text de la etiqueta al valor de la suma
Código Delphi
[-]query.close;
query.SQL.Clear;
query.SQL.Add(consulta);
query.Open;
label.text := FloatToStr(querySuma.Value);
Espero que te sirva