Körök és ellipszisek
Laboratóriumi munka számítástechnika a speciális „modellezés és Operations Research szervezési és műszaki rendszerek”
12. ábra - Star
Csillagok felhívja eljárás Starline. amely megkapja paraméterként a koordinátákat a központ a csillag és a vászon, amin a csillag a kiadandó. Először koordinátáinak kiszámításához a csillagok, és mélyedések, ami meg van írva, hogy a tömb p. Továbbá, ez a tömb átadva paraméterként a módszer Töröttvonal.
Megjegyzés. Felhívjuk figyelmét, hogy a méret a tömb p egyik nagyobb, mint a számát a csillagok, és mélyedések, valamint, hogy az értékek az első és az utolsó elem a tömb azonos.
Ellipszis eljárás felhívja ellipszis vagy kör, attól függően, hogy a paraméterek értékeit. módszer hívás utasítást általános formában az alábbiak szerint:
Obekt.Canvas.Ellipse (x1, y1, x2, y2)
ahol az objektum - objektum nevét (komponens), amelyek felületén a nyomkövetés végre;
x1, y1, x2, y2 - koordinátáit a téglalap, amelyen belül egy ellipszis készült, vagy ha a téglalapot egy négyzet, kör (13. ábra).
13. ábra - értékek ellipszis módszer paramétereinek meghatározására formájában geometriai formák
Színét, vastagságát és stílusát az ellipszis által meghatározott vonal Pen ingatlan értéke. és egy színt, és töltse stílus régió belsejében ellipszis - Brush felületi tulajdonság értékek (Canvas), amely elvonási végezzük.
ív módszer alkalmazására végez Arc, call utasítást általában a következő:
ahol x1, y1, x2, y2 - paraméterek meghatározása az ellipszis (kör), amelynek egy része által felvett az ív; x3, y3 - meghatározó paraméterek kezdőpontját ív;
x4, y4 - meghatározó paraméterek a körív végpontját.
Laboratóriumi munka számítástechnika a speciális „modellezés és Operations Research szervezési és műszaki rendszerek”
A kezdeti (végleges) pont - egy pont a határt átlépő az ellipszis és egy egyenes vonalat húzott a központtól az ellipszis, hogy a pont a koordinátákkal X3 és Y3 (X4, Y4). Az ív készült óramutató járásával ellentétes irányban a kiindulási pont, hogy a végén (14. ábra).
Színét, vastagságát és stílusát a vonal, amely az ív készült, értékei határozzák Pen felületi tulajdonságok (Sanvas), amelyre kimenet engedélyezése.
14. ábra - lámpás paraméterek értékeit határozzuk részeként ellipszis ív (kör)
téglalap
A téglalap által rajzolt téglalap. hívás utasítás van az általános formája a következő:
Obekt.Canvas.Rectangle (x1, y1, x2. Y2)
ahol az objektum - objektum nevét (komponens), amelyek felületén a nyomkövetés végre;
x1, y1 és x2, y2 - koordinálja a bal felső és a jobb alsó sarkából a téglalapot.
RoundRect eljárás is egy téglalapot rajzol, de lekerekített sarkokkal. RoundRect módszer hívás utasítást a következő:
Obekt.Canvas.RoundRect (x1, y1, x2, y2, x3, kt)
ahol x1, y1, x2, y2 - meghatározó paraméterek helyzetét sarkokban a téglalap, amelybe illeszkedik négyszög lekerekített sarkokkal; X3 és y3 - a méret az ellipszis, amelynek egynegyedét használjuk rajz a lekerekített sarok (15. ábra).
15. ábra - RoundRect módszer egy téglalapot rajzol lekerekített sarkokkal
Típus kontúr (szín, szélesség és stílus) határoztuk Pen ingatlan értékének. és a színe és stílusa terület kitöltéséhez téglalapon belül - Brush felületi tulajdonság értékek (Canvas), amely fel van húzva téglalap.
Két módszer van, hogy felhívja a téglalapot, amelyek csak egy kefe (ecset), mint eszközt. FillRect eljárás rajzol kitöltött téglalapot, és FrameRect módszer - csak a körvonalait. Ezen eljárások mindegyike csak az egyik paraméter - TRect típusú szerkezet. TRect szerkezet mező a koordinátákat a téglalap alakú terület, akkor lehet tölteni a téglalap funkciót.
Laboratóriumi munka számítástechnika a speciális „modellezés és Operations Research szervezési és műszaki rendszerek”
Az alábbiakban, mint egy példa segítségével FillRect FrameRect módszerek és azt mutatja, olyan eljárás, amely ábrázolja a forma felületén piros kitöltés négyszög és egy téglalapot zöld kontúr.
eljárás TForml.ButtonlClick (Sender: TObject); var
rl, r2: TRect; // koordinátáit téglalap sarkait kezdődik
// töltse ki a mezőket szerkezet
// definiáljuk a koordinátáit a sarkok téglalapok rl: = téglalap (20,20,60,40);
R2: = téglalap (10,10,40,50); A Forml.Canvas do
sokszög
Poligon módszert rajzol sokszög. Paraméterként, az eljárás kap egy sor TPoint. Minden eleme a tömb jelentése rekord mezőbe (x, y), amely tartalmazza a koordinátáit egyik csúcsa a sokszög. Eljárás sokszög felhívja a sokszög folyamatosan összekötő pontokat egyenesekkel, amelynek koordinátái a tömbben: .. Az első, a második, a második, harmadik, harmadik vagy a negyedik, stb Aztán, az utóbbi kapcsolatban állnak, és az első pont.
A szín és a stílus a poligon határokat tulajdonságai határozzák meg a Pen értékeket. és a színe, és töltse ki a stílus a régió által határolt határvonal, - ecset ingatlan értékének. és a terület festett az aktuális szín és ecset stílust.
Az alábbiakban az eljárást, hogy a sokszög módszerrel. rajzol háromszög:
eljárás TForml.Button2Click (Sender: TObject); var
pol: array [1..3] a TPoint; // háromszögének koordinátái pont kezdődik
Pol [l] .x: = 10; Pol [1] Y = 50; Pol [2] .x: = 40; Pol [2] y: = 10; Pol [3] .x: = 70; Pol [3] y: = 50;
Pie eljárás felhívja ellipszis vagy kör szektorban. módszer hívás utasítást általános formában az alábbiak szerint:
Obekt.Canvas.Pie (x1, y1, x2, y2, x3, y3, x4, y4)
ahol x1, y1, x2, y2 - paraméterek meghatározása az ellipszis (egy kör), amely része a szektor;
x3, y3, x4, y4 - a meghatározó paraméterek a koordinátákat a végpontok a vonalak, amelyek a határokat az ágazatban.
Laboratóriumi munka számítástechnika a speciális „modellezés és Operations Research szervezési és műszaki rendszerek”
Kezdeti pontok vonalak egybeesnek az az ellipszis középpontját (a kör). Sector vágott óramutató járásával ellentétes irányban a vonal által meghatározott pont koordinátái (x3, y3), hogy egy vonal által meghatározott pont koordinátái (X4, Y4) (16. ábra).
16. ábra - Pie módszer paramétereinek értékeit határozzuk meg, mint egy szektor egy ellipszis (kör)
A felület, amelyen a program kimeneti grafika megfelel Canvas objektum. Az ingatlan pixel. képviselő egy kétdimenziós tömb típusú TColor. Információkat tartalmaz a színe egyes pontja a grafika felületén. Használata pixel tulajdon. Megadhatja a kívánt színt bármilyen grafikus felület, azaz a. E., „Dolgozzon” pontot. Például, az utasítás Form1.Canvas.Pixels [10, 10]: = clRed foltok pont a felület alakja piros.
A méret a tömb mérete határozza meg pixel grafikus felületen. Felbontású grafika felület alakja (a munkaterületen, amely más néven ügyfél) meghatározott vagyoni értékek és ClientWidth ClientHeight. és a mérete a grafikai elem fényképek felület - ingatlan értékének szélesség és a magasság. Bal felső munkaterület pixel formában megfelel az A pont [0, 0]. és a jobb alsó
Képpontokat [ClientWidth - 1, ClientHeight - 1].
Pixel tulajdonság felhasználható ábrázolásakor. A gráf, általában felhasználásával végzett számítások alapján Eq. A határait a szórási tartományt az érvelés funkciók az eredeti adatokat. Beállítás funkció érték lehet számítani. A skála lehet kiszámítani a fenti adatok alapján, amely lehetővé teszi, hogy építsenek egy grafikon, így kitölti a teljes területet formák visszavonását ütemtervet.
Például, ha egy f (x) értékeket vehet nullától 1000, és a kimeneten a menetrend kialakítására használjuk régió 250 képpont magasságú, az y tengely skála alábbi képlettel számítottuk ki: m = 250/1000. Így, értéke az f (x) = 1 000 felel meg a pont régió egy koordináta y = 0 (y = 250 - f (x) xm = 250 - 1000 x (250/1000)), és az értéke az f (x) = 70 - Mivel a koordináta Y = 233 (Y = 250-70 x (250/1000)).
Megjegyzés. Megjegyzendő, hogy a pontos kifejezés jelentését 250-70 x (250/1000) a 232,5. De t. K. Az index tulajdonságai pixel, amelyet a kimeneti pont a felszínen a vásznon. csak egy egész szám, a szám 232,5 van kerekítve a legközelebbi egész, száma, amely 233.
A következő program a szöveget listán látható 10, a pixel tulajdon. megjelenít egy grafikonon a függvény az y = 2 · sin (x) · e x / 5. Ábrázolni felhasználva a rendelkezésre álló területet, az űrlap és ha közben a munkaprogram a felhasználó átméretezi az ablakot, a diagram jelenik meg ismét a valódi ablak méretét.
Listing 10 - Program rajzoló funkciókat
Laboratóriumi munka számítástechnika a speciális „modellezés és Operations Research szervezési és műszaki rendszerek”
a Windows, az Üzenetek, SysUtils, osztályok, grafika, vezérlők, Forms, párbeszédablakok;
eljárás FormPaint (Sender: TObject); eljárás FormResize (Sender: TObject);