Query.SQL.Clear; Query.SQL.Add('select sum(campo) as suma........'); Query.Open; QRLabel.Caption := Query.FieldByName('suma').AsString;