Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus-es / 2013-09

formkeydown: numeros de teclado numérico

3 messages · 2 people ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Paola Bruccoleri

Hola..

en el eveno formkeydown, capturo las pulsaciones de determinadas teclas, entre ellas, de n�meros del teclado.

if key in [VK_0..VK_9] then begin // buscar
......

todo lindo, pero solo me detecta los n�meros si los presiono desde el teclado com�n, NO desde el teclado num�rico...

alguna idea de c�mo solucionarlo?
muchas gracias!

Reply by email

Martin Gomez
to Paola Bruccoleri

?Paola, estos son los Key Codes para el pad numerico:

     VK_NUMPAD0 = 96;
     VK_NUMPAD1 = 97;
     VK_NUMPAD2 = 98;
     VK_NUMPAD3 = 99;
     VK_NUMPAD4 = 100;
     VK_NUMPAD5 = 101;
     VK_NUMPAD6 = 102;
     VK_NUMPAD7 = 103;
     VK_NUMPAD8 = 104;
     VK_NUMPAD9 = 105;
     VK_MULTIPLY = 106;
     VK_ADD = 107;
     VK_SEPARATOR = 108;
     VK_SUBTRACT = 109;
     VK_DECIMAL = 110;
     VK_DIVIDE = 111;

Est�n en defines.inc, en lcltype.pp, en keyboard.pp y en otros m�s, lo m�s probable es que ya los tengas incluidos y solo tengas que usarlos en tu if.

Try not to become a man of success but rather to become a man of value. *Albert Einstein* ------------ pr�xima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20130930/70af812b/attachment.html>

Reply by email

Paola Bruccoleri
to Martin Gomez

El 30/09/2013 15:37, Martin Gomez escribi�:

Show quoted text 23 lines
?Paola, estos son los Key Codes para el pad numerico: VK_NUMPAD0 = 96; VK_NUMPAD1 = 97; VK_NUMPAD2 = 98; VK_NUMPAD3 = 99; VK_NUMPAD4 = 100; VK_NUMPAD5 = 101; VK_NUMPAD6 = 102; VK_NUMPAD7 = 103; VK_NUMPAD8 = 104; VK_NUMPAD9 = 105; VK_MULTIPLY = 106; VK_ADD = 107; VK_SEPARATOR = 108; VK_SUBTRACT = 109; VK_DECIMAL = 110; VK_DIVIDE = 111; Est�n en defines.inc, en lcltype.pp, en keyboard.pp y en otros m�s, lo m�s probable es que ya los tengas incluidos y solo tengas que usarlos en tu if.

Hola MArt�n, muchas gracias!!

------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20130930/60217ba9/attachment.html>

Reply by email