harfi aks etadi. #42 o'miga bevosita ekranga chiqarilishi kerak bo'lgan bclgini
kiritish ham mumkin. Masalan, "+",
3. Foydalanuvchini qutlash ilovasi. Ilovada foydalanuvchi o'z noraini va hamma
uchun umumiy bo'lgan parol: "12345" ni kiritishi kerak bo'lsin. Buning uchun
Delphida yangi ilova yaratamiz
va uning oynasiga ikkita label, uchta edit, bitta
button obyektini kiritamiz. Ularning xossalarini obyekt inspektori (object
inspector)da quyidagicha o'zgartiramiz:
Bu ishlarni bajarib bo'lgach, buttonl ni ikki marta bosamiz va ekranda hosil bo'lgan
dastur matni oynasida kursor turgan joyga quyidagi operatorlarni bexato kiritamiz:
Bu operatorlar Buttonl tugmasini bosganimizda ishlab ketadi. Ulardan
birinchisi Bdit2 maydonchasiga kiritilgan parol to'g'riligini tekshiradi. Agar to'g'ri
bo'lsa, u holda uchinchi satrdagi operator uchinchi maydonchaga foydalanuvchini
tabriklovchi mam satrini chiqaradi. Keyingi uchta satrdagi operatorlar endi keragi
bo'lmay qolgan ikkita Labell, Label2,
ikkita Editl, Edit2 va Buttonl obyektlarini
oynada ko'rinmaydigan qilib qo'yadi. Aks holda uchinchi maydonchaga parol xato
terilgani haqida xabar chiqadi va qayta urinib ko'rish mumkin.
Quyidagi rasmlarning birinchisida parol noto'g'ri terilgandagi, ikkinchisida parol
to'g'ri terilgandagi holatlari aks ctgan.
Dostları ilə paylaş: