>Hello,
>
>Based in a sample that I took from the great book "What's new in 9", I've added a script to a property that I added to one of my classes.
>
>My goal is to open the ColorPicker when the developer clic on the ellipsis or doubleclick the property, and change the property value according to the selected color.
>
>I'm using the script below:
>
>

>LOCAL aControl[1], nColor
>IF ASELOBJ(aControl) = 0
>   IF ASELOBJ(aControl, 1) = 0
>      RETURN
>   ENDIF
>ENDIF
>
>* Grab default value
>IF VARTYPE(aControl[1].BackColor1) = "N"
>   nColor = aControl[1].BackColor1
>ELSE
>   nColor = 0
>ENDIF
>
>nColor = GETCOLOR(nColor)

aControl[1].WriteExpression("BackColor1","")

>aControl[1].BackColor1 =  nColor
>
>RETURN
>

>
>It works perfectly, except if the property value contained any kind of expression as an original value. In that case, the colorpicker is opened, but the selected color is not updated to the property.
>
>Can someone give me some enlightening ?
>
>TIA
>
>Cesar