Properties

[bmarzouk]

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

[simonm]

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