[LordRiper]

Código Delphi [-]
  
if Lista.SelectedRows.Count>1 then  // por si solo seleccionan uno...
   for I := 0 to Lista.SelectedRows.Count-1 do
   begin
     Table.BookMark := Lista.SelectedRows[i];
     // Todo lo que tengas que hacer
   end
else
  // Todo lo que tengas que hacer