OpenDialog

[Rahim1993]

у меня одна неполадка, с помошью ОпенДиалог открываю файл(музыку) в ЛистБоксе, воспроизвожу, открываю другую из дгугой папки, воспроизвожу(пытаюсь), и программа выводит ошибку:"Данный файл не найден. Проверьте, что путь и имя указаны верно.". Как это исправить?

Вот код кнопки воспроизведения:

procedure TForm1.SpeedButton3Click(Sender: TObject);
var
s:string;
begin
s:=ListBox1.Items.Strings[ListBox1.ItemIndex];
MediaPlayer1.FileName:=s;
MediaPlayer1.Open;
MediaPLayer1.Play;
begin
if MediaPlayer1.Mode=mpPlaying then
SpeedButton3.Hint:='Проигрывается'
else
SpeedButton3.Hint:='Воспроизвести';
end;
end;

[Makarov]

s:=ListBox1.Items.Strings[ListBox1.ItemIndex];

Вы воспроизводите файл котрый у вас размещен в ListBox! А при открытии файла, что у вас в ListBox?

[Rahim1993]

Сообщение от Makarov

Вы воспроизводите файл котрый у вас размещен в ListBox! А при открытии файла, что у вас в ListBox?

В ListBoxe у меня, те файлы которые я туда перенес

[Makarov]

А до того как нажать кнопку нажали на нужный файл в ListBox. А лучше всего для начало запускать файл на воспроизведение при нажатии на него в ListBox. А потом от этого скакать!! Я сам с этого начинал.

[Rahim1993]

Посмотрите сами

[Makarov]

Вы знаете у меня все работает! Я открываю файл кликаю на нем и нажимаю play. Все воспроизводится.

[Rahim1993]

Знаю, у меня тоже так, вставьте 2 файла из разных дисков например : C, E. И воспроизведите первую вставленную.

[Makarov]

А теперь начинаю понимать! Смотрите! Вы загружаете один файл его адрес записываете в переменную S. Потом загружаете второй файл и его адрес перезаписываете в ту же переменную! Следовательно адреса первого воспроизводимого файла просто нет!

[Rahim1993]

А как это исправить?

[Rahim1993]

Как это исправить?