Guten Morgen,
dein Problem lässt sich gut durch eine Zählschleife lösen:
Delphi-Quellcode:
procedure TMyFriend.KarteiviewClick(Sender: TObject);
var
i: Integer;
lauf: TKnoten;
begin
lauf := anfang;
for i := 0 to KarteiView.ItemIndex do
lauf := lauf.Nach ;
// ...
end;
Du schreibst ListBox und nennst sie KarteiView - kennst du den Unterschied zwischen einer ListBox und einer ListView?
Grüße vom marabu