>I have a simulated Titlebar class attached to _Screen.
>I have the follwing methods:
>
>
>
>* Mouse Down
>IF nButton = 1
>
> IF _Screen.WindowState = 0
>
> _Screen.LockScreen = .T.
>
> ENDIF
>
>ENDIF
>
>* Mouse Move
>IF nButton = 1
>
> IF _Screen.WindowState = 0
>
> _Screen.Move(nXCoord, nYCoord)
>
> ENDIF
>
>ENDIF
>
>* Mouse Up
>IF nButton = 1
>
> IF _Screen.WindowState = 0
>
> _Screen.LockScreen = .F.
>
> ENDIF
>
>ENDIF
>
>
>
>The screen moves, but it is
really ugly. Anyone know the right way to do this?
Have you tried the various Drag-related methods?
Another thing worth trying would be to put a DOEVENTS right after _Screen.Move in .MouseMove
Regards. Al
"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov
Neither a despot, nor a doormat, be
Every app wants to be a database app when it grows up
