Código Delphi [-] Table1.FieldByName('Valor').AsString := Edit1.Text;
Table1.FieldByName('Valor').AsString := Edit1.Text;