|
|
|
|
Закрашивает замкнутую область текущей кистью.
Синтаксис
| cnvObj.FloodFill(
| | X, | | Y, | | Color, | | Style
| | );
|
| Параметры
|
| Параметр
| Тип
| Описание
|
| X
| Number
| абсцисса точки внутри области
|
| Y
| Number
| ордината точки внутри области
|
| Color
| TColor
| цвет закрашивания
|
| Style
| Enum
| способ закрашивания (см. ниже)
|
|
| Параметр Style
|
| Значение
| Описание
|
| fsBorder
| закрасить все до границы, имеющей цвет, указанный параметром Color
|
| fsSurface
| закрасить все, имеющее цвет, указанный параметром Color
|
|
// Главная форма
frm=new TForm();
frm.Caption="JS+ - метод компонента TCanvas FloodFill";
frm.Width =525;
frm.Height=375;
frm.OnPaint=frm_Paint;
// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Пример эллипса, закрашенного методом FloodFill";
frm.ShowModal();
// Обработчик события OnPaint
function frm_Paint(frm)
{
var x1=50,y1=25,x2=frm.ClientWidth-x1,y2=stb.Top-y1;
var x3=x1+(x2-x1)/2,y3=y1+(y2-y1)/2;
var cnv=frm.Canvas,clr=clWhite;
// Эллипс с белым фоном
cnv.Brush.Style=bsSolid;
cnv.Brush.Color=clr;
cnv.Pen.Color=clHighlight;
cnv.Ellipse(x1,y1,x2,y2);
// Закрасить эллипс диагональной кистью
cnv.Brush.Style=bsDiagCross;
cnv.Brush.Color=cnv.Pen.Color;
cnv.FloodFill(x3,y3,clr,fsSurface);
}
Совместимость
C++ Builder/Delphi
|
| JS+ | Руководство пользователя
|
|
|
| |
|
|
