Listbox und Tstringlist bei beenden abpeichern

[bluescreen25]

Hallo,

für meinen MP3-Player habe ich eine Listbox und eine Tstringlist erstellt.

Da ich eine procedure findfirst..... erstellt habe, um aus Ordnern die .mp3 Dateien zu finden,habe ich
dort schon die Trennung der Dateien ohne Pfade für in die Listbox sowie Dateien inkl. Pfade in die TStringlist.

Jetzt muss ich natürlich immer beide Listen aktualisieren, wenn ich in der Listbox verschiebe,lösche etc.

Mein Problem: Ich möchte die "Playlist" gerne in eine ini abspeichern wenn das Programm beendet wird.

Kann es sein, das ich das etwas zu umständlich gemacht habe, denn wenn ich richtig liege, dann muss ich ja jetzt beide Listen einzeln abspeichern,sowie beide wieder erneut einlesen ?

Jemand einen Tipp, um das einfacher hinzubekommen ?

[tomsel]

Bei tStrings (also auch bei Listbox.Items) ist es möglich, mit AddObject zusammen mit einem String ein Objekt einzufügen. Die Objekte müssten bei dir wiederum einen String verwalten, der den kompletten Dateipfad enthält.

[bluescreen25]

wie schauts mit Abspeichern der TStringlist inkl. der Pfade aus und beim einlesen für die Listbox, die Pfade wieder abschneiden ?

wie geht das abschneiden am schnellsten ?

[tomsel]

Warum speicherst du die Dateien nicht nach dem Schema

Delphi-Quellcode:

FrogEyes-soundtravels.mp3=H:\Eigene Dateien\Eigene Musik\Frog Eyes

in einer INI-Datei ab?

Auslesen könnte man sie mit ReadSectionValues.

Zum abschneiden von Dateinamen gibt es Funktionen wie ExtractFilename, ExtractFilepath etc.