Visual Basic - Necesito los parametros de esta funcion paint

Life is soft - evento anual de software empresarial
 
Vista:

Necesito los parametros de esta funcion paint

Publicado por Jimcov (5 intervenciones) el 19/02/2006 23:57:46
buscando en internet encontre este funcion paint dice que pinta cualquier figura cerrada pero no puedo hacerla funcionar
no doy con los parametros

Declare Function FloodFill Lib "GDI32" (ByVal hDC, ByVal x, ByVal y, ByVal crColor As Long )

Sub Paint(pic As PictureBox, x As Integer, y As Integer, FillClr As Long, Optional FillStyle As Variant)
If IsMissing(FillStyle) Then
pic.FillStyle = vbFSSolid
Else
pic.FillStyle = Int(FillStyle)
End If
pic.FillColor = FillClr
If FloodFill(pic.hDC, x, y, pic.ForeColor) = 0 Then
MsgBox "Error Sub Paint..."
End If
End Sub

La función Paint() pinta de un color el fondo de una figura cerrada y creada con métodos gráficos. Los parámetros x e y son cualquier punto dentro de la figura. Opcionalmente puede pintar empleando algún FillStyle suministrado por Visua Basic.

si pudieras ayudarme te lo agradeceria mucho gracias

jimcov
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder