[Neftali [Germán.Estévez]]

Si estás trabajando con el Grid sde las Quantum puedes usar algo así:

Código Delphi [-]
  for i := 0 to (DBTableView.Controller.SelectedRecordCount - 1) do begin
    RecID := DBTableView.Controller.SelectedRecords[i].RecordIndex;
    // Item del Código
    TableItem := DBTableView.DataController.GetItemByFieldName('Codigo');
    CodID := TableItem.Index;   // Id del campo código
    // Accedemos al valor
    CodStr := DBTableView.Controller.SelectedRecords[i].Values[CodID];

    ....

Se puede "compactar" un poco, pero creo que así lo verás más claro.