begin with datam.ADOQuery1 do begin sql.Add('select a+b+c AS total from Tabla1'); open; label1.Caption := intTostr(datam.adoquery1.fieldBYname('total').asinteger); end; end; end.