Código Delphi [-]Table1.FieldByName('campocalc').AsString:=edit1.text;
Table1.FieldByName('campocalc').AsString:=edit1.text;