Código Delphi [-]ADOQuery1.Fields[Número_Campo].AsTring:=Edit1.Text;
ADOQuery1.Fields[Número_Campo].AsTring:=Edit1.Text;