| 16.4.9.     Процедура DrawPolyprocedure DrawPoly(NumPoints: Word; var PolyPoints);Строит контур многоугольника линией с заданными параметрами и цветом. Текущий цвет задается процедурой SetColor, текущие параметры линии - процедурой SetLineStyle, а режим построения линии - процедурой SetWriteMode. NumPoints    -    число вершин многоугольника; PolyPoints - переменная без типа, содержащая NumPoint+1 пар координат вершин многоугольника (координаты должны быть целого типа, перечисляться в той же последовательности, как они идут по контуру, причем первая вершина должна быть повторена и в конце перечисления). Применяется только в графическом режиме. 
 
 |