Популярные заметки
|
Процедура Sector в Turbo Pascal 7Опубликовано: 02.09.2018 16.4.39. Процедура SectorСтроит сектор эллипса, закрашенный текущим орнаментом и цветом заполнения. Орнамент и цвет заполнения задаются процедурой SetFillStyle или SetFillPattern. Текущий цвет контура задается процедурой SetColor, текущие параметры линии - процедурой SetLineStyle. Изменение относительных масштабов изображения по вертикали и горизонтали осуществляется процедурой SetAspectRatio. Создание модулей на языке Pascal X, Y - координаты центра сектора эллипса; StAngle - начальный угол эллипса, отсчитываемый против часовой стрелки от горизонтальной оси, направленной вправо; EndAngle - конечный угол эллипса, отсчитываемый против часовой стрелки от горизонтальной оси, направленной вправо; Assembler - простая программа XRadius,YRadius - горизонтальная и вертикальная полуоси эллипса. В случае аварийной ситуации (во время закрашивания фигуры) процедура устанавливает код ошибки -6. Применяется только в графическом режиме. |