Si no te entiendo mal, esto es lo que buscas:
Código Delphi
[-]
procedure Form1. ListView1SelectItem(Sender: TObject;
Item: TListItem; Selected: Boolean);
begin
if Selected then
begin
No := Item.Caption;
Nombre := Item.SubItems[0];
CI := Item.SubItems[1];
Sexo := Item.SubItems[2];
end;
end;
Pero tienes que tener la precaución de cargar valores para todos los subitems, o tendrás que preguntar línea por línea si el subindex es menor que la cantidad de items.
Saludos!