O‘quv mashg‘ulotining o‘qitish
Download 4.02 Mb.
|
informatika 120soat To\'plam
- Bu sahifa navigatsiya:
- ILOVA
ILOVAUy vazifasi va o‘tilga mavzu uchun savollar Timer ishlatiladigan holatlarga misollar keltiring. Timer obyekti obyektlar panelining qaysi jildida joylashgan? ILOVAFaydalaniladigan adabiyotlar: ILOVAFan bo'yicha o'quvchilarni o'zlashtirish, baholash mezonlari
ILOVATa‘lim oluvchilar bilimini faollashtirish Raqamli soat hosil qilish? Timer komponenti ? ILOVATimer obyektining xossalari. Ba‘zan ilovada vaqtga bog’liq amal arni bajarishga to’g’ri keladi. Masalan, ilovada joriy vaqtni ko’rsatuvchi soat bo’lsa, har sekundda ko’rsatilayotgan vaqtni yangilab turish kerak. Aks holda soatdagi vaqt orqada qolib ketadi. Taymer obyektining o’ziga xos xususiyati uning ekranda ko’rinmasligidir. Taymer obyekti obyektlar panelining System (Tizim) jildida joylashgan: Elektron soat va Taymer ilovasi. Elektron soat ilovasini yaratamiz. Yangi ilova yaratib, uning sarlavhasini elektron soatga o’zgartiramiz. Ilova oynasiga ikkita obyekt: Label va Timer joylaymiz. Label ning Font (shrift) xossasini ikki marta bosib, shrift muloqot oynasida shrift o’lchamini 24 ga teng qilib o’rnatamiz: Timer obyektini ikki marta bosib, uning protsedurasiga Label1.Caption:=TimeToStr(Now); operatorini kiritamiz. Bu operatorda ikkita standart funksiyadan foydalanilayapti. Ulardan birinchisi Now (hozir) bo’lib, uning qiymati kompyuterning soati bu funksiya ishga tushgandagi vaqtiga teng: Taymer ilovasi. Yangi ilova yaratib, uning oynasiga Label, Button, SpinEdit va Timer obyektlarini joylaymiz. Label va Button sarlavhalarini QOLGAN VAQT: va START larga o’zgartiramiz. SpinEditning xossalarini quyidagicha o’rnatamiz: SpinEdit1.MaxValue:=100; SpinEdit1.Value:=30; SpinEdit1.Enabled:=False; Button tugmasini ikki marta bosib, uning protsedurasiga Timer1.Enabled:=True; operatorini kiritamiz. Timerni ikki marta bosib, TForm1.Timer1Timer protsedurasiga quyidagi dastur kodini kiritamiz: SpinEdit1.Value:=SpinEdit1.Value-1; if SpinEdit1.Value=0 then begin Timer1.Enabled:=False; ShowMessage('VAQT TUGADI.'); Form1.Close; end; Download 4.02 Mb. Do'stlaringiz bilan baham: |
Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling
ma'muriyatiga murojaat qiling