>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
> 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