FileName aus OpenDialog in Listbox laden

[Loni]

Hi also ich möchte den FileName eines OpenDialogs in eine ListBox laden undzwar so

Delphi-Quellcode:

procedure TForm1.OpenDialog1Close(Sender: TObject);
begin
MediaPlayer1.FileName:=OpenDialog1.FileName;
Form2.ListBox1.Items.Add(OpenDialog1.FileName);
end;

aber bei mir kommt als ListBoxEintrag das raus = '@y|' der Originaltitel ist
aber '01 - Lionel Richie - Hello' (Das Mp3File wird aber abgespielt also muss der
Name des Files richtig auf MediaPlayer.FileName übertragen)
wo ist der Fehler

[Mazel]

Ich kann mir vorstellen, dass beim schließen des Dialogs, FileName vorher freigeben wird, so dass es nicht mehr an die ListBox korrekt übergeben wird.
Versuch doch stattdessen folgendes:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
 if OpenDialog1.Execute then
  begin
    MediaPlayer1.FileName := OpenDialog1.FileName;
    ListBox1.Items.Add(OpenDialog1.FileName);
  end;
end;

Gruß
Mazel

[Loni]

ok ich habs auf CanClose Ereignis gestellt jetzt gehts danke