Активировать кнопки в MediaPlayer
Имеется вот такой код:
Цитата:
void __fastcall TForm1::StringGridDblClick(TObject *Sender)
{
asMediaFilePfad = StringGrid->Cells[2][StringGrid->Row] + "\\" + StringGrid->Cells[1][StringGrid->Row];
if(FileExists (asMediaFilePfad)){
MediaPlayer1->Close();
MediaPlayer1->FileName = asMediaFilePfad;
MediaPlayer1->Open();
MediaPlayer1->Play();
}
}
{
asMediaFilePfad = StringGrid->Cells[2][StringGrid->Row] + "\\" + StringGrid->Cells[1][StringGrid->Row];
if(FileExists (asMediaFilePfad)){
MediaPlayer1->Close();
MediaPlayer1->FileName = asMediaFilePfad;
MediaPlayer1->Open();
MediaPlayer1->Play();
}
}
AutoEnable изначально true. Так вот. Если я нажимаю на какую-нибудь композицию из списка моего грида (там у меня мп3-шки), то музыка начинает играть, но остаётся активирована кнопка "Play" и деактивироваными кнопки "Stop" и "Pause". Уж не знаю, как с этим и бороться.
Просьба не отправлять в помощь по билдеру. Второй день там роюсь. Ничего не дало до сих пор.