Okay daran lag es -.- Hab nicht ganz nachgedacht.
Bei Length(Änderung) = 1 ist ja nur noch Änderung[0] da...
Delphi-Quellcode:
if Length(Änderungen) > 1
then begin
Eingabetext.Lines.Clear;
Eingabetext.Lines.Text := Änderungen[Length(Änderungen) - 2];
SetLength(Änderungen, Length(Änderungen) - 1);
end
Jetzt klappt es einwandfrei danke