плейлист на ListBox-e

[Lotles]

Хочу сделать плейлист для плеера, с использованием ListBox-a

if(OpenDialog1->Execute())
{
MediaPlayer1->FileName=OpenDialog1->FileName;
for(int i=0;i<OpenDialog1->Files->Count;i++)
ListBox1->Items->Strings[ListBox1->ItemIndex]=OpenDialog1->Files[i];
MediaPlayer1->Open();
MediaPlayer1->Play();
}

выдает ошибку:
Cannot convert 'TStrings' to 'UnicodeString' на строке ListBox1->Items->Strings[ListBox1->ItemIndex]=OpenDialog1->Files;
Помогите исправить

[Stilet]

ListBox1->Items->Strings[ListBox1->ItemIndex]=OpenDialog1->Files;

Покажи где эта строка.

[Lotles]

Покажи где эта строка.

неправильно я написал, вот тут ошибка

ListBox1->Items->Strings[ListBox1->ItemIndex]=OpenDialog1->Files[i];

[Stilet]

А давай мы тебе малость жизню упростим, ась?

 if (OpenDialog1->Execute()) {
	 ListBox1->Items->AddStrings(OpenDialog1->Files);
 }

Проверял, ошибок нет и быть не может.

[Lotles]

Я нашел ошибку

if(OpenDialog1->Execute())
{
MediaPlayer1->FileName=OpenDialog1->FileName;
for(int i=0;i<OpenDialog1->Files->Count;i++)
ListBox1->Items->Strings[ListBox1->ItemIndex]=OpenDialog1->Files->Strings[i];
MediaPlayer1->Open();
MediaPlayer1->Play();

так загружается в ListBox один файл, а как сделать, чтобы можно было загружать несколько файлов?
PS: предыдущий пост не заметил!

[Lotles]

Stilet
Ваш код когда на play нажимаешь выдает No MCI device open
Как сделать, чтобы можно было загружать несколько файлов?

[Stilet]

Сразу несколько?
Может всетки поочередки загружать?

[Lotles]

если ты выбрал один файл, то все все остальные, которые в папке есть за ним в список добавляются

А как сделать чтобы когда кликаешь в ListBox-e воспроизводился файл
делаю так:

void __fastcall TForm1::ListBox1Click(TObject *Sender)
{
this->MediaPlayer1->Open();
this->MediaPlayer1->Play();
}

не работает
не удается определить тип устройства по указанному расширению имени файла