O‘zbekiston Respubllkasi Xalq ta'limi vazirligi tasdiqlagan

3. Visible va Enabled xossalaridan foydalanish. Obyektlarning bu xossalaridan foydalanib, oxirgi ilova ishini yaxshilaymiz. Uning oynasi kengligi 600 dan oshib ketsa, Button1 tugmasining Enabled xossasini yolg‘ono‘rnatamizqilib.Natijada oynani boshqa kengaytirib bo‘lmaydi. Dastlab ikkinchi tugma Button2 ilova oynasida ko‘rinmasin (Button2.Visible=False).

99

Birinchi tugma yordamida ilova oynasini kengaytirib boramiz. U 600 dan oshib ketishi bilan ikkinchi tugma oynada paydo bo‘ladi (Button2.Visible:=True) va birinchi tugma xira tortib qoladi (Button1.Enabled:=False). Endi faqat ikkinchi tugma yordamida ilova oynasi kengligini kamaytirish mumkin. Kenglik 600 pikseldan kamayishi bilan birinchi tugma yana faol holatga o‘tsin (Button1.Enabled:=True).

Oyna kengligi 400 dan kamayibo‘lsinkets va oynani boshqa kichiklashtirib bo‘lmasin.
Birinchi tugma bosilganda nima qilish kerakligini ko‘rsatish uchun uni ikki marta bosamiz va kursor turgan joyga quyidagi kodni kiritamiz:
If Form1.Width<600 then begin Form1.Width:=Form1.Width+16;
Form1.Height:=Form1.Height+9; End else begin
Button2.Visible:=True; Button1.Enabled:=False; end;
Ikkinchi tugmani ikki marta bosib quyidagi dastur bo‘lagini kiritamiz:
If Form1.Width>400 then begin Form1.Width:=Form1.Width-16;
Form1.Height:=Form1.Height-9; End else Button2.Visible:=False;
if Form1.Width<600 then Button1.Enabled:=True;



YODDA SAQLANG !
Har bir vizual obyekt faol yoki sust, ko‘rinmas yoki ko‘rinadigan holatda bo‘lishi mumkin.

100