Código Delphi [-] cod1 := DBGrid1.DataSource.Dataset.FieldByName('cod').Asinteger; cod2 := DBGrid2.DataSource.DataSet.FieldByName('cod').Asinteger;
cod1 := DBGrid1.DataSource.Dataset.FieldByName('cod').Asinteger; cod2 := DBGrid2.DataSource.DataSet.FieldByName('cod').Asinteger;