Форма и ее параметры. Компоненты Checkbox, radiobutton

- сол жақтан, taRightJustify-

жүктеу 106 Kb.

бет	3/3
Дата	04.01.2022
өлшемі	106 Kb.
	#31638
түрі	Лекция

1 2 3

Лекция 3

- сол жақтан, taRightJustify- оң жақтан (қалыпты жағдайда). Checked қасиеті бұл батырманың қолданушы арқылы таңдалғанын немесе таңдалмағанын көрсетеді. Оның мәні true болса, батырма таңдалған, false болса- таңдалмаған.

CheckBox құрамдас бөлігі жалаушалы индикатор немесе басқаларға тәуелсіз ауыстырып- қосқыш батырма болып табылады. Ол қосымшада қолданушы қандай да бір опцияны қосу немесе айыру үшін қолданылады. Бұл құрамдас бөліктің қасиеттері де RadioButton құрамдас бөлігіндегідей.

Мысал 11. Тестілеу бағдарламасын жасаңдар. (30- сурет)

30-cурет. Тестілеу бағдарламасының интерфейсі
Шешуі: Батырма кодтары:

int n=0,s=0,k=0;

{“Ok” батырмасының коды }

void __fastcall Tform1::Button1Click(TObject *Sender)

{

n++;

if (n==1 && RadioButton1->Checked) s++;

if (n==2 && RadioButton3->Checked) s++;

if (n==3 && RadioButton2->Checked) s++;

}

{“Келесі” батырмасының коды }

void __fastcall Tform1::Button2Click(TObject *Sender)

{

k++;

RadioButton1->Checked=false;

RadioButton2->Checked=false;

RadioButton3->Checked=false;

if (k==1) {Edit1->Text="Borland C++ тіліндегі форманы жобалау файлының типі?";

RadioButton1->Caption="h";

RadioButton2->Caption="cpp";

RadioButton3->Caption="frm"; }

if (k==2) { Edit1->Text="Borland C++ тіліндегі код файлының типі?";

RadioButton1->Caption="dpr";

RadioButton2->Caption="cpp";

RadioButton3->Caption="frm"; }

if (k==3) Edit2->Text="Дұрыс жауап саны: "+ IntToStr(s);

}

Мысал 12. Таңдалған жыл мезгілі нөміріне байланысты бұл мезгілге сәйкес ай аттарын шығарыңдар. (31-сурет)

31- сурет. Жоба интерфейсі

Шешуі:

void __fastcall Tform1::RadioButton1Click(TObject *Sender)

{

Edit1->Text="желтоқсан, қаңтар, ақпан";

}

void __fastcall Tform1::RadioButton2Click(TObject *Sender)

{

Edit1->Text="'наурыз, сәуір, мамыр";

}

void __fastcall Tform1::RadioButton3Click(TObject *Sender)

{

Edit1->Text="'маусым, шілде, тамыз'';

}

void __fastcall Tform1::RadioButton4Click(TObject *Sender)

{

Edit1->Text="''қыркүйек, қазан,қараша'';

}

жүктеу 106 Kb.

Достарыңызбен бөлісу:

1 2 3