在VB中如何对封闭图形着色？

[TBBT]

用VB如何对画在PICTUREBOX上的封闭图形内部着色？有否类似的API函数？
请赐教！

[Firing_Sky]

如果用算法实现的话，在封闭区域里取一点，在搜索它的相邻点……

[chw73]

试试这个api
Public Declare Function ExtFloodFill Lib "gdi32" Alias "ExtFloodFill" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long, ByVal wFillType As Long) As Long
参数含义如下：
hdc -- long 指向设备场景的句柄
X,Y -- long 开始填充的一个点，用逻辑坐标
crColor --long 要使用的边界颜色
wFillType -- long 欲执行填充的类型
FLOODFILLBORDER: X,Y不能有颜色crColor,且必需在剪切区内
FLOODFILLSURFACE: 指定点向外填充（边框采用多种颜色采用这种）
另： 该函数只队光栅设备有效。
也可参考 FLOODFILL

[dongdong]

我来告诉你FLOODFILL函数：
Public Declare Function FloodFill Lib "gdi32" Alias "FloodFill" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long
HDC：用来描绘图形的DC
X，Y：坐标位置
CRCOLOR：封闭区域的边框颜色

[TBBT]

加分再问