En las páginas de las quantum encontrarás seguramente más ejemplos de esto y otras cuestiones.
Para el recorrido:
Código Delphi
[-]
for i := 0 to (DBTableView.Controller.SelectedRecordCount - 1) do begin
Para acceder a la línea:
Código Delphi
[-]
RecID := DBTableView.Controller.SelectedRecords[i].RecordIndex;
Revisa este link:
MultiSelect