R. A. Yusupov C++ Builderda masalalar va topshiriqlar samarqand 2018 yil

switch (MediaPlayer1->Mode )

{

case mpOpen: // foydalanuvchi diskovodni ochdi

{

SpeedButton1->Enabled = false;

SpeedButton2->Glyph->Assign(bmPlay);

SpeedButton2->Tag = 0;

SpeedButton3->Enabled = false;

Label2->Caption = "00:00";

/* taymer signal bo’yicha diskovod xolatini tekshiramiz */

Timer1->Enabled = true;

}

}

MediaPlayer1->Notify = true;

}

// taymerdan signal: trek nomeri va tiklash vaqtini

// chiqarish

void __fastcall TForm1::Timer1Timer(TObject *Sender)

{

int trk; // trek

int min, sec; // vaqt

AnsiString st;

if(MediaPlayer1->Mode==mpPlaying) // Tiklash

{

// tiklanayotgan trek nomerini olish

trk = MCI_TMSF_TRACK(MediaPlayer1->Position);

if(trk != Track) //trekni almashtirish yuzaga keldi

{

TrackInfo();

Track = trk;

if (Track>1)

SpeedButton1->Enabled=true; //"oldingi trek"

//tugmasi murojaatli

if (Track==MediaPlayer1->Tracks)

SpeedButton3->Enabled = false; // "keyingi trek"

// tugmasi murojaatli emas

}

// tiklanayotgan trek xaqida ma’lumotni chiqarish

min = MCI_TMSF_MINUTE(MediaPlayer1->Position);

sec = MCI_TMSF_SECOND(MediaPlayer1->Position);

st.printf("%d:%.2d",min,sec);

Label2->Caption = st;

return;

}

/* Если дисковод открыт или в нем нет AudioCD, то Mode == mpOpen. Ждем диск, т.е. до тех пор пока не будет Mode == mpStopped + кол-во треков > 1 */

if((MediaPlayer1->Mode==mpStopped)

&&(MediaPlayer1->Tracks>1))

{

// disk qo’yildi

Timer1->Enabled = false;

SpeedButton2->Enabled = true;

SpeedButton2->Tag = 0;

SpeedButton3->Enabled = true;

MediaPlayer1->Notify = true;

// CD ning jaranglash vaqti xaqida ma’lumotni olish

MediaPlayer1->TimeFormat = tfMilliseconds;

int ms = MediaPlayer1->Length;

AnsiString st = "Audio CD. Jaranglash vaqti: ";

st = st + IntToStr(MINUTE(ms));

st = st + ":" + IntToStr(SECOND(ms));

Label1->Caption = st;

MediaPlayer1->TimeFormat = tfTMSF;

Label1->Visible = true;

Track = 0;

return;

}

// diskovod ochildi yoki diskovoddagi AudioCD emas

if((MediaPlayer1->Mode==mpOpen)||(MediaPlayer1->Mode

== mpStopped)&&(MediaPlayer1->Tracks==1))

{

Label1->Caption = "AudioCD ni qo'ying";