du könntest tatsächlich das auslesen vereinfachen!
ich habe es mal so gemacht:
Delphi-Quellcode:
for i := 0 to 9 do
begin
if ListBox1.Selected[i] then
begin
if i < 10 then
ListBox3.Items.LoadFromFile(dir + '/cds_und_alben/0' + inttostr(i+1) + '/inhalt.ini')
else
ListBox3.Items.LoadFromFile(dir + '/cds_und_alben/' + inttostr(i+1) + '/inhalt.ini');
end;
end;
du mußt i natürlich deklarieren!
bei mir hat es funktioniert!