Wenn die Affenhitze in Hamburg mir nicht den Kopf total vernebelt hat, dann müsste zumindest dieser Teil verändert werden:
Delphi-Quellcode:
li := ListView1.Items.Insert(0);
li.Caption := srec;
Dein Ziel ist doch, den Dateinamen in das Listview zu bringen. Der Dateiname steht in srec.Name, einen Eintrag in das Listview erzeugt man mit ...items.add(). Also
ListView1.Items.Add(srec.name)