Search found 139 matches: getkeystate

Return to advanced search

Re: Inserting a string with CRLF into a single-line TGet.

1. Why write oGet1:bKeyDown :={ |k|If( k == ASC("V") .and. GetKeyState(VK_CONTROL ), Check CRL F(), ) } for each control if the method can be modified :KeyDown via Override ? With override, the change applies to all Gets and we need not write this ...
by nageswaragunupudi
Tue Dec 12, 2023 10:49 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Inserting a string with CRLF into a single-line TGet.
Replies: 10
Views: 726

Re: Inserting a string with CRLF into a single-line TGet.

Thank you, Rao, a good solution ! Please explain such points: 1. Why write oGet1:bKeyDown :={ |k|If( k == ASC("V") .and. GetKeyState(VK_CONTROL ), Check CRL F(), ) } for each control if the method can be modified :KeyDown via Override ? 2. Will this function work when entering ...
by Natter
Tue Dec 12, 2023 7:47 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Inserting a string with CRLF into a single-line TGet.
Replies: 10
Views: 726

Re: Ctrl + T and bKeyDown

Dear Jimmy,

if GetKeyState( VK_CONTROL ) .and. ( nKey == Asc( "t" ) .or. nKey == Asc( "T" ) )

nKey is the key value that was pressed
by Antonio Linares
Mon Dec 26, 2022 8:32 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Ctrl + T and bKeyDown
Replies: 4
Views: 216

Re: Fivewin Setkey(ALT + F2, {|| ...} ) ?

hi Enrico,
Enrico Maria Giordano wrote:
Jimmy wrote:why is GetKeyState( VK_MENU ) not recognize :?:

Try GetAsyncKeyState( VK_MENU ). Works fine here.

still can not get any Result for VK_MENU :(

i got Result for GetKeyState( VK_CONTROL ) and GetKeyState( VK_SHIFT ) but not for GetKeyState( VK_MENU )
by Jimmy
Mon Oct 31, 2022 10:09 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Fivewin Setkey(ALT + F2, {|| ...} ) ?
Replies: 10
Views: 568

Re: Fivewin Setkey(ALT + F2, {|| ...} ) ?

Jimmy wrote:why is GetKeyState( VK_MENU ) not recognize :?:


Try GetAsyncKeyState( VK_MENU ). Works fine here.
by Enrico Maria Giordano
Mon Oct 31, 2022 8:43 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Fivewin Setkey(ALT + F2, {|| ...} ) ?
Replies: 10
Views: 568

Re: Fivewin Setkey(ALT + F2, {|| ...} ) ?

... to use SHIFT, CONTROL and ALT i can build 4 x 12 Fn-Key how under Fivewin :?: --- does F1 "only" work with "Help" :?: why is GetKeyState( VK_MENU ) not recognize :?:
by Jimmy
Mon Oct 31, 2022 8:18 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Fivewin Setkey(ALT + F2, {|| ...} ) ?
Replies: 10
Views: 568

Re: Browse and lower case keys

nageswaragunupudi wrote:GetKeyState( VK_SHIFT ) --> Shift key is pressed

Hi.
This does not work when "CAPS LOCK" is turned off and no SHIFT pressed.
Do you know how do I know CAPS LOCK state ?

[[]] Maurício Ventura Faria
by concentra
Wed Mar 30, 2022 6:30 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Browse and lower case keys
Replies: 5
Views: 240

Re: Browse and lower case keys

GetKeyState( VK_SHIFT ) --> Shift key is pressed
by nageswaragunupudi
Wed Mar 30, 2022 5:35 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Browse and lower case keys
Replies: 5
Views: 240

Re: Combinar teclas dentro xbrowse

Hola Leandro,

A ver si esto te da una pista y puedes adaptarlo a tus necesidades

SetKey( VK_F12 , {|| if(GetKeyState( VK_SHIFT ), Calendario(), if(GetKeyState( VK_CONTROL ), EliminarDatos(), Calculador() ) ) } )
by Manuel Aranda
Sat Aug 29, 2020 8:56 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Combinar teclas dentro xbrowse (Solucionado)
Replies: 2
Views: 472

GetKeyState with K_ALT_F4

on a dialog I insert ON INIT ( oDlg:bValid := { || !GetKeyState( VK_ESCAPE ) },; run ok but I wish block also alt+f4 (K_ALT_F4) GetKeyState accept more parameters ? I make ON INIT ( oDlg:bValid := { || !GetKeyState( VK_ESCAPE ) .and. !GetKeyState( ...
by Silvio.Falconi
Wed Apr 22, 2020 12:07 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: GetKeyState with K_ALT_F4
Replies: 0
Views: 253

Check keyboard buffer without the program being in focus

... that may be pressed. Example: Pressing CTRL + J The problem is that the program is minimized in the tray. the CTRL key I can check with GETKEYSTATE plus the letter J key only with LastKey (), but it works if the program is in focus. Is there another function that could read the keyboard ...
by Giovany Vecchi
Wed Jan 29, 2020 7:24 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Check keyboard buffer without the program being in focus
Replies: 1
Views: 519

Re: Setkey para varias acciones SOLUCIONADO

SetKey ( VK_F12 , { | | IIF ( GetKeyState ( VK_SHIFT ), x10_grilla_fotos ( ) ,; && VK_Shift := 16 IIF ( GetKeyState ( VK_CONTROL ), x_20_grilla_fotos ( ) ,; && VK_Control := 17 x_37_grilla_fotos ( ) ) ) } ) && VK_normal ...
by J. Ernesto
Fri Oct 04, 2019 12:43 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Setkey para varias acciones SOLUCIONADO
Replies: 2
Views: 581

Re: XBrowse error in GoRight method

... I had a look at METHOD KeyDown and added a message METHOD KeyDown( nKey, nFlags ) CLASS TXBrowse ... ... case nKey == VK_RIGHT if GetKeyState( VK_CONTROL ) ::GoRightMost() else MsgAlert( STR(nKey), "Go right" ) ::GoRight() :!: endif closing the message the cell is painted ...
by ukoenig
Thu May 09, 2019 1:04 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: XBrowse error in GoRight method
Replies: 2
Views: 642

xBrowse - control de combinacion de teclas

Hola Gente; En un xBrowse tengo lo siguiente      oBrw:bKeyDown:= {|nK| if( GetKeyState( VK_CONTROL ) .and. nK==VK_X, "OK", "tecla/s erroneas" ) }  La respuesta es que, siempre, evalúa la pulsación de la tecla Control; ...
by MarioG
Wed Apr 11, 2018 2:04 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: xBrowse - control de combinacion de teclas
Replies: 2
Views: 455

Re: codigos de las teclas

hmpaquito wrote:Hay que comprobar si está pulsada la tecla Control o Alt y la tecla del caso.


Algo asi

Try with
local lControl := GetKeyState( VK_CONTROL )
local lShift := GetKeyState( VK_SHIFT )
local lMenu := GetKeyState( VK_MENU )

if lMenu
//
endif

by cnavarro
Tue Jan 16, 2018 7:20 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: codigos de las teclas
Replies: 2
Views: 568
Next

Return to advanced search