Anscheinend willst du die Dateigrössen nachträglich einsetzen.
Delphi-Quellcode:
for iz := 0 to dateilist.Items.Count-1 do
begin
item := dateilist.Items[iz]; // <==== *****
item.SubItems.Add(inttostr(fneu.zip[iz].CompressedSize)+' B');
item.SubItems.Add(datetostr(fneu.zip[iz].DateStamp));