Código Delphi [-]Edit1.Text:=Dbgrid.SelectedField.AsString;
Edit1.Text:=Dbgrid.SelectedField.AsString;