Properties

How can I add properties to ActiveX so that when the user click on it, one of the followings occurs:

1) Displaying Color Dialog box (for colors properties)
2) Displaying File Dialog Box (for Picture properties)
3) Displaying Combobox that show available values to select

thanks,
Belal Marzouk

1) Here is an example of a property that pops up the colour palette:

Public Property Let ForeColour(colour As OLE_COLOR)
mcolour = colour
End Property

Public Property Get ForeColour() As OLE_COLOR
ForeColour = mcolour
End Property

---

2) Don't Know!

---

3) Create an enumerator (in the User-Control module) and set the property data type to be the enumerator.

--

You didn't ask but just in case you didn't know, here's how to popup the font dialog on a property:

Public Property Get Font() As StdFont
Set Font = mfont
End Property

Public Property Let Font(ByVal vNewValue As StdFont)
Set mfont = StdFont
End Property