Color Property

[cksiow]

Hi, I need to add a color property in an active color so that when user click on it (in the property explorer), vb will show the color template just like other VB control. I use the built-in color property page, doesn't help. can anyone tell me how to do it ? thanks,


HTH

cksiow
http://vblib.virtualave.net - share our codes

[DSJ]

The trick is to define your color property as OLE_COLOR object as in:


option Explicit
Dim oleColor as OLE_COLOR

public property set Color(c as OLE_COLOR)
oleColor = c
End property

public property get Color() as OLE_COLOR
Color = oleColor
End property