НұСҚаулар bi 2214 «Бағдарламалық инженерия»


int Ibik=Form1->Image1->ClientHeight; // image1-дин биктги int



бет8/13
Дата17.09.2023
өлшемі78,79 Kb.
#108298
түріНұсқаулар
1   ...   5   6   7   8   9   10   11   12   13
Байланысты:
МУ лабы (1)

int Ibik=Form1->Image1->ClientHeight; // image1-дин биктги int Iyz=Form1->Image1->Width; //image1-дин узындыгы
// Y осьти сызу, ол (xY,yY) басталып (xY,cY) нүктеде бітеді; float xY=Iyz/2;


float yY=10; float cY=Ibik-10;
Form1->Image1->Canvas->MoveTo(xY,yY);
Form1->Image1->Canvas->LineTo(xY,cY);
// X осьти сызу ол (xХ,yХ) басталып (сХ, yX ) нүктеде бітеді; float xX=10;
float yX=Ibik/2; float cX=Iyz-10;

Form1->Image1->Canvas->MoveTo(xX,yX);


Form1->Image1->Canvas->LineTo(cX,yX); //бастапкы мандерди аныктау


x1=-5; x2=5; y1=f(x1); y2=f(x2); //масштабты тагайындау mx=Iyz/(x2-x1); my=Ibik/(y2-y1);


//координата бас нуктеге (xY,yX) бару x0=xY; y0=yX; Form1->Image1->Canvas->MoveTo(x0,y0);


//график сызу басталды x=x1;




while (x{
Form1->Image1->Canvas->Pixels[x0+mx*x][y0-my*f(x)]=clBlack; x=x+0.01;
}

//


Form1->Image1->Canvas->TextOutA(x0,y0,'0');

Form1->Image1->Canvas->TextOutA(xY,yY,"Y");


Form1->Image1->Canvas->TextOutA(cX,yX,"X");


}


//---------------------------------------------------------------------------


__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)


{


}

//---------------------------------------------------------------------------




void __fastcall TForm1::Button1Click(TObject *Sender)

{


GrafSizy();

}


//---------------------------------------------------------------------------


void __fastcall TForm1::FormCreate(TObject *Sender)
{
Memo1->Text="Программа у=ехр(х) функциясынын [-5,5] аралыгындагы графигин 0.01 кадаммен салып шыгады";
}


5. Канвада қолданылатын сурет салу құралдарын пайдалану, Pen(қалам,қарындаш, ,


қылқалам. Канваның Pen(ТPen) қасиеті бар. ТРen қасиеті объект ретінде қарастырылады. Бұл объектінің Өзінің де қасиеттері бар.

Негізгі қаситтері:




Color қалам түсі


Width қалыңдығы (қалыпты жағдайда 1 пикселге тең!)


Height - биіктігі
Style қалам стилін білдіреді

Канваның келесі қасиеттерін пайдаланып суреттер салуға болады:




PenPos(TPoint) бұл қасиет канваның қаламының бастапқы позициясын анықтайды, яғни қаламның қай жерде тұрғанының координатасын кӨрсетеді.


K=Image1->Canvas-> PenPos ;


MoveTo(x,y) қасиеті қаламды координаталары (x,y) нүктесіне апарып қояды;
Draw(x,y; Graphic:); - бұл графиктік обьектіні канваға шығарады. График обьектісінің орнында .bmp, .ico немесе метафайл болуы мүмкін.
6. Суретке мәтін шығару.TextOut(x,y; const AnsiString Text); - бұл х,у нүктесінен бастап текст тұрақтысында сақталған мәтінді канваға шығарады.
7. Тұйық облыстарды бояу.FillRect(const TRect Rect); - канвада Rect тӨртбұрышын бояйды. Бояу үшін қылқаламның түсі және стилі қолданылды.
FloodFill(x,y; TColor Color; TFillStyle FillStyle); - х,у нүктесінен бастап немесе х,унүктесі жататын тұйық облысты Color түске FillStyle стилмен немесе Өрнекпен /узор/ бояйды.
Brush бұл канваның қасиеті болып табылады. Канвадағы тұйық фигураларды бояйды. Канваның Өзінің фонын кӨрсетеді.
Brush обьектісінің негізгі қасиеттер:
Color түсін береді


Өзіндік жұмыс тапсымалары
Тапсырмалар:

  1. Функцияның графиктерін салу программасын құрыңыз: 1. y=a*x^2+b*x

2. y=x^3+a*x^2+b*x
3. y=a*sinx +b
4. y=-a*x^2+b*x
5. y=a*x^5
6. y=a*cos(x-1)+|x|
7. y=a/x
8. y=(x+a)/(x-b)
9. y=a+b/x+c/x^2
10. y=a-b/x-c/x^2

Бақылау сұрақтары


1 Бір объект басқа объектке ӛз жағдайының ӛзгергені туралы қалай хабарлай алады?


2 Ӛз жағдайының ӛзгергені туралы басқа объектке хабарлайттын объект қалай аталады?
3 Кейбір оқиғалардың «бос» ӛңдеуіші қалай құрылады?
4 Формада button1 батырмасын екі рет шерткенде қандай оқиға ӛңдеуіші құрылады?
5 Кластарда операциялардың қайта анықтау не үшін қолданылады?
6 Мұрагерлік ұғымы?
7 Кластарды мұраланудың негізгі мақсаты неде?
8 Қасиеттерін, деректерін, әдістерін басқа класс мұраланған болса, онда ондай класс қалай аталады?
9 Базалық класс қасиеттерін, деректерін, әдістерін мұраға алатын класты қалай атайды?
10 ОББ неге негізделген?

6 зертханалық жұмыс Пайдаланушы интерфейсін әзірлеу




Достарыңызбен бөлісу:
1   ...   5   6   7   8   9   10   11   12   13




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет