>This one is better, sending CTRL+ESC keystroke:
>
http://www.devx.com/vb2themax/Tip/18342I try first and that solution.
I think this is better solution from first too.
>
>Translated into VFP:
>DECLARE keybd_event IN user32;
> SHORT bVk, SHORT bScan, INTEGER dwFlags,;
> INTEGER dwExtraInfo
>
>#DEFINE KEYEVENTF_KEYUP 2
>#DEFINE vbKeyControl 17
>#DEFINE vbKeyEscape 27
>
>= keybd_event(vbKeyControl, 0, 0, 0)
>= keybd_event(vbKeyEscape, 0, 0, 0)
>DOEVENTS
>
>= keybd_event(vbKeyControl, 0, KEYEVENTF_KEYUP, 0)
>= keybd_event(vbKeyEscape, 0, KEYEVENTF_KEYUP, 0)
>DOEVENTS
>
_______________________________________________________________
Testing displays the presence, not the absence of bugs.
If a software application has to be designed, it has to be designed correctly!
_______________________________________________________________
Vladimir Zografski
Systems Analyst
