Page 91 - 6370
P. 91

t[0]:=ya[1];
               t[1]:=ya[2];


               {вкладення процедури figure_point ( частина 5, пункт 14)}
                    figure_point(Image2,x1,y1,1,l,t);


               end;
               15.  Запускають  команду  Run  ,  будують  трикутник,
               клацають по кнопці Button7, потім по Button1   і нарешті
               копіюють  його  клацнувши  на  кнопці  Button8    (рисунок
               65).

               16. Зауваження: трикутник будують зліва – вгорі форми,
               для того щоб координати його вершин не отримали надто
               великі  значення  і  при    копіюванні  не  вийшли  за  межі
               об’єкта Image2.





























                 Рисунок 65 –Отримання копії триктнмка в полі Image2.
                                             93
   86   87   88   89   90   91   92