Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-04-2009
Avatar de casacham
casacham casacham is offline
Miembro
 
Registrado: abr 2006
Ubicación: Cordoba->Argentina. Arboleas->Almeria->España
Posts: 184
Poder: 19
casacham Va por buen camino
Cool Como interpretar WM_KEYDOWN

Hola Gente.
Decidi iniciar este hilo porque estoy estudiando sobre el manejo de los mensajes de windows y necesito ayuda sobre como interpretar una parte de este mensaje de windows WM_KEYDOWN . Tengo un codigo que interpreta si una tecla fue pulsada, soltada o si no ha sido liberada y por lo tanto le llamo repetida. Aqui va la porcion de codigo que realiaza dicha tarea


Código Delphi [-]
procedure TForm1.EstadoDeLaTecla(var mensage: TMessage);
var
Accion : string;
Pulsada, Repetida, Soltada: Boolean;
begin
Soltada := ((mensage.lParam shr 31) and 1)=1;
Repetida:=(((mensage.lParam shr 30) and 1)=1) and not Soltada;
Pulsada := NOT Soltada and Not Repetida;
 
if Soltada then Accion:='Soltada ' ; {Released}
if Repetida then Accion:='Repetida'; {repressed}
if Pulsada then Accion:='Pulsada '; {pressed}
 
Memo1.Lines.Insert(0, Accion);
end;





Lei en la ayuda de la API WIN32 que el mensaje - WM_KEYDOWN - que genera windows al pulsar una tecla; si la misma tecla que inicio el mensaje es mantenida presionada no genera nuevos mensajes sino que inicia un contador de repeticion que se encuentra dentro del mismo mensaje. Como sabemos el mensaje tiene la siguiente informacion en su porcion lParam.


repeat count, scan code, extended-key flag, context code, previous key-state flag, transition-state flag


Ya vi como se puede interpretar parte de la informacion que viene en lParam como se ve en el codigo que puse en este hilo

PREGUNTA
Como debo procesar lParam para obtener el numero de veces que fue repetida la tecla? Como interpreto repeat count ?.

A continuacion agrego una porcion del texto de ayuda para orientar a quien lea este hilo y ofrezca su tiempo para ayudarme con esta pregunta


The WM_KEYDOWN message is posted to the window with the keyboard focus when a nonsystem key is pressed. A nonsystem key is a key that is pressed when the ALT key is not pressed.
WM_KEYDOWN
nVirtKey = (int) wParam; // virtual-key code
lKeyData = lParam; // key data

Parameters
nVirtKey
Value of wParam. Specifies the virtual-key code of the nonsystem key.
lKeyData
Value of lParam. Specifies the repeat count, scan code, extended-key flag, context code, previous key-state flag, and transition-state flag, as shown in the following table:
Value Description
0-15 Specifies the repeat count. The value is the number of times the keystroke is repeated as a result of the user holding down the key.
16-23 Specifies the scan code. The value depends on the original equipment manufacturer (OEM).
24 Specifies whether the key is an extended key, such as the right-hand ALT and CTRL keys that appear on an enhanced 101- or 102-key keyboard. The value is 1 if it is an extended key; otherwise, it is 0.
25-28 Reserved; do not use.
29 Specifies the context code. The value is always 0 for a WM_KEYDOWN message.
30 Specifies the previous key state. The value is 1 if the key is down before the message is sent, or it is 0 if the key is up.
31 Specifies the transition state. The value is always 0 for a WM_KEYDOWN message.

Return Values
An application should return zero if it processes this message.
Default Action
If the F10 key is pressed, the DefWindowProc function sets an internal flag. When DefWindowProc receives the WM_KEYUP message, the function checks whether the internal flag is set and, if so, sends a WM_SYSCOMMAND message to the top-level window. The wParam parameter of the message is set to SC_KEYMENU.
Remarks
Because of the autorepeat feature, more than one WM_KEYDOWN message may be posted before a WM_KEYUP message is posted. The previous key state (bit 30) can be used to determine whether the WM_KEYDOWN message indicates the first down transition or a repeated down transition.
For enhanced 101- and 102-key keyboards, extended keys are the right ALT and CTRL keys on the main section of the keyboard; the INS, DEL, HOME, END, PAGE UP, PAGE DOWN and arrow keys in the clusters to the left of the numeric keypad; and the divide (/) and ENTER keys in the numeric keypad. Other keyboards may support the extended-key bit in the lKeyData parameter.
__________________
La vida no trata de encontrarse a uno mismo, sino de crearse a uno mismo.
Tanto si piensas que puedes como si no, estarás en lo cierto
Responder Con Cita
  #2  
Antiguo 12-04-2009
Avatar de casacham
casacham casacham is offline
Miembro
 
Registrado: abr 2006
Ubicación: Cordoba->Argentina. Arboleas->Almeria->España
Posts: 184
Poder: 19
casacham Va por buen camino
Un poco mas de ayuda

Aqui agrego un poco mas de ayuda, creo que es util para interpretar mi pregunta


Keystroke Message Flags



Repeat Count
You can check the repeat count to determine whether a keystroke message represents more than one keystroke. The system increments the count when the keyboard generates WM_KEYDOWN or WM_SYSKEYDOWN messages faster than an application can process them. This often occurs when the user holds down a key long enough to start the keyboard's automatic repeat feature. Instead of filling the system message queue with the resulting key-down messages, the system combines the messages into a single key down message and increments the repeat count. Releasing a key cannot start the automatic repeat feature, so the repeat count for WM_KEYUP and WM_SYSKEYUP messages is always set to 1.
__________________
La vida no trata de encontrarse a uno mismo, sino de crearse a uno mismo.
Tanto si piensas que puedes como si no, estarás en lo cierto
Responder Con Cita
  #3  
Antiguo 13-04-2009
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 21
cHackAll Va por buen camino
Código Delphi [-]
// LongRec(Message.LParam).Lo
// Message.LParam and $FFFF
__________________
RTFM > STFW > Foro > Truco > Post > cHackAll > KeBugCheckEx
Responder Con Cita
  #4  
Antiguo 14-04-2009
Avatar de casacham
casacham casacham is offline
Miembro
 
Registrado: abr 2006
Ubicación: Cordoba->Argentina. Arboleas->Almeria->España
Posts: 184
Poder: 19
casacham Va por buen camino
Cool Solo devuelve 1

Hola [cHackAll]

Gracias por responder a mi pregunta y tomarte el tiempo de leer todo lo que escribi. Probe interpretar lo que escribiste, y ademas busque info sobre LongRec ( separates parts of a 4-byte value). Pero esto solo me devuelve el valor de 1 cuando hago lo siguiente:
Código Delphi [-]
   ShowMessage (inttoStr(LongRec(Message.lParam).Lo)+' '+inttoStr(Message.LParam and $FFFF);

Eso responde a como interpretar esa parte del mensaje. Y debo comentar entonces lo que yo creia, pues pensaba que leyendo esa parte del mensaje obtenia directamente el n de veces que fue mandada a la cola de procesos la tecla que fue mantenida presionada. Es decir, si yo mantengo presionada la tecla "a" durante un tiempo veo que en mi TMemo se llena de "aaaaaaaaaaaaaaaaaaaaaaa......aaa" pero no logro saber exactamente cuantas "a" tengo al soltar la tecla leyendo el mensaje, sino que creo que debo hacer un contador para obtener el numero de veces que aparecio "a" en el TMemo.
Este post que me escribiste me sirve para seguir estudiando el tema. Gracias
__________________
La vida no trata de encontrarse a uno mismo, sino de crearse a uno mismo.
Tanto si piensas que puedes como si no, estarás en lo cierto

Última edición por casacham fecha: 14-04-2009 a las 10:33:49. Razón: correccion ortografica
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como interpretar un error FGarcia Varios 4 03-01-2008 02:13:09
Interpretar SQL juanpe Firebird e Interbase 4 11-07-2007 11:07:58
Mensage WM_KEYDOWN con TWinControl liadsoft OOP 1 17-05-2006 01:17:57
Interpretar ficheros XSD kes Conexión con bases de datos 0 20-01-2005 13:16:37
Interpretar mensajes de MS-Dos verm83 Varios 3 07-04-2004 16:41:53


La franja horaria es GMT +2. Ahora son las 01:50:30.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi