Mavzu: showmessage oynasi darsning borishi: Tashkiliy qism



Download 57,1 Kb.
Sana09.09.2021
Hajmi57,1 Kb.
#169116
Bog'liq
Дарс ишланма
differensial tenglamalar, differensial tenglamalar, Ishqqa oid qirq qoida, Malaka ishi mavzusi 1, Muhabbat, Турганбаев, Турганбаев, Дарс ишланма, Дарс ишланма, Дарс ишланма, Дарс ишланма, djkfgdljkfg

Mavzu: SHOWMESSAGE OYNASI
Darsning borishi:

  1. Tashkiliy qism:

O‘quvchilar bilan salomlashish

Xonani va o‘quvchilarni darsga tayyorliklarini kuzatish

Yo‘qlamani aniqlash

Navbatchi axboroti.

Siyosiy daqiqa.


  1. Darsning maqsad va vazifalarini qo‘yish.

  2. Tayanch bilimlarning faollashtirish.

Uyga vazifalarini tekshirish va o‘tilgan mavzuni mustahkamlash.

Oldingi mashg‘ulotda berilgan mashqni kompyuterda bajaring.



  1. Dars materiallarini tushuntirish (materiallarni tushuntirish dars prezentatsiyasi va videorolik, amaliy harakatlar, tayyor ishlar ko‘rgazmasini namoyish qilish bilan birgalikda olib boriladi).

Nazariy qism:

1. Ikkinchi ilovaning kamchiliklari. Ikkinchi ilovani ishga tushirib, undagi “++” tugmasini ming marta bossak, ilova ekranining eni 16000 pikseldan oshib ketadi. Bu esa dasturchi uchun kechirib bo‘lmas xato. Uni bartaraf qilish uchun ilova oynasi eni ming pikseldan oshsa, boshqa kattalashtirmaslikka kelishib olamiz. Lekin foydalanuvchi tugmani bossada, unda hech qanday o‘zgarish ro‘y bermasa, dasturning to‘g‘ri ishlayotgani unda shubha tug‘dirishi mumkin.

2. ShowMessage protsedurasi. Buning oldini olish uchun ilova o‘z oynasi eni 600 dan oshib ketganligi haqida ekranga alohida oynada xabar chiqarsin. Bu ishni ShowMessage orqali amalga oshiramiz.

Ikkinchi ilovadagi Button1 tugmasini ikki marta bosib, paydo bo‘lgan protseduradagi avvalgi ikki operatorni quyidagicha qayta yozib chiqamiz:

If Form1.Width<600 then begin

Form1.Width:=Form1.Width+16;

Form1.Height:=Form1.Height+9; End else

ShowMessage(‘Oyna boshqa kengaymaydi’);

Ilovani ishga tushirib, uning tugmasini bir necha marta bossak, ekranga

quyidagi yozuv chiqadi. Undagi OK tugmasini chertmagunimizcha, ilova

o‘z ishini to‘xtatib turadi.

3. IntToStr funksiyasi. Ilovaning ishini yanada yaxshilaymiz. Ilova o‘z

oynasining o‘lchamlarini o‘zgartirganda ular qanday bo‘lgani bizga

mavhumligicha qolmoqda. Uni ilova oynasiga chiqarishning iloji bormi?

Hozircha biz buning bitta yo‘lini bilamiz: oyna o‘lchamlarini oyna

sarlavhasiga chiqarish. Buning uchun

Form1.Caption:=Form1.Height+’*’+Form1.Wide;

operatoridan foydalanamiz. Lekin bu operatordan foydalanib bo‘lmaydi, chunki unda bir turdagi o‘zgaruvchiga ikkinchi turdagi o‘zgaruvchini kiritishga urinish bo‘layapti. Delphida bu xatoga olib keladi.

Butun son turidagi kattalikni matn satri turidagi kattalikka o‘tkazish

uchun IntToStr (integer to string – butundan satrga olingan)

funksiyasidan foydalanamiz:

Form1.Caption:=’(‘+IntToStr(Form1.Height)+’*’+In

tToStr(Form1.Wide)+’)’;

Unga ilovaning haqiqiy nomini ham qo‘shib qo‘yamiz:

Form1.Caption:=’Uchinchi ilova’+ Form1.Caption;

Button1 tugmasini ikki marta bosib, dastur kodi oynasini chaqiramiz va

oxirgi ikki satrni unga qo‘shib qo‘yamiz:

If Form1.Width<600 then begin

Form1.Width:=Form1.Width+16;

Form1.Height:=Form1.Height+9; End else

ShowMessage(‘Oyna boshqa kengaymaydi’);

Form1.Caption:=’(‘+IntToStr(Form1.Height)+’*’+IntTo

Str(Form1.Width)+’)’;

Form1.Caption:=’Uchinchi ilova ’+ Form1.Caption;

Ilovani ishga tushirib, uning sarlavhasi o‘zgarishini kuzatamiz:




  1. Amaliy ish:

Mavzu yuzasida savol va topshiriqlar:

1. Ikkinchi ilovaning kamchiligi nimada?

2. ShowMessage ning vazifasi nimada?

3. IntToStr funksiyasi nima vazifani bajaradi?

4. Uchinchi ilovani shunday o‘zgartiring-ki, u a) ilova oynasining eni

800 dan, b) ilova oynasi bo‘yi 450 dan oshsa ekranga ogohlantiruvchi

yozuvni chiqarsin.

Asosiy tushunchalar:



  1. Darsga yakun yasash:

O‘quvchilarni olgan bilimlari hamda qilgan ishlarini nazorat qilib baholash, ularni yo‘l qo‘ygan kamchiliklarini to‘g’irlash.




  1. Uyga vazifa berish:

1. Ilova oynasining asosiy xossalarini esga oling va daftaringizga

ko‘chirib oling.


O‘IBDO‘: _________________________
Download 57,1 Kb.

Do'stlaringiz bilan baham:




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©hozir.org 2022
ma'muriyatiga murojaat qiling

    Bosh sahifa
davlat universiteti
ta’lim vazirligi
axborot texnologiyalari
maxsus ta’lim
zbekiston respublikasi
guruh talabasi
O’zbekiston respublikasi
nomidagi toshkent
o’rta maxsus
davlat pedagogika
texnologiyalari universiteti
toshkent axborot
xorazmiy nomidagi
rivojlantirish vazirligi
pedagogika instituti
Ўзбекистон республикаси
tashkil etish
haqida tushuncha
таълим вазирлиги
vazirligi muhammad
O'zbekiston respublikasi
toshkent davlat
махсус таълим
respublikasi axborot
kommunikatsiyalarini rivojlantirish
vazirligi toshkent
saqlash vazirligi
fanidan tayyorlagan
bilan ishlash
Toshkent davlat
sog'liqni saqlash
uzbekistan coronavirus
respublikasi sog'liqni
coronavirus covid
koronavirus covid
vazirligi koronavirus
qarshi emlanganlik
covid vaccination
risida sertifikat
sertifikat ministry
vaccination certificate
Ishdan maqsad
fanidan mustaqil
matematika fakulteti
o’rta ta’lim
haqida umumiy
fanlar fakulteti
pedagogika universiteti
ishlab chiqarish
moliya instituti
fanining predmeti