FloodFill

Vyplní ohraničenou oblast aktuálním vyplňovacím vzorkem.

Deklarace

 procedure FloodFill(X, Y: Integer; Border: Word);

Režim

Reálný, Chráněný

Poznámky

Vyplní uzavřenou oblast na bitmapových zařízeních. (X, Y) je výchozí bod uvnitř uzavřené oblasti, která se má vyplnit. Použitím aktuálního vyplňovacího vzorku, nastaveného pomocí SetFillStyle nebo SetFillPattern, se vyplní oblast ohraničená barvou Border. Jestliže výchozí bod je uvnitř uzavřené oblasti, vyplní se vnitřek. Jestliže výchozí bod je vně uzavřené oblasti, vyplní se vnějšek.

Pokud se během vyplňování objeví chyba, vrátí GraphResult hodnotu grNoFloodMem .

Viz také

SetFillPattern

SetFillStyle

Vzorový příklad

{FloodFil.PAS}
{Vzorový příklad pro proceduru FloodFill.}
uses Graph;
var Gd, Gm: Integer;
begin
  Gd := Detect;
  InitGraph(Gd, Gm, ' ');
  if GraphResult <> grOk then
    Halt(1);
  SetColor(GetMaxColor);
  Circle(50, 50, 20);
  FloodFill(50, 50, GetMaxColor);
  Readln;
  CloseGraph;
end.