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 polilinie trasează o polilinie, combinând secvențial liniile directe ale coordonatelor ale căror coordonate se află în matrice: prima cu a doua, a doua cu a treia, a treia cu a patra și așa mai departe.
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 prelucrare a butonului mouse-ului (evenimentul MouseDown) solicită procedura de trasare a stelei stea și o transmite ca parametru coordonatele punctului în care a fost apăsat butonul. Stele atrage procedura Starline, care primește ca parametri coordonatele centrului stelei și pânza pe care ar trebui să fie retrasă 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: