EditCodigo.text:=DataSource1.dataset.FieldbyName('Codigo').asstring; EditNombre.text:=DBgrid1.DataSource.DataSet.FieldbyName('Nombre').asstring;