LABORATORIYA MASHG’ULOTI. SODDA DASTURLARNI TUZISH. (STANDARD VA ADDITIONAL BO‘LIMI KOMPONENTLARI YORDAMIDA).

Masalaning qo’yilishi:

 Sichqoncha  yoki  yo’naltiruvchi tugmalar  orqali  rangning nomi ni tanlab “Enter”  tugmasi bosilganda  rangning nomi va RGB formatidagi kodini beruvchi dastur tuzing. Dasturdan chiqish “chiqish”  tugmasi orqalli bajarilsin.

1.      Qisqa tushuntirish:

 Dasturda Standard palitrasi ListBox (ro’yxat)  komponenti  va Case operatoridan foydalaniladi.

2.      Dasturni yartish

·         Yangi loyihani ochish

·         Loyiha formasiga “Ma'lumotlar” deb nom berish

·         Formaga rasmdagidek komponentlarni joylashtirish

3.      Loyihani Pr3.pas  va Pr.dpr nomi bilan saqlash.

4.      Dasturni ishga tushirib teksiring.

5.      Komponentlar uchun quyidagi xossalar va amallarni belgilang:

 Component

Inspector oynasi

Xossa

Amal

BitBtn1

Properties

Caption

&Chiqish

Kind

bkClose

Label1

Properties

Caption

RGB formatdagi rang kodi

Label2

Properties

Caption

RGB formatdagi rang nomi

Label3

Properties

Caption

Nomni o’chirish

 

6.      ListBox1 komponentini tanlab  Object Inspector oynasinig  Items xossasida(…)-ni bosib ichki o’rnatilgan muharrirni yordamga chaqiring va  ranglar nomini aloxida qatorda yozib chqing.


7.      Tayyor holatni saqlash uchun sichqonchaning o’ng tugmasini bosih orqali “save” rejimida  Color.txt” nomi bilan saqlang va  so’ngra “Ok” tugmasini bosing.


 

8.      Listbox1 komponenti uchun quyidagi amallarni aniqlang

  Komponent

Inspector oynasi

Xossa

Amal

ListBox1

Events

OnKeyPress

 if key=#13 then

 case Listbox1.ItemIndex of

0: Label3.Caption:='qora 000000';

1: Label3.Caption:='oq FFFFFF';

2: Label3.Caption:='qizil FF0000 ';

3: Label3.Caption:='yashil 00FF00';

4: Label3.Caption:='biryuzoviy 00FFFF';

5: Label3.Caption:='yashil 0000FF ';

6: Label3.Caption:=' binafsha rang FF00FF';

7: Label3.Caption:='sariq  FFFF00';

8: Label3.Caption:='jigarrang 996633 ';

9: Label3.Caption:='to’q sariq FF8000 ';

10: Label3.Caption:='binafsha rang 8000FF ';

11: Label3.Caption:='kulrang A0A0A0';

 end;

9.      Loyihani saqlab  uni testdan o’tkazish..

 

3. Topshiriqlar

1. Dastur interfeysini o’zgartiring: shriftini, ekran va harflar rangini.

2. ListBox1 maydoniga kursorni olib borganda nima qilish kerakligini ko’rsatuvchi eslatma hosil bo’lsin.

Eslatma. ListBox1 komponenti uchun Hint (matnli xabar), Showhint (xabarni ko’rsatish shartmi) xossalaridan foydalaning.

Комментарии

Популярные сообщения из этого блога