Einzelnen Beitrag anzeigen

arest

Registriert seit: 27. Sep 2005
Ort: Frankfurt
62 Beiträge
 
Delphi 6 Personal
 
#1

eintrag auswählen?! verkettete liste..

  Alt 16. Aug 2006, 11:14
Moin,

kurze frage: habe eine doppelt verkettete Liste und einen listview in dem meine einträge angezeigt werden. die verkettete liste ist richtig gefüllt und es wird auch richtig im listview angezeigt. nun will ich einen lauf auswählen, um diesen zu bearbeiten/löschen. ich mach das über eine while schleife (siehe code). doch es kommt jedes mal zu dem fall, wo er die showmessage sendet... habt ihr irgendwelche tipps?!

Delphi-Quellcode:
lauf:=TKnoten.Init;
if (ListView1.ItemIndex <> -1)
then begin
        lauf:=anfang;
        while (lauf.Daten.filmname <> Listview1.Items.Item[Listview1.ItemIndex].Caption) do
        begin
           lauf:=lauf.nach;
           if (lauf=ende)
           then begin
                   showmessage('Kein ordnungsgemäßer Eintrag ausgewählt!'); //hier ist der "fehler"
                   exit
                end;
        end;
        lauf.vor.nach:=lauf.nach;
        lauf.nach.vor:=lauf.vor;
        lauf.Free;
        lauf:=anfang.nach;
        sortieren; //externe funktion die nur die liste neu sortiert...
     end;
ich hoffe ihr könnt was mit dem wirrwarr anfangen danke schon mal
  Mit Zitat antworten Zitat