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

return true;

}

return false;

}

// joriy rasmni chiqarish va keyingisini topish

bool __fastcall TForm1::NextPicture(){

Image1->Picture->LoadFromFile(aPath+aSearchRec.Name);

Label1->Caption = aPath + aSearchRec.Name;

if (FindNext(aSearchRec)!=0)// keyingi rasmni topish

{

// rasmlar boshqa yo’q

Button2->Enabled = false; // endi Keyingi tugma

// murojaatli emas

CheckBox1->Enabled = false;

return false;

}

return true;

}

// Keyingi tugmani bosish

void __fastcall TForm1::Button2Click(TObject *Sender)

{

NextPicture();

}

// "o’zluksiz" o’lagichni bosish

void __fastcall TForm1::CheckBox1Click(TObject *Sender)

{

if ( CheckBox1->Checked)

Timer1->Enabled = true; // slayd-shou

else

Timer1->Enabled = false; // kadr bo’yicha

}

// Taymerdan signal – keyingi rasmlarni chiqarish

void __fastcall TForm1::Timer1Timer(TObject *Sender)

{

if (!NextPicture())

Timer1->Enabled = false;

}

Soat

Soat dastur oynasida (1.31-rasm) joriy vaqtni ko’rsatuvchi harakatlanuvchi soat tasviri joylashgan.