topic-19201

Posts: 1387

Joined: Fri May 23, 2008 01:33 PM

Sending a K_RIGHT code in TGet?
Posted: Thu Jul 01, 2010 11:44 AM

Hi,

I want to send a 3 K_RIGHT inkey code when I focus a get. I tried below code but it does not worked. Is there any other way to do?

    oGet:bGotFocus:={|Self, hCtlLost| HB_KeyPut(K_RIGHT),HB_KeyPut(K_RIGHT),HB_KeyPut(K_RIGHT),.T.}

Thanks in advance.

Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.06

Posts: 1335

Joined: Fri Jun 13, 2008 11:04 AM

Re: Sending a K_RIGHT code in TGet?
Posted: Thu Jul 01, 2010 12:09 PM

Try this

oGet:bGotFocus:={|| oGet:KeyDown(VK_RIGHT),oGet:KeyDown(VK_RIGHT),oGet:KeyDown(VK_RIGHT),.T.}

Regards
Anser

Posts: 1387

Joined: Fri May 23, 2008 01:33 PM

Re: Sending a K_RIGHT code in TGet?
Posted: Thu Jul 01, 2010 01:25 PM

Thanks Anser,

It works now.

Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.06

FiveTech Support Forums