• Синтаксис языка
• Типы данных
• Стандартные модули
• Процедуры и функции
  • Строки
  • Числа
  • Графический режим
    • Arc
    • Bar
    • Bar3D
    • Circle
    • CloseGraph
    • DetectGraph
    • DrawPoly
    • Ellipse
    • FillEllipse
    • FillPoly
    • FloodFill
    • GetArcCoords
    • GetAspectRatio
    • GetBkColor
    • GetColor
    • GetDefaultPalette
    • GetDriverName
    • GetFillPattern
    • GetFillSettings
    • GetFTime
    • GetGraphMode
    • GetImage
    • GetLineSettings
    • GetMaxColor
    • GetMaxMode
    • GetMaxX
    • GetMaxY
    • GetModeName
    • GetModeRange
    • GetPalette
    • GetPaletteSize
    • GetPixel
    • GetTextSettings
    • GetViewSettings
    • GetX
    • GetY
    • GotoXY
    • GraphErrorMSG
    • GraphResult
    • InitGraph
    • Rectangle
    • RegisterBGIDriver
    • RegisterBGIFont
    • Release
    • RemoveDir
    • Rename
    • RestoreMemory
    • ReWrite
    • RmDir
    • Sector
    • SetActivePage
    • SetAllPalette
    • SetAspectRatio
    • SetBkColor
    • SetColor
    • SetFillPattern
    • SetFillStyle
    • SetGraphBufSize
    • SetGraphMode
    • SetLineStyle
    • SetPalette
    • SetRGBPalette
    • SetTextJustify
    • SetUserCharSize
    • SetViewPort
    • SetVisualPage
    • SetWriteMode
    • TextBackground
    • TextColor
  • Текстовый режим
  • Файлы и папки
  • Дата и время
  • Работа с принтером
  • Системные функции
  • Объекты
  • Операционная система
  • Память и указатели
  • Управление программой
  • Прочие процедуры и функции
  • DateTime
• Зарезервированные слова
• Директивы компилятора
• Сообщения об ошибках
• Примеры программ
• Описание среды разработки

Процедура FillPoly

Рисует закрашенный многоугольник, используя преобразователь сканирования.

Объявление:

Procedure FillPoly(NumPoints : Word; Var PolyPoints);

Режим: 

Замечания:
Параметр PolyPoints -нетипизированный параметр, который содержит координаты точек, образующих многоугольник. NumPoints содержит число координат в PolyPoints. Каждый компонент PolyPoints состоит из двух значений типа Word - X и Y. Заметьте, что для рисования замкнутой фигуры с N гранями, в параметре PolyPoints должно содержаться N+1 компонентов (координаты начальной и конечной точек должны совпадать). Процедура FillPoly вычисляет все горизонтальные пересечения, а затем закрашивает многоугольник, используя текущий стиль и цвет закраски, определенные с помощью процедур SetFillStyle и SetFillPattern. Контур многоугольника выделяется текущим цветом и типом линии, установленными при обращении к процедурам SetLineStyle и SetColor. Если при заполнение многоугольника происходит ошибка, то в переменной GraphResult возвращается значение grNoScanMem. Нужно быть в графическом режиме.

Пример программы: fillpoly.pas

См. также: