>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