Laboratoriya ishi №5 “html tilida web sahifalar yaratish” Ishning maqsadi

Obyekt	Svoystvo
Kattalik
Label1	Caption	Mepning birinchi dasturim!
	Font	12 p., qizil
	Alignment	TaCenter
	Color	Sariq (Yellow)
	AutoSize	False

4. 
   Dasturni ishga tushiring: menyu Run yoki F9.
   
5. 
   Xosil boʻlgan forma va loyixani saqlang: Menyu File, Save All, oʻz papkangizda 2-lab pakasini yarating va loyixa faylarini saqlang.
   
6. 
   Button obyektini formaga Form1 oynasiga joylang. Tugma nomi avtomatik Button1 nomiga ega boʻladi. Uni oʻlchamini oʻzgartiring.
   
7. 
   Button1 obyektini Caption xossasini "Kattakashtirish " kattaligiga oʻzgartiring.
   
8. 
   Button1 obyektini Click xodisasiga quyidagshicha dastur kodini kiriting: buning uchun Button1 obyekti ustida sichchqonchani ikki marta cherting, dasstur kodini kiritsh oynasida tugmani bosigandagi xodisasi paydo boʻladi (procedure TForm1.btn1Click(Sender: TObject);) undaan Begin va End soʻzlari orasiga quyidagi dastur kodini kiritamiz: Label1.Font.Size := Label1.Font.Size +2;
   
9. 
   Dasturni ishga tushiring. Bunda dasturdagi “Kattakashtirish” tugma chertilganda yuz beradigan xodisaga eʼtibor qiling.
   
10. 
    Forma va loyixani saqlang: Menyu File, Save.
    
11. 
    " Bajarish Tugmasi " obyektini yarating bu orfali matn shrifti oʻzlchamini oʻzgartirish amalga oshiriladi.
    
12. 
    Buning uchun " Bajarish Tugmasi " obyektini chertganda xodisasiga kuyidagi kodni kiritasiz:
    

Label1.Left := Label1.Left + 10;
Label1.Top := Label1.Top + 10;
13.Dasturni yopish tugmasini “Close” yarating va uni chertganda xodisasiga kuyidagi kodni kiriting: Close;
14. Loyixa va formani saqlang.

3. 
   Vazifa. Sodda matemtik dastur yaratish
   

Ishning maqsadi: Windows OTmidagi oddiy dasturlarni vizuol loyixalashni oʻrganish.
Bunday dasturni loyixalashtirish uchun kerk boʻladigan kompanentlar bilan anishimiz.
Button – standart tugma, koʻpincha tugmalar biron bir xodisani ishga tushirish uchun qoʻllaniladi, bunda uchuning OnEvent (bosgandagi reaksiyasi) xodisasidan foydalaniladi. kompanentning Default=True xossasi uni Enter tugmasi bilan teng kuchliligini anglatadi, Cancel=True – esa Esc tugmasi bilan. Kompanentning Color xossasi mavjud emas, undagi matnni oʻzgartirish uchun (Caption) xossasidan foydalaniladi, tugma matnidagi ampersant (&) belgisi tezkor tugma (Alt-klavisha) bilan ishlash imkoniyatini beradi, misol uchun, Caption=A&Ppend Alt-P tugmalari birligini bosganda ishga tushishini anglatadi. ModalResult=true xossasi yordamichi oynani yopish uchun bosilishi shartligini anglatadi .
Label – yozuv, matn yoki oʻqish uchun matn kiritish maydoni sifatida foydalaniladi. Tugma kabi yozuv uchun xam tezkor ishga tushirish tugmasiga bogʻlash mumkin lekin kompanentning FocusControl bilan birgalikda ishlatiladi. AutoSize=True xodisasi yozuvni undagi matn oʻlchamiga mosligini taʼminlaydi, Aligment – matnni joylashuvini, WordWrap – matnni bir necha qator boʻlishini, Transparent – boshqa elementlar bilan foydalanilganda shaffofligini taʼminlaydi.
E dit – kiritish qatori. bu kompanentning sarlavxasi (Caption) yoʻq, lekin kiritish madoni Text xossasi mavjud. Bu xossasini oʻqish yoki unga maʼlumot berish mumkin (kerak boʻlganda uni uzunligini MaxLength xossasi yordamida boshqarish mumkin). Yashirin axborotlarni (konfidensial) kiriitshda undagi belgilarni yashirin belgilarga (koʻpincha *) almashtirish mumkin, buning uchun uning PasswordChar xossasidan foydalanish kerak.
K laviatura orqali kiritilgan ikki son yigʻindisini koʻrsatuvchi dastur loyixasini tuzamiz.
Buning uchun formadi 4ta yozuv obyektini joylashtiramiz, (ularni Caption xossasini mos xolda oʻzgartiramiz) ularda 4 chisini Caption – xossasi boʻsh qolidiriladi, unda biz yakuniy ikki son yigʻindisini koʻrsatamiz. Yigʻindisini xisoblash uchun ikkita sonni kiritsh uchun kiritsh qatori obyektlarini formaga joylashmiz. Ularnga mos boʻlgan yozularni ular qarshisiga joylaymiz ("pervoye" va "vtoroye") va bitta xisoblashni bajartirish va uni natijasini yozuvda koʻrsatish uchun tugma joylaymiz "Raschet".
Formadagi tugmani ikki marta chertganimizda tugmani cherganda yuz beraligan xodisa protsedurasi paydo boʻladi va unga quyidagi dastur kodini kiritamiz (qizil rangli matn kiritsh kodi xisoblanadi).
procedure TForm1.Button1Click(Sender: TObject);
var a,b,c: real;
s: string; code: integer;
begin
{kiritsh qatoridagi maʼlumotlarni qabul qilish}
val(edit1.text,a,code);
val(edit2.text,b,code); c:=a+b;
str(c:–10:4,s); {raqamni qatorga aylantirish }
label4.Caption:=s
end;

4. 
   Vazifa. Raqamli soat.
   

Ishning maqsadi: Raqamli soat koʻrinishida ishlaydigan Windows-dasturini tuzish.

1. 
   Form1 formasiga Label (Standard boʻlimi) i Timer (System boʻlimi) kompanentlarini joylang.
   
2. 
   Obyektlarni xossalarini quyidagicha oʻrnating