• Brush
  • Procedure TForml.TimerlTimer(Sender: TObject); Begin x:=x+0.1; Shape2.Left:=265+Trunc(50*Cos(x)); Shape2.top:=150-Trunc(50*Sin(x));
  • Multiplikatsiya Grafik komponentalar




    Download 35,63 Kb.
    bet8/10
    Sana08.02.2024
    Hajmi35,63 Kb.
    #153462
    1   2   3   4   5   6   7   8   9   10
    Bog'liq
    Delphi tizimining oynasi va uning elementlari
    cybersecurity-artificial-intelligence 11111 (1) (1), 1. Nosimetrik shifrlash algoritmlari Assimetrik shifrlash algori, 402-guruh onlayn kurslar, Elektron ta\'limni boshqaruv vositalari 191 Begbo\'tayeva Sadoqat-fayllar.org, 4-labaratoriya mashg\'ulot topshirig\'i, Pythonda turtle kutubxonasi bilan ishlash (1), 1-mavzu. Zamonaviy axborot texnologiyalari va ularni qoʻllanilishii, Презентация Microsoft PowerPoint (4), Usmon, 9, SANOAT, 1427572, Matematika va informatika ta, 619-guruh dasturlash tillari oraliq nazorat 22.10.2022, Sanoat korxonalarida mehnat gigienasi va ishlab chiqarish sanitariyasi1
    Ye ch i sh
    1.Yangi ilova yaratamiz.
    2.Formaga Timer komponentasini Timerl nomi bilan joylash- tiramiz.Uning Interval xossasini 55 qilib o‘rnatamiz. Jarayon ya’ni hodisa 55 millisekundda paydo bo’ladi (uyg‘onadi).
    3.Additional palitrasidan Shape komponentasini Shapel nomibilan formaga joylashtiramiz va uning quyidagi xossalarini o‘rnatamiz.
    Shape — StCircle; Height — 121;
    Width - 121; Left - 240;
    Top - 104.
    Brush xossasini tanlab ikki marta sichqonchani bosamiz, natijada ikkita yana qo‘shimcha xossalar paydo bo’ladi: Color va Style. Color xossasini tanlab, unga slBlue qiymatini o‘rnatamiz.
    4.Formaga ikkinchi Shape komponentasini Shape2 nomi bilan joylashtiramiz va uning quyidagi xossalarini o‘rnatamiz.
    Shape — StCircle; Height — 41;
    Width - 41; Left - 400;
    Top - 152.
    Brush xossasiga clYellow rangini o‘rnatamiz.
    5. Formaning yuqori qismiga Label komponentasini Labell nom bilan joylashtiramiz va uning Caption xossasini «Oyning Yer atrofida aylanishi» qiymatiga o‘zgartiramiz. Font xossasiga kirib kerakli shriftni va uning o’lchamini aniqlaymiz (agar kerak bo‘lsa).
    Masalan,
    IHpmJiT—Koypnep HeB;
    HanepTaHHe— polujimiy;
    Pa3Mep— 16;
    HaSopchmbojiob— krilitsa.
    Transparent xossasi qiymatini Time qilib o‘rnatamiz.
    6.Timerl komponentini aktivlashtiramiz, ya’ni uni ikki marta tez- tez bosamiz va kodlami yozish oynasiga quyidagi qora yozilgan kodlami kiritamiz:
    Procedure TForml.TimerlTimer(Sender: TObject);
    Begin
    x:=x+0.1;
    Shape2.Left:=265+Trunc(50*Cos(x)); Shape2.top:=150-Trunc(50*Sin(x));
    end;
    7.Tuzilgan loyiha ya’ni Projectl va Unitl standart modul nomlarini mos nomlar bilan almashtirib saqlanadi.
    8.Yangi nom bilan saqlangan loyiha, ya’ni ilova F9 tugmachasini bosish bilan ishga tushiriladi.
    Ilova ishga tushirilganda ekranda Oyning Yer atrofida aylanishi namoyish qilinadi.
    Tashkil qilingan modulning to‘liq ko‘rinishini keltiramiz:

    Download 35,63 Kb.
    1   2   3   4   5   6   7   8   9   10




    Download 35,63 Kb.

    Bosh sahifa
    Aloqalar

        Bosh sahifa



    Multiplikatsiya Grafik komponentalar

    Download 35,63 Kb.