FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Set Key ( Solved )
Posts: 603
Joined: Sun May 04, 2008 08:44 PM
Set Key ( Solved )
Posted: Fri Sep 25, 2009 06:56 AM

How set key SHIFT + ( button right of mouse )

?

Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: Set Key
Posted: Fri Sep 25, 2009 07:45 AM
Hello Lailton:
lailton.webmaster wrote:How set key SHIFT + ( button right of mouse )

I think is somethig like this:

SetKey( VK_RBUTTON, { || If( GetKeyState( VK_SHIFT ), YourAction(), Nil ) } )

Regards.

Manuel Mercado Gomez.
manuelmercado at prodigy dot net dot mx
Posts: 603
Joined: Sun May 04, 2008 08:44 PM
Re: Set Key
Posted: Fri Sep 25, 2009 08:15 AM

to use setkey i need add in
before of define window
or later ?

because no work this to me :(

Posts: 603
Joined: Sun May 04, 2008 08:44 PM
Re: Set Key
Posted: Fri Sep 25, 2009 08:31 AM

Only Set Key no work to me
more i solved using this.

oWnd:bRClicked := {|| iif( GetKeyState( VK_SHIFT ),MyFunc(), )}

Thanks Manuel.

Continue the discussion