So, habe den Fehler gefunden, wie ich ihn beheben kann... da habe ich weiterhin keine Ahnung:
Delphi-Quellcode:
//Funktioniert nicht
with MainFrm.lstSongsDB.Items.Add
do
begin
Caption :=
XML.ReadString('
Song'+IntToStr(i), '
ID', '
');
SubItems.Add('
');
SubItems.Add('
');
SubItems.Add('
');
SubItems.Add('
');
SubItems.Add('
');
end;
Delphi-Quellcode:
//Funktioniert
with MainFrm.lstSongsDB.Items.Add
do
begin
Caption :=
XML.ReadString('
Song'+IntToStr(i), '
ID', '
');
SubItems.Add('
');
SubItems.Add('
');
SubItems.Add('
');
SubItems.Add('
');
end;
Wie man sieht: Bei dem oberen befindet sich ein "SubItems.Add('');" mehr in die Procedure, wenn ich eines davon rausnehme (siehe unten) klappt alles wie es soll...?!