TStringlist aus Datei gelesen

[bluescreen25]

Hallo, ich habe ein Problem:

Ich speichere eine TStringliste mit Dateinamen inkl. Pfad in eine Playlist.lst ab.
Beim nächsten Programmstart lädt er die Strings wieder ein.

Jetzt möchte ich beim einladen der Liste feststellen, ob die hinterlegten Dateien noch existieren und wenn nicht, sollen diese aus der Liste gelöscht werden, den restlichen Dateien werden die Pfade gekappt und der sichtbaren Listbox zugeführt.

Kann da jemand helfen?

Delphi-Quellcode:

procedure Tmediaplayer_frm.FormActivate(Sender: TObject);
var i:integer;
begin
  if config_frm.playlist_load_select.Checked = true then
  begin
    if FileExists(ProgrammPfad + '\PlayList.lst')then
     begin
       PlayList.LoadFromFile(ProgrammPfad + '\PlayList.lst');
       For i:=0 to PlayList.Count-1 do
       //if FileExists(PlayList.Strings[i])  then
       //Playlist.Delete(i);

       //else
       
       PlayList_ListBox.Items.Add(ExtractFileName(PlayList[i]));
     end
  else
  end;
end;