Заполнение (закрашивание) произвольной замкнутой фигуры

Процедура FloodFill (x, y: integer; border: word) заполняет произвольную замкнутую фигуру, используя текущий стиль и цвет заполнения. Координаты точки (x, y) указывают, начиная с какой точки будет производиться заливка. Если точка находится внутри замкнутой фигуры, то будет закрашена внутренняя область. Если фигура не замкнута, то заливка разольется по всему экрану. 

Параметр border указывает цвет граничной линии.

!!!

Такие процедуры как FillEllipse, Pieslice, Sector, Bar и FillPoly не требуют процедуры FloodFill, достаточно перед ними указать стиль и цвет заливки процедурой SetFillStyle.

Процедуры Circle, Arc, Ellipse, Rectangle (а так же произвольные замкнутые фигуры, нарисованные линиями или другими примитивами) невозможно закрасить без процедуры FloodFill.