Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Add a ctrl source to a commandbutton
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01543604
Message ID:
01543610
Views:
61
Borislav,

Super !

i am very glad !

Bernhart

>Try to use DynamicFontUnderline:
>
>*** Form Init event
>oGrid.Column1.DynamicFontUnderline = "thisform.WhenModify()"
>
>*** WhenModify method
> oGrid.Column1.Button1.CAPTION = V_Resident.cetats
>RETURN .f.
>
>
>>Hi dragan,
>>
>>i try
>>
>>
>>
>> BINDEVENT( oGrid.Column1.Text2 ,"Refresh" , oGrid , "WhenModify" , 1 )
>>   BINDEVENT( oGrid.Column1 ,"Refresh" , oGrid , "WhenModify" , 1 )
>>
>>
>>and a method whenmodify
>>
>>
>>LOCAL laObjects(1),;
>>  loEventSource
>>
>>AEVENTS( laObjects, 0)
>>loEventSource = laObjects(1)
>>
>>WITH loEventSource
>> 
>>  DO CASE
>>
>>      *-----------------------------------------------------------------
>>    CASE INLIST( .T. , 'text2' $ LOWER( .NAME ) , .BASECLASS <> 'Commandbutton')
>>  
>>      loEventSource.CAPTION = V_Resident.cetats
>>
>>
>>    OTHERW
>>  ENDCASE
>>
>>
>>ENDWITH
>>
>>
Previous
Reply
Map
View

Click here to load this message in the networking platform