Also eigentlich kann es daran nicht liegen, da ich den "inhalt" der liste durch "laden" aus einer textdatei bekomme und definitiv weiß das mindestens 4 elemente in der textdatei stehen. Habe die Datei folgendermaßen abgeändert und nun funktioniert es für ein weiteres Element:
Delphi-Quellcode:
procedure TAusgabeformular.WeiterClick(Sender: TObject);
begin
titelaus.Clear;
genreaus.Clear;
jahraus.clear;
regiseuraus.clear;
schauspieleraus.clear;
if temp.next<> nil then
begin
temp:=temp^.Next;
ausgabeliste(temp);
end;
end;
end.
Delphi-Quellcode:
PROCEDURE ausgabeListe(L:Listenzeiger);
BEGIN
ausgabeformular.titelaus.Items.add(l^.Titel);
ausgabeformular.genreaus.Items.add(l^.genre);
ausgabeformular.jahraus.Items.add(l^.jahr);
ausgabeformular.regiseuraus.Items.add(l^.Regisseur);
ausgabeformular.schauspieleraus.Items.add(l^.schauspieler);
END;
Wenn ich nun nicht if temp.next<>NiL mache, sagt er mir beim dritten klick auf WEITER den bekannten Fehler und markiert die Zeile "ausgabeformular.titelaus.Items.add(l^.titel). Bei temp.next<>NIL macht er zwar auch nur 2x weiter (es wird nur zweimal was ausgegeben) und danach passiert gar nichts mehr (obwohl noch was in der liste sein sollte) aber wenigstens stürtzt das Programm nicht ab.
Gruß
Tasta