Thanks !

>1)i got some code in MouseEnter and MouseLeave even
>but in click even i want to stop the MouseLeave even...
>how?

Add a property in the form. In MouseEnter set this property to .t., in Click Event set it to .f., then in MouseLeave run the code when this property is .t., something like:

*** MouseEnter
thisform.bRunMouseLeave = .t.
...


*** Click
thisform.bRunMouseLeave = .f.
....

*** MouseLeave
IF thisform.bRunMouseLeave
...
ENDIF