pascalabcnet/PABCNetHelp/PABCUnits/GraphABC/gr_Prim.html

297 lines
12 KiB
HTML
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

<html><head>
<object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
<param name="Keyword" value="SetPixel">
<param name="Keyword" value="PutPixel">
<param name="Keyword" value="GetPixel">
<param name="Keyword" value="MoveTo">
<param name="Keyword" value="LineTo">
<param name="Keyword" value="Line">
<param name="Keyword" value="FillCircle">
<param name="Keyword" value="DrawCircle">
<param name="Keyword" value="FillEllipse">
<param name="Keyword" value="DrawEllipse">
<param name="Keyword" value="FillRectangle">
<param name="Keyword" value="FillRect">
<param name="Keyword" value="DrawRectangle">
<param name="Keyword" value="FillRoundRect">
<param name="Keyword" value="DrawRoundRect">
<param name="Keyword" value="Circle">
<param name="Keyword" value="Ellipse">
<param name="Keyword" value="Rectangle">
<param name="Keyword" value="RoundRect">
<param name="Keyword" value="Arc">
<param name="Keyword" value="FillPie">
<param name="Keyword" value="DrawPie">
<param name="Keyword" value="Pie">
<param name="Keyword" value="DrawPolygon">
<param name="Keyword" value="FillPolygon">
<param name="Keyword" value="Polygon">
<param name="Keyword" value="Polyline">
<param name="Keyword" value="Curve">
<param name="Keyword" value="DrawClosedCurve">
<param name="Keyword" value="FillClosedCurve">
<param name="Keyword" value="ClosedCurve">
<param name="Keyword" value="TextOut">
<param name="Keyword" value="FloodFill">
</object></head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
<title></title><link rel="StyleSheet" href="../../default.css"><body>
<H1>Ãðàôè÷åñêèå ïðèìèòèâû</H1>
<p>Ãðàôè÷åñêèå ïðèìèòèâû ïðåäñòàâëÿþò ñîáîé ïðîöåäóðû, îñóùåñòâëÿþùèå ðèñîâàíèå
â ãðàôè÷åñêîì îêíå. Ðèñîâàíèå îñóùåñòâëÿåòñÿ òåêóùèì ïåðîì (ëèíèè), òåêóùåé
êèñòüþ (çàëèâêà çàìêíóòûõ îáëàñòåé) è òåêóùèì øðèôòîì (âûâîä ñòðîê).<br>
&nbsp;</p>
<table border=0 CELLPADDING=5>
<tr><td>
<code>
<b>procedure</b> SetPixel(x,y: integer; c: Color);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàêðàøèâàåò ïèêñåë ñ êîîðäèíàòàìè (x,y) öâåòîì c
</td></tr>
<tr><td>
<code>
<b>procedure</b> PutPixel(x,y: integer; c: Color);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàêðàøèâàåò ïèêñåë ñ êîîðäèíàòàìè (x,y) öâåòîì c
</td></tr>
<tr><td>
<code>
<b>function</b> GetPixel(x,y: integer): Color;
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Âîçâðàùàåò öâåò ïèêñåëà ñ êîîðäèíàòàìè (x,y)
</td></tr>
<tr><td>
<code>
<b>procedure</b> MoveTo(x,y: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Óñòàíàâëèâàåò òåêóùóþ ïîçèöèþ ðèñîâàíèÿ â òî÷êó (x,y)
</td></tr>
<tr><td>
<code>
<b>procedure</b> LineTo(x,y: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò îòðåçîê îò òåêóùåé ïîçèöèè äî òî÷êè (x,y). Òåêóùàÿ ïîçèöèÿ ïåðåíîñèòñÿ â òî÷êó (x,y)
</td></tr>
<tr><td>
<code>
<b>procedure</b> LineTo(x,y: integer; c: Color);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò îòðåçîê îò òåêóùåé ïîçèöèè äî òî÷êè (x,y) öâåòîì c. Òåêóùàÿ ïîçèöèÿ ïåðåíîñèòñÿ â òî÷êó (x,y)
</td></tr>
<tr><td>
<code>
<b>procedure</b> Line(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò îòðåçîê îò òî÷êè (x1,y1) äî òî÷êè (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> Line(x1,y1,x2,y2: integer; c: Color);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò îòðåçîê îò òî÷êè (x1,y1) äî òî÷êè (x2,y2) öâåòîì c
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillCircle(x,y,r: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò âíóòðåííîñòü îêðóæíîñòè ñ öåíòðîì (x,y) è ðàäèóñîì r
</td></tr>
<tr><td>
<code>
<b>procedure</b> DrawCircle(x,y,r: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò îêðóæíîñòü ñ öåíòðîì (x,y) è ðàäèóñîì r
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillEllipse(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò âíóòðåííîñòü ýëëèïñà, îãðàíè÷åííîãî ïðÿìîóãîëüíèêîì, çàäàííûì êîîðäèíàòàìè ïðîòèâîïîëîæíûõ âåðøèí (x1,y1) è (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> DrawEllipse(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò ãðàíèöó ýëëèïñà, îãðàíè÷åííîãî ïðÿìîóãîëüíèêîì, çàäàííûì êîîðäèíàòàìè ïðîòèâîïîëîæíûõ âåðøèí (x1,y1) è (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillRectangle(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò âíóòðåííîñòü ïðÿìîóãîëüíèêà, çàäàííîãî êîîðäèíàòàìè ïðîòèâîïîëîæíûõ âåðøèí (x1,y1) è (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillRect(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò âíóòðåííîñòü ïðÿìîóãîëüíèêà, çàäàííîãî êîîðäèíàòàìè ïðîòèâîïîëîæíûõ âåðøèí (x1,y1) è (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> DrawRectangle(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò ãðàíèöó ïðÿìîóãîëüíèêà, çàäàííîãî êîîðäèíàòàìè ïðîòèâîïîëîæíûõ âåðøèí (x1,y1) è (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillRoundRect(x1,y1,x2,y2,w,h: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò âíóòðåííîñòü ïðÿìîóãîëüíèêà ñî ñêðóãëåííûìè êðàÿìè; (x1,y1) è (x2,y2) çàäàþò ïàðó ïðîòèâîïîëîæíûõ âåðøèí, à w è h øèðèíó è âûñîòó ýëëèïñà, èñïîëüçóåìîãî äëÿ ñêðóãëåíèÿ êðàåâ
</td></tr>
<tr><td>
<code>
<b>procedure</b> DrawRoundRect(x1,y1,x2,y2,w,h: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò ãðàíèöó ïðÿìîóãîëüíèêà ñî ñêðóãëåííûìè êðàÿìè; (x1,y1) è (x2,y2) çàäàþò ïàðó ïðîòèâîïîëîæíûõ âåðøèí, à w è h øèðèíó è âûñîòó ýëëèïñà, èñïîëüçóåìîãî äëÿ ñêðóãëåíèÿ êðàåâ
</td></tr>
<tr><td>
<code>
<b>procedure</b> Circle(x,y,r: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàïîëíåííóþ îêðóæíîñòü ñ öåíòðîì (x,y) è ðàäèóñîì r
</td></tr>
<tr><td>
<code>
<b>procedure</b> Ellipse(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàïîëíåííûé ýëëèïñ, îãðàíè÷åííûé ïðÿìîóãîëüíèêîì, çàäàííûì êîîðäèíàòàìè ïðîòèâîïîëîæíûõ âåðøèí (x1,y1) è (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> Rectangle(x1,y1,x2,y2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàïîëíåííûé ïðÿìîóãîëüíèê, çàäàííûé êîîðäèíàòàìè ïðîòèâîïîëîæíûõ âåðøèí (x1,y1) è (x2,y2)
</td></tr>
<tr><td>
<code>
<b>procedure</b> RoundRect(x1,y1,x2,y2,w,h: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàïîëíåííûé ïðÿìîóãîëüíèê ñî ñêðóãëåííûìè êðàÿìè; (x1,y1) è (x2,y2) çàäàþò ïàðó ïðîòèâîïîëîæíûõ âåðøèí, à w è h øèðèíó è âûñîòó ýëëèïñà, èñïîëüçóåìîãî äëÿ ñêðóãëåíèÿ êðàåâ
</td></tr>
<tr><td>
<code>
<b>procedure</b> Arc(x,y,r,a1,a2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò äóãó îêðóæíîñòè ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r, çàêëþ÷åííîé ìåæäó äâóìÿ ëó÷àìè, îáðàçóþùèìè óãëû a1 è a2 ñ îñüþ OX (a1 è a2 âåùåñòâåííûå, çàäàþòñÿ â ãðàäóñàõ è îòñ÷èòûâàþòñÿ ïðîòèâ ÷àñîâîé ñòðåëêè)
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillPie(x,y,r,a1,a2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò âíóòðåííîñòü ñåêòîðà îêðóæíîñòè, îãðàíè÷åííîãî äóãîé ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r, çàêëþ÷åííîé ìåæäó äâóìÿ ëó÷àìè, îáðàçóþùèìè óãëû a1 è a2 ñ îñüþ OX (a1 è a2 âåùåñòâåííûå, çàäàþòñÿ â ãðàäóñàõ è îòñ÷èòûâàþòñÿ ïðîòèâ ÷àñîâîé ñòðåëêè)
</td></tr>
<tr><td>
<code>
<b>procedure</b> DrawPie(x,y,r,a1,a2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò ñåêòîð îêðóæíîñòè, îãðàíè÷åííûé äóãîé ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r, çàêëþ÷åííîé ìåæäó äâóìÿ ëó÷àìè, îáðàçóþùèìè óãëû a1 è a2 ñ îñüþ OX (a1 è a2 âåùåñòâåííûå, çàäàþòñÿ â ãðàäóñàõ è îòñ÷èòûâàþòñÿ ïðîòèâ ÷àñîâîé ñòðåëêè)
</td></tr>
<tr><td>
<code>
<b>procedure</b> Pie(x,y,r,a1,a2: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàïîëíåííûé ñåêòîð îêðóæíîñòè, îãðàíè÷åííûé äóãîé ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r, çàêëþ÷åííîé ìåæäó äâóìÿ ëó÷àìè, îáðàçóþùèìè óãëû a1 è a2 ñ îñüþ OX (a1 è a2 âåùåñòâåííûå, çàäàþòñÿ â ãðàäóñàõ è îòñ÷èòûâàþòñÿ ïðîòèâ ÷àñîâîé ñòðåëêè)
</td></tr>
<tr><td>
<code>
<b>procedure</b> DrawPolygon(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàìêíóòóþ ëîìàíóþ ïî òî÷êàì, êîîðäèíàòû êîòîðûõ çàäàíû â ìàññèâå points
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillPolygon(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò ìíîãîóãîëüíèê, êîîðäèíàòû âåðøèí êîòîðîãî çàäàíû â ìàññèâå points
</td></tr>
<tr><td>
<code>
<b>procedure</b> Polygon(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàïîëíåííûé ìíîãîóãîëüíèê, êîîðäèíàòû âåðøèí êîòîðîãî çàäàíû â ìàññèâå points
</td></tr>
<tr><td>
<code>
<b>procedure</b> Polyline(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò ëîìàíóþ ïî òî÷êàì, êîîðäèíàòû êîòîðûõ çàäàíû â ìàññèâå points
</td></tr>
<tr><td>
<code>
<b>procedure</b> Curve(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò êðèâóþ ïî òî÷êàì, êîîðäèíàòû êîòîðûõ çàäàíû â ìàññèâå points
</td></tr>
<tr><td>
<code>
<b>procedure</b> DrawClosedCurve(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàìêíóòóþ êðèâóþ ïî òî÷êàì, êîîðäèíàòû êîòîðûõ çàäàíû â ìàññèâå points
</td></tr>
<tr><td>
<code>
<b>procedure</b> FillClosedCurve(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàïîëíÿåò çàìêíóòóþ êðèâóþ ïî òî÷êàì, êîîðäèíàòû êîòîðûõ çàäàíû â ìàññèâå points
</td></tr>
<tr><td>
<code>
<b>procedure</b> ClosedCurve(points: <b>array</b> <b>of</b> Point);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ðèñóåò çàïîëíåííóþ çàìêíóòóþ êðèâóþ ïî òî÷êàì, êîîðäèíàòû êîòîðûõ çàäàíû â ìàññèâå points
</td></tr>
<tr>
<td>
<code>
<b>procedure</b> TextOut(x,y: integer; s: string);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Âûâîäèò ñòðîêó s â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)
</td>
</tr>
<tr>
<td>
<code>
<b>procedure</b> TextOut(x,y: integer; n: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Âûâîäèò öåëîå n â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)
</td>
</tr>
<tr><td>
<code>
<b>procedure</b> TextOut(x,y: integer; r: real);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Âûâîäèò âåùåñòâåííîå r â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)
</td></tr>
<tr>
<td>
<code>
<b>procedure</b> DrawTextCentered(x,y,x1,y1: integer; s: string);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Âûâîäèò ñòðîêó s,
îòöåíòðèðîâàííóþ â ïðÿìîóãîëüíèêå ñ êîîðäèíàòàìè (x,y,x1,y1)</td>
</tr>
<tr>
<td>
<code>
<b>procedure</b> DrawTextCentered(x,y,x1,y1: integer; n: integer);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Âûâîäèò öåëîå çíà÷åíèå n,
îòöåíòðèðîâàííîå â ïðÿìîóãîëüíèêå ñ êîîðäèíàòàìè (x,y,x1,y1)</td>
</tr>
<tr>
<td>
<code>
<b>procedure</b> DrawTextCentered(x,y,x1,y1: integer; r: real);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Âûâîäèò âåùåñòâåííîå çíà÷åíèå r,
îòöåíòðèðîâàííîå â ïðÿìîóãîëüíèêå ñ êîîðäèíàòàìè (x,y,x1,y1)</td>
</tr>
<tr><td>
<code>
<b>procedure</b> FloodFill(x,y: integer; c: Color);
</code><br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Çàëèâàåò îáëàñòü îäíîãî öâåòà öâåòîì c, íà÷èíàÿ ñ òî÷êè (x,y).
</td></tr>
</table>
</body></html>