Hi Greg
any vfp control.tooltiptext can embed 8192 characters in rectangular yellow area.
can build multiline tooltiptext with text/endtext or adding chr(13) in any string.

PUBLIC oform
oform=NEWOBJECT("form1")
oform.Show
RETURN
*
DEFINE CLASS form1 AS form
	Top = 0
	Left = 0
	Height = 264
	Width = 528
	Caption = "ToolTopText can embed 8192 characters."
	Name = "Form1"

	ADD OBJECT text1 AS textbox WITH ;
		Height = 37, ;
		Left = 60, ;
		Top = 72, ;
		Width = 181, ;
		Name = "Text1"


	PROCEDURE text1.Init
		local m.myvar 
		text to m.myvar noshow
		Lorem ipsum dolor sit amet, consectetur adipiscing elit. Proin vel risus eget lorem feugiat
		fermentum nec a turpis. Phasellus purus sem, mollis ac posuere eget, ornare vel orci. Sed ac rutrum
		nulla. Aenean ultrices eget lectus eu efficitur. In hac habitasse platea dictumst. Nulla in iaculis nisi.
		Nullam et pulvinar tellus. Donec arcu dui, efficitur a odio non, porta congue dolor. Aenean viverra
		auctor sagittis. Integer lobortis dignissim auctor. Proin et volutpat massa.
		Cras vitae felis venenatis, egestas sem quis, sodales neque. Donec venenatis hendrerit odio, non
		pellentesque metus scelerisque ac. Suspendisse aliquet rhoncus odio id viverra. Vestibulum feugiat
		lectus a nisl pulvinar, in tempor metus eleifend. Nunc id odio quam. Praesent egestas lorem ut
		sollicitudin consectetur. Vestibulum id bibendum est. Ut vel lacus sapien. Quisque eget molestie
		sem. Integer eget purus eu orci molestie aliquam quis in ante. Integer a magna eget lectus finibus
		porttitor. Donec fringilla sapien a quam aliquet, pellentesque blandit nisl placerat. Nam hendrerit
		velit vel ex aliquam, eget convallis ante mollis....end
		endtext
		this.tooltipText=m.myvar
		thisform.showTips=.t.
	ENDPROC

ENDDEFINE
*
*-- EndDefine: form1