Oh, ok I see. I was setting it in design time.

Is there some reason you cannot use a container instead? Then
the builder approach would work fine.



>Hi Kevin,
>
>I just tested your code and, yes it does indeed work, but, only up to a point :) Where it fails and produces an error is when you take your control and drop it onto a form. Now when you run your builder, it fails upon exiting with the error that I described below.
>
>Mike.
>
>
>>I just retested my code. Works fine.
>>
>>I emailed you the project.
>>
>>Kevin
>>
>>
>>
>>
>>
>>>Hi Kevin,
>>>
>>>This almost worked. The problem that I'm having is that oObject.label1 is an "Unknown member". If I go to the debugger and investigate oObject, I can see that it has a "label1" object but its value is "(Expression could no be evaluated)".
>>>
>>>Is this something to do with the fact that I'm using a Control control and not a Container control? Any ideas?
>>>
>>>Thanks,
>>>
>>>Mike
>>>
>>>
>>>>Create a program called MyBuilder.prg and add the following code:
>>>>
>>>>

>>>>LPARAMETERS oObject, cButton
>>>>
>>>>cCaption = INPUTBOX("Enter a caption")
>>>>
>>>>oObject.label1.Caption = cCaption
>>>>
>>>>RETURN
>>>>

>>>>
>>>>
>>>>Add a property to your class called 'builder'
>>>>
>>>>Set it to the full path and name of the builder prg you created.
>>>>
>>>>Right click on the class and choose 'builder' from the menu.
>>>>
>>>>The code above will run.
>>>>
>>>>
>>>>
>>>>
>>>>>Hi,
>>>>>
>>>>>I'm trying to create a custom control based on the VFP control class. At design time I dropped a label in the control along with a shape. I created a custom property for the control named Caption that has an assign method to change the label's caption. In the control's init event, I set Caption=Caption to force the assign to update the label's caption.
>>>>>
>>>>>This works fine at runtime. How can I update the label's caption at design time? When I drop a instance of this class on a form, the label and shape objects are not available (since it is a Control control).
>>>>>
>>>>>Regards,
>>>>>
>>>>>Mike