>Hello,
>
>I have a button that opens a form that contains an edit box with a character control source. I would like to set the button's ToolTipText to the value of the cursor/field, in this case, lv_jobitem.citemdesc.
>
>Can this be included in an expression that is dynically evaluated by the button or would I have to phsically write the value of the data source to the button's tooltiptext property each time the record changed?
>
>If any one can help me, I would be very happy!
>
>Thank you,
>
>Angie
Of course.
PUBLIC oform1
oform1=NEWOBJECT("form1")
oform1.Show
RETURN
DEFINE CLASS form1 AS form
ShowTips = .T.
Caption = "DynamicTooltips"
ADD OBJECT mytextbox1 AS mytextbox WITH ;
Left = 76, ;
Top = 56
ENDDEFINE
DEFINE CLASS mytextbox AS TextBox
ToolTipText = "TRANSFORM(SECONDS())"
PROCEDURE ToolTipText_Access
RETURN EVALUATE(m.this.ToolTipText)
ENDDEFINE