>Hi Carlos, great work as usual!
>
>I think I've found a bug in the class. I'm calling it from my form's save method to display a validation error and it scrolls up the display of the form. Here's the code I'm using (taken from one of the class sample forms)
>
>

>	This.LockScreen=.t.
>        This.txtCuenta.SetFocus
>	Thisform.ctl32_balloontip1._AutoPosition = 1
>	Thisform.ctl32_balloontip1._HideDelay = 5000
>	Thisform.ctl32_balloontip1._CapsLockTip = 0
>	Thisform.ctl32_balloontip1._TipIcon = 3 &&& This is the line that makes the form scroll up
>	Thisform.ctl32_balloontip1._TipTitle = "Error!"
>	Thisform.ctl32_balloontip1._TipText = "Cuenta Del Cliente NO Puede Estar En Blanco"
>	Thisform.ctl32_balloontip1._Visible = 1	
>	Thisform.Refresh
>	This.LockScreen= .F.
>	RETURN 0
>
>

>
>Check the inline comment. If I remove that line, then the form displays correctly.
>
Enmanuel:

This class started as a caps lock password textbox ballon, i was just showing in the sample form some other potential uses, but those are fully untested. Lots of things could be going wrong there. I see you do a setfocus, does txtCuenta have SelectOnEntry = .T.? The Autoposition = 1 means align to caret, if there is no caret, things get ugly.

Check my next post, and try with the new version.

Carlos