Toolbar funktioniert nicht (wird scheinbar nicht gezeichnet)

[Daxon]

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...?!