Nabijonova Umida Boshqarish obyektlaring faolligi va ko’rinmasligi mavzu: Visible

Nabijonova Umida
Boshqarish obyektlaring
faolligi va ko’rinmasligi
MAVZU:
Visible (ko‘rinadigan) U mantiqiy turdagi xossa bo‘lib, faqat True (Rost) yoki False (Yolg‘on) qiymatlami qabul qiladi. Obyektning Visible xossasi dastlab rost bo‘ladi va obyekt oynada ko‘rinib turadi Agar bu xossani yolg‘on qilib o‘matsak, obyekt oynada koAgar ikkita va undan ko’p boshqarish obyektlaridan bir vaqtda foydalanilmasa,ulardan faqat bittasini Visible xossasini rost qilib qolganini yo’lgin qilib o’rnatib ilova oynasining bitta joyiga qo’yish
Va joyni tejash mumkin.
Button tugmasining Visible xosasi.
Rasmda Delphi 7 asosiy menyusining Edit (Tahrirlash) bo‘limi aks etgan. Uning ko‘plab bandlari xira tortib qolganini ko‘rish mumkin. Bu ular faol emasligi sababli, ulardan shu paytda foydalanib bo4lmasligi bildiradi.
Masalan, menyuning to‘rtinchi bandi Copy (nusxa olish)dan foydalanish uchun awal matrming biror bo‘lagini ajratib olish kerak. Matrming biror qismi ajratib olinishi bilan undan nusxa olish mumkin bo‘ladi va menyuning Copy bandi faollashib, to‘q rangda paydo bo‘ladi va bu amalni bajarish mumkin bo‘ladi
Boshqarish obyektining Enebled xossasi.
Edit menyusi
Boshqarish obyektlarining Enabled (faol) xossasi shu maqsadga xizmat qiladi. Bu xossa ham mantiqiy qiymatlami qabul qiladi. Agar uning qiymati rost bo‘lsa, obyekt faol, yolg‘on bo‘Isa, obyekt sust holatda bo‘ladi.
Dastlab barcha obyektlar uchun bu xossa qiymati rost boclib, ular fao holatda bo‘ladi. Agar bu xossani yolg‘on qilib o‘matsak, obyekt oynada ko‘rinib tursada, u xira tortib qoladi. Undan vaqtincha foydalanib bo‘lmaydi.
Visible va Enabled xossalaridan foydalanish.

• Obyektlaming bu xossalaridan foydalanib, oxirgi ilova ishini yaxshilaymiz. Uning oynasi kengligi 600 dan oshib ketsa, Buttonl tugmasining Enabled xossasini yolg‘on qilib o‘matamiz. Natijada oynani boshqa kengaytirib bo‘lmaydi. Dastlab ikkinchi tugma Button2 ilova oynasida ko‘rinmasin (Button2.Visible=False). 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 (Buttonl.Enabled:=True). Oyna kengligi 400 dan kamayib ketsa, ikkinchi tugma yana g‘oyib bo‘lsin 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:

Delphi7 da quydagi ilovani xosil qildik.
Button1 ni ichiga quydagi kodni kiritamiz,
Button2 ni ichiga quydagi kodni kiritamiz,
Begin
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;
Begin
If Form1.Width>400 then begin
Form1.Width:=Form1.Width-16;
Form1.Height:=Form1.Height-9; End else begin
Button2.Visible:=False; if Form1.Width<600 then
Button1.Enabled:=true; end;
Button1 ni ko’d kiritgandan keyingi ishlagan xolati
Button2 ni ko’d kiritgandan keyingi ishlagan xolati