pascalabcnet/PABCNetHelp/Tutorials/ABCObjects/QuickStartABCObjects.html

72 lines
2.8 KiB
HTML

<html>
<head>
<object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
<param name="Keyword" value="">
</object>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
<title></title>
<link rel="StyleSheet" href="../../default.css">
</head>
<body>
<H1>ABCObjects: áûñòðîå ââåäåíèå</H1>
<hr>
<p>Îñíîâíûìè òèïàìè ãðàôè÷åñêèõ îáúåêòîâ, îïðåäåëåííûìè â ìîäóëå
<code>ABCObjects</code>, ÿâëÿþòñÿ <code>RectangleABC</code>, <code>SquareABC</code>,
<code>EllipseABC</code>, <code>CircleABC</code>, <code>TextABC</code>, <code>RegularPolygonABC</code>,
<code>StarABC</code>, <code>PictureABC</code>, <code>MultiPictureABC</code>, <code>BoardABC</code> è <code>ContainerABC</code>. </p>
<p>Òèïû ãðàôè÷åñêèõ îáúåêòîâ ïðåäñòàâëÿþò ñîáîé êëàññû,
ñîñòîÿùèå èç ìåòîäîâ è ñâîéñòâ, à òàêæå íóæäàþùèåñÿ â êîíñòðóèðîâàíèè ïåðåä
ïåðâûì èñïîëüçîâàíèåì. Èçìåíåíèå ñâîéñòâ âëèÿåò íà âíåøíèé âèä è ïîâåäåíèå
ãðàôè÷åñêèõ îáúåêòîâ. Íàïðèìåð, ïðè èçìåíåíèè ñâîéñòâ <code>Width</code> è <code>Height</code> ìåíÿþòñÿ
ðàçìåðû ãðàôè÷åñêîãî îáúåêòà, ïðè èçìåíåíèè ñâîéñòâà
<code>Color</code> - öâåò ãðàôè÷åñêîãî
îáúåêòà è ò.ä. Âûçîâ ìåòîäîâ
ãðàôè÷åñêîãî îáúåêòà âîçâðàùàåò èëè ìåíÿåò åãî
õàðàêòåðèñòèêè. Íàïðèìåð, ïðè âûçîâå ìåòîäà <code>ToFront</code>
ãðàôè÷åñêèé îáúåêò ïåðåìåùàåòñÿ íà ïåðåäíèé ïëàí, à âûçîâ ìåòîäà <code>Intersect(g)</code>
âîçâðàùàåò, ïåðåñåêàåòñÿ ëè òåêóùèé îáúåêò ñ îáúåêòîì <code>g</code>.</p>
<p>Âñå ãðàôè÷åñêèå îáúåêòû ÿâëÿþòñÿ ðàçíîâèäíîñòÿìè êëàññà
<code>ObjectABC</code>, êîòîðûé ñîäåðæèò îáùèå äëÿ âñåõ
ñâîéñòâà è ìåòîäû. </p>
<p>Ñîçäàäèì äâà ïåðåêðûâàþùèõñÿ ãðàôè÷åñêèõ îáúåêòà:</p>
<blockquote>
<p><code><b>uses</b> ABCObjects,GraphABC;</code></p>
<p><code><b>var</b> <br>
&nbsp; r: RectangleABC; <br>
&nbsp; c: CircleABC;</code></p>
<p><code><b>begin</b> <br>
&nbsp; r := <b>new</b> RectangleABC(70,50,200,100,clMoneyGreen); <br>
&nbsp; c := <b>new </b>CircleABC(120,80,110,clBlue); <br>
<b>end</b>.</code></p>
</blockquote>
<p>Ïîñëå çàïóñêà ïðîãðàììû óâèäèì íà ýêðàíå ñëåäóþùåå:</p>
<blockquote>
<p><img border="0" src="images/ABC1.PNG" width="328" height="252"></p>
</blockquote>
<p>Ïîìåíÿåì íåêîòîðûå ñâîéñòâà ãðàôè÷åñêèõ îáúåêòîâ è âûçîâåì
ìåòîä MoveOn äëÿ îêðóæíîñòè, äîïèñàâ â
êîíåö ïðîãðàììû ñëåäóþùèå ñòðîêè:</p>
<blockquote>
<p><code>r.Width := 150;<br>
c.Color := clRed;<br>
c.MoveOn(30,30);</code></p>
</blockquote>
<p>Ïîñëå çàïóñêà ïðîãðàììû:</p>
<blockquote>
<p><img border="0" src="images/ABC2.PNG" width="328" height="252"></p>
</blockquote>
<p>Äîáàâèì â êîíåö ïðîãðàììû ñëåäóþùèå ñòðîêè:</p>
<blockquote>
<p><code>c.Number := 8;<br>
r.Text := 'Hello';<br>
r.ToFront;</code></p>
</blockquote>
<p>Ïîñëå çàïóñêà ïðîãðàììû:</p>
<blockquote>
<p><img border="0" src="images/ABC3.PNG" width="328" height="252"></p>
</blockquote>
</body>
</html>