Metoda poliliniei atrage o polilinie. Ca parametru, metoda devine o matrice de tip TPoint. Fiecare element al matricei este o înregistrare a cărei câmpuri x și y conțin coordonatele punctului de inflexiune al poliliniei.
Metoda Polyline trage linii de polilinii puncte ale căror coordonate sunt în matrice de conectare succesiv: o primă la un al doilea, al doilea la terță treia la patrulea, etc ...
Ca exemplu de utilizare a metodei Polyline în listare 10.3, este afișată o procedură care afișează o schemă pentru modificarea unei anumite valori. Se presupune că datele inițiale sunt într-o procedură accesibilă în matricea de date (tip Integer).
Listing 10.3. Graficul funcții (utilizând metoda Poliline)
procedura TForml.Button1Click (expeditor: TObject);
gr: array [1..50] din TPoint; // grafic - linie întreruptă
x0, y0: întreg; // Coordonatele punctului de origine
dx, dy: întreg; // pasul grilei pe axele X și Y.
// fill array gr
gr [i]. y: = y0 - Date [i] * dy;
cu formula.Canvas începe
MoveTo (x0, y0); LineTo (x0,10); // axa Y
MoveTo (x0, y0); LineTo (200, y0); // axa X
Metoda Polyline poate fi folosită pentru a desena bucle închise. Pentru a face acest lucru, primul și ultimul element al matricei trebuie să conțină coordonatele aceluiași punct. Ca un exemplu al metodei de desen Polybine circuitului 10.4 este prezentat în programul Listarea închis care pe suprafața casetei de dialog în punctul dat clic, contur parcele steaua cu cinci colțuri (Fig. 10.5). Culoarea cu care este redată steaua depinde de butoanele mouse-ului. Procedura de procesare făcând clic pe butonul mouse-ului (eveniment MouseDown) determină procedura de desen Starline stele și trece-l ca un parametru la punctul de coordonate la care a fost apăsat butonul. Steaua atrage procedura starLine, care, ca parametri, primește coordonatele centrului stea și pânza pe care ar trebui să fie afișată steaua. În primul rând, se calculează coordonatele capetelor și depresiunilor stelei, care sunt scrise în matricea p. Această matrice este apoi trecută ca parametru pentru metoda Polyline. La calcularea coordonatelor razelor și văilor stelei, se folosesc funcțiile sin și cos. Deoarece argumentul acestor funcții trebuie să fie exprimate în radiani, valoarea unghiulară în grade, înmulțit cu pi / 18 ° valoare, unde pi - un standard numit constant egal cu numărul n.
Listing 10.4. Desenând o buclă închisă (stea) în momentul atingerii mouse-ului
Windows, Mesaje, SysUtils, Variante, Clase,
Grafică, Controale, Formulare, Dialoguri, StdCtrls;
TForm1 = clasa (TForm)
procedura FormMouseDown (expeditor: TObject; buton: TMouseButton;
Schimbare: TShiftState; X, Y: Integer);
Articole similare
Trimiteți-le prietenilor: