Wenn ich mri mal einen kleinen Einwurf erlauben dürfte
newSub.text:=IntToStr(MainForm.MovieList.items[MainForm.MovieList.Items.Count - 1].Caption +1);
Diese Zeile finde ich falsch
Es muss heißen:
newSub.text:=IntToStr(StrToInt(MainForm.MovieList.items[MainForm.MovieList.Items.Count - 1].Caption) +1);
Da ein Caption der MovieList einen STRING zurückgibt.
Wollte das nur mal erwähnen weil ich es nirgends gelesen habe.
Vielelicht bin ich aber auch nur blind
Ansonsten funktionierte es erst bei mir, als ich die SAVE Routine von xmlDoc ausführte.
Das habe ich auch nirgends gelesen aber wie gesagt, vielleicht bin ich ja auch blind und habe es in meinem lerneifer überlesen
Also bis dann