Página 1 de 1

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 30 Nov 2005 14:33
por CDV
Ola galera. Gostaria de saber se existe uma forma de ativar
o NumLock o CapsLock e o ScrollLock quanto acessar o
sistema. Deixar as luzez acesas.

Se alguem puder me ajudar agradeço.

Obrigado.

Enviado: 30 Nov 2005 16:35
por josenilson
Sim existe uma forma de ativar estas teclas

Na biblioteca CA-TOOLS, vc poderá utilizar as seguintes funções:

KSetCaps( .T. ) -> Ativa o Caps Lock
KSetNum( .T. ) -> Ativa o Numlock

Verifique mais detalhes da sintaxe destas funções através do NG (Norton Guides) da CATOOLS. Ok ?

:xau

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 21 Fev 2024 19:53
por deividdjs
josenilson escreveu:Sim existe uma forma de ativar estas teclas



Na biblioteca CA-TOOLS, vc poderá utilizar as seguintes funções:



KSetCaps( .T. ) -> Ativa o Caps Lock

KSetNum( .T. ) -> Ativa o Numlock



Verifique mais detalhes da sintaxe destas funções através do NG (Norton Guides) da CATOOLS. Ok ?



:xau
Não funciona em harbour ??

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 21 Fev 2024 21:34
por sygecom
Está implementado no harbour 3.2 na hbct, não testei para ver se funciona.

KSetIns(), KSetCaps(), KSetNum(), KSetScroll()

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 22 Fev 2024 03:13
por deividdjs
Não funciona! Será que existe outra solução?

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 22 Fev 2024 08:51
por sygecom
Um duvida.
Você usar GTGUI setada no seu sistema ou é CONSOLE ?

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 22 Fev 2024 17:17
por deividdjs
GTWVG SETADA ...
sygecom escreveu:Um duvida.
Você usar GTGUI setada no seu sistema ou é CONSOLE ?

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 23 Fev 2024 06:56
por Wanderlei
Atualmente eu uso um código em C para fazer isso, peguei no forum da Fivewin.

https://fivewin.com.br/index.php?/topic ... ent-139647

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 21 Mai 2024 14:19
por deividdjs
não abre o link ...
Wanderlei escreveu:Atualmente eu uso um código em C para fazer isso, peguei no forum da Fivewin.

https://fivewin.com.br/index.php?/topic ... ent-139647

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 21 Mai 2024 14:55
por JoséQuintas
:\fontes\integra>hbmk2 -find kset
bct.hbc (installed):
KSetCaps()
KSetIns()
KSetNum()
KSetScroll()
Sei lá... pode ser uma pergunta boba, mas....

Provavelmente é passar .T. ou .F.
Fez isso ?

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 22 Mai 2024 07:03
por Wanderlei
*----------------------------------------------------------------------

* Como funciona

*----------------------------------------------------------------------

* SETTECLA( NUM_TECLA, .F./.T. )

*

* EX: SETTECLA( VK_CAPITAL, .T. ) --> Ativa o capslock

* SETTECLA( VK_CAPITAL, .F. ) --> Desativa o capslock

* SETTECLA( VK_CAPITAL ) --> Verifica o estado do capslock

*

* SETTECLA( VK_NUMLOCK, .T. ) --> Ativa o Numlock

* SETTECLA( VK_NUMLOCK, .F. ) --> Desativa o Numlock

* SETTECLA( VK_NUMLOCK ) --> Verifica o estado do Numlock

*

* SETTECLA( VK_SCROLL, .T. ) --> Ativa o ScrollLock

* SETTECLA( VK_SCROOL, .F. ) --> Desativa o ScrollLock

* SETTECLA( VK_SCROOL ) --> Verifica o estado do ScrollLock

*

* SETTECLA( VK_INSERT, .T. ) --> Ativa o Insert

* SETTECLA( VK_INSERT, .F. ) --> Desativa o Insert

* SETTECLA( VK_INSERT ) --> Verifica o estado do Insert

*

*----------------------------------------------------------------------

#pragma begindump

#define _WIN32_IE 0x0500

#define HB_OS_WIN_32_USED

#define _WIN32_WINNT 0x0400

#include

#include "hbapi.h"

HB_FUNC ( SETTECLA )

{

BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

if ( hb_pcount() < 2 )

hb_retl( !keyState[hb_parnl(1)] );

else

if( ( hb_parl(2) && keyState[hb_parnl(1)] == 0 ) || ( !hb_parl(2) && keyState[hb_parnl(1)] == 1 ) )

{

keybd_event( hb_parnl(1), 0x45, KEYEVENTF_EXTENDEDKEY | 0, 0 );

keybd_event( hb_parnl(1), 0x45, KEYEVENTF_EXTENDEDKEY | KEYEVENTF_KEYUP, 0);

}

}

#pragma enddump

ATIVAR NumLock CapsLock e Scroll Lock quando acessar sistema

Enviado: 22 Mai 2024 09:10
por deividdjs
Wanderlei escreveu:*----------------------------------------------------------------------

* Como funciona

*----------------------------------------------------------------------

* SETTECLA( NUM_TECLA, .F./.T. )

*

* EX: SETTECLA( VK_CAPITAL, .T. ) --> Ativa o capslock

* SETTECLA( VK_CAPITAL, .F. ) --> Desativa o capslock

* SETTECLA( VK_CAPITAL ) --> Verifica o estado do capslock

*

* SETTECLA( VK_NUMLOCK, .T. ) --> Ativa o Numlock

* SETTECLA( VK_NUMLOCK, .F. ) --> Desativa o Numlock

* SETTECLA( VK_NUMLOCK ) --> Verifica o estado do Numlock

*

* SETTECLA( VK_SCROLL, .T. ) --> Ativa o ScrollLock

* SETTECLA( VK_SCROOL, .F. ) --> Desativa o ScrollLock

* SETTECLA( VK_SCROOL ) --> Verifica o estado do ScrollLock

*

* SETTECLA( VK_INSERT, .T. ) --> Ativa o Insert

* SETTECLA( VK_INSERT, .F. ) --> Desativa o Insert

* SETTECLA( VK_INSERT ) --> Verifica o estado do Insert

*

*----------------------------------------------------------------------

#pragma begindump

#define _WIN32_IE 0x0500

#define HB_OS_WIN_32_USED

#define _WIN32_WINNT 0x0400

#include

#include "hbapi.h"

HB_FUNC ( SETTECLA )

{

BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

if ( hb_pcount() < 2 )

hb_retl( !keyState[hb_parnl(1)] );

else

if( ( hb_parl(2) && keyState[hb_parnl(1)] == 0 ) || ( !hb_parl(2) && keyState[hb_parnl(1)] == 1 ) )

{

keybd_event( hb_parnl(1), 0x45, KEYEVENTF_EXTENDEDKEY | 0, 0 );

keybd_event( hb_parnl(1), 0x45, KEYEVENTF_EXTENDEDKEY | KEYEVENTF_KEYUP, 0);

}

}

#pragma enddump
funcionou perfeitamente meu amigo .. muito obrigado!