Thanks.
Dale Fox
df...@canada.com
Send(Handle(This),256, 161, 0) // This simulates the left shift key
Send(Handle(This),256, 9, 0)
Dale Fox wrote in message ...
I tried this code, but it seems that the first line is not having an effect,
as the focus is still moved to the next field, instead of the previous one.
The pbm_dwnkey event on the DW does get fired twice though; the second time
is the tab key as normal. The first time the "key" variable has no value
and flags is set to 0.
Any ideas?
Erich Heard wrote in message <79Rxi7jn#GA....@forums.sybase.com>...
Function long keybd_event(long lgcur, long lflag, long lint, long leds ) &
Library "user32.dll"
now put this in the code of the event you want to
use:
keybd_event(16, 42, 0, 0)
keybd_event(9,15, 0, 0)
keybd_event(9,15, 2, 0)
keybd_event(16,42, 2, 0)
This will give you the results that you want!
Ken Drendel
If you have any questions or comments you can reach me
via email at kdre...@hotmail.com
or via ICQ @ 34027019
/*
END key will work like a tab key
SHIFT+END will work like backtab
*/
if Key = KeyEnd! then
Choose Case KeyFlags
Case 0
Send( Handle( this ), 256, 9, Long( 0, 0) )
return( 1 )
Case 1
// Send a SHIFT then a TAB
Send( Handle( This ), 256, 161, Long( 0, 0 ) )
Send( Handle( This ), 256, 9, Long( 0, 0 ) )
Return( 1 )
End Choose
end if
Do this instead same results,no confussion.
//Key Down
keybd_event(16,0, 0, 0)
keybd_event(9,0, 0, 0)
//Key Up
// I f you don't do this part it will not release the shift key. Until you
// Press it again.!!!
keybd_event(16,0, 2, 0)
keybd_event(9,0, 2, 0)
Simon
Erich Heard wrote in message ...