НұСҚаулар bi 2214 «Бағдарламалық инженерия»
int Ibik=Form1->Image1->ClientHeight; // image1-дин биктги int
жүктеу/скачать 78,79 Kb.
|
- Бұл бет үшін навигация:
- 6 зертханалық жұмыс
| 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. 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 зертханалық жұмыс Пайдаланушы интерфейсін әзірлеу жүктеу/скачать 78,79 Kb. Достарыңызбен бөлісу:
|