1-amaliy mashg’ulot Mavzu: Standart va Additional bo’limi komponentlaridan foydalanish yo’llari

Markirovka qilingan ro‘yxat (TCheckListBox)

TCheckListBox komponentasi TListBox, komponentasiga juda o‘xshash, faqat har bir ro‘yxat yonida TCheckBox komponentasidagi kabi ajratish to‘rtburchagi mavjuddir.

Ro‘yxat kiritish uchun Items xossasi qatorida ikki marta chertish lozim.

TCheckListBox yana bir xossasi – columns, ya’ni ustunlar sonidir. Agar bu xossa qiymati birdan katta bo‘lsa va ro‘yxat bir ustunga sig‘masa, ko‘rsatilgan sonli ustunlarga ajratiladi.

Quyida shu elementdan foydalanilgan dastur formasini keltiramiz.

OK tugmasining OnClick hodisasi uchun quyidagi protsedurani kiritamiz:

void __fastcall TForm1::Button1Click(TObject *Sender)

{

String Str;

Str = “Siz tanladingiz ”;

for (int i=0; CheckListBox1->Items->Count-1; i++)

if (CheckListBox1->Checked[i])

Str = Str + CheckListBox1->Items[i]+ “”;

Application->MessageBox(PChar(Str), “Dikkat!!!”);

}

Dastur ishlash natijasiga misol.