• Hodisalar orqali shakl chizish.
  • Turli shakllarni bo‘yyash




    Download 1,92 Mb.
    bet118/131
    Sana16.06.2024
    Hajmi1,92 Mb.
    #264063
    1   ...   114   115   116   117   118   119   120   121   ...   131
    Bog'liq
    Tiplarni dinamik tarzda

    Turli shakllarni bo‘yyash. Bunda komponentaning berilgan joyida, bo‘yyalgan shaklarni chizishni ko‘ramiz. Buning uchun Brush – mo‘yqalamdan foydalanib, 1 ta komponenta, 1 ta label va 1 ta Combox komponentalarini oynaga qulay qilib joylashtiramiz.
    1-qadam. Oynaning Form1_Load hodisasida quyidagi algoritmni joylashtiramiz.

    this->Text = "Shaklni boʻyash";
    label1->Text = "Kerakli shaklni tanlang:";
    comboBox1->Text = "Shakllar";comboBox1->Items->Add("Toʻrtburchak");
    comboBox1->Items->Add("Ellipis"); comboBox1->Items->Add("Qirqilgan doira ");

    comboBox1->Items->Add("Doira");


    comboBox1->Items->Add("Qirqilgan doira ");


    1. qadam. Komponenta va ComboBox xususiyatlarini sozlash amallarni

    bajarish mumkin.

    1. qadam. ComboBox komponentasining comboBox1_SelectedIndexChanged

    hodisasida quyidagi algoritmni joylashtiramiz.


    Graphics ^grp = pictureBox1->CreateGraphics(); Brush ^ brsh = gcnew SolidBrush(Color::Green); grp->Clear(SystemColors::Control);

    switch (comboBox1->SelectedIndex){ case 0:


    grp->FillRectangle(brsh,50,50,150,150); break; case 1:
    grp->FillEllipse(brsh,50,50,300,150); break; case 2:
    grp->FillEllipse(brsh,50,50,150,150); break; case 3:
    grp->FillPie(brsh,50,50,150,150,150,100); break; default:
    grp->Clear(SystemColors::Control);break;
    }




    12.3-rasm. Turli shakllarni bo‘yyash natijasi.
    Hodisalar orqali shakl chizish. Hamma "Paint" kabi dasturlarni biladi. Uning eng ajoyib xususiyatlaridan biri sichqoncha bilan chiziqlar chizishdir. Buni amalga oshirish uchun komponentning sichqoncha bilash ishlash "MousDown", ""MausUp" i "MouseMove" hodisalarijan foydalanish mumkin. Dasturning algoritmi g‘oyasi quyidagicha: foydalanuvchi sichqonchaning chap tugmasini bosganda kursor orqasiga juda ko‘p kichik kvadratlar chizila boshlaydi. Bu kvadratlar hajmi kodda ko‘rsatilgan. Bundan tashqari, "tugma" tugmachasini rasmga tushiradigan shaklga ko‘chirishingiz kerak. Bunda komponentaning berilgan joyida, sichqoncha hodisalari orqali shaklarni chizishni ko‘ramiz. Buning uchun Brush – mo‘yqalamdan foydalanib, 1 ta komponenta, 1 ta button komponentasini oynaga qulay qilib joylashtiramiz.


    button1->Text = "Tozalash"; this->Text = "Shakl chizish";
    1-qadam. Oynaning Form1_Load hodisasida quyidagi algoritmni joylashtiramiz.

    1. qadam. Komponenta va button xususiyatlarini sozlash amallarni bajarish mumkin.

    2. qadam. button komponentasining button1_Click hodisasida quyidagi algoritmni joylashtiramiz. Bu algoritm komponentaning tozalash uchun ishlatiladi.


    Graphics ^ grp = pictureBox1->CreateGraphics(); grp->Clear(SystemColors::Window);


    1. qadam. Komponentaning sichqoncha hodisalarini qayta ishlash uchun

    mantiqiy bir o‘zgaruvchi olinadi, uning qiymati [0] bo‘lsin. Bool Drow = false;

    1. qadam. Sichqoncha komponentaning ustiga kelganda mantiqiy o‘zgaruvchining qiymati 1 ga o‘zgaradi. Chunki chizishni boshlash uchun. Buni amalga oshirishsh uchun sichqonchaning pictureBox1_MouseDown hodisasiga Drow = true; ni yozib qo‘yamiz.

    2. qadam. Sichqoncha komponentaning ustidan ketganda mantiqiy o‘zgaruvchining qiymati 0 ga o‘zgaradi. Chunki chizishni tugatish uchun. Buni amalga oshirishsh uchun sichqonchaning pictureBox1_MouseUp hodisasiga Drow= false; ni yozib qo‘yamiz.



    1. qadam. Sichqoncha komponentaning ustida kelganda chizishi uchun quyidagi algoritmni kiritamiz.


    Graphics^ graf = pictureBox1->CreateGraphics(); if (Drow == true){
    graf->FillEllipse(Brushes::Violet, e->X, e->Y, 3,3); // moʻy qalam qalinligi
    }

    Algoritmda shakllarni hosil qilish uchun juda kichik ellipischalardan
    foydalanamiz.

    12.5-rasm. Sichqoncha bilan turli shakllarni chizish.



    Download 1,92 Mb.
    1   ...   114   115   116   117   118   119   120   121   ...   131




    Download 1,92 Mb.