Mach Dir selber einen Gefallen und gewöhne Dir das with ab.
Gerade in grossen Projekten kannst Du damit fürchterlich auf die Nase fallen bei Änderungen in den
darunterlegenden Klassen. Das Problem ist das der Code wahrscheinlich trotzdem kompiliert aber dann erst beim Kunden knallt.
Wir machen so etwas grundsätzlich nur noch mit hilfsvariablen.
also ungefähr:
Delphi-Quellcode:
var
litem : TlistItem;
begin
litem := MediaListView.Items.Add;
begin
litem.Caption := SearchList[2].Strings[n];
litem.SubItems.Add(SearchList[3].Strings[n]);
litem.SubItems.Add(SearchList[5].Strings[n]);
litem.SubItems.Add(SearchList[1].Strings[n]);
litem.SubItems.Add(S);
litem.SubItems.Add(AddZero(IntToStr(i), 6));
litem.SubItems.Add(S2);
end;
end,