intro

[rebollo75]

hola a todos.

sabria alguien decirme como puedo diferenciar cuando se pulsa la tecla intro del teclado numerico con el que esta en la parte de las letras?

se que 13 es el intro, pero es para los dos, y necesito diferenciarlos.

muchas gracias.

[roman]

Hasta donde sé esto no lo puedes detectar con los eventos normales de Delphi. Tienes que interceptar directamente el mensaje WM_KEYDOWN en tu formulario:


interface

type
TForm1 = class(TForm)
private
procedure WMKeyDown(var Msg: TWMKeyDown); message WM_KEYDOWN;
end;

implementation

procedure TForm1.WMKeyDown(var Msg: TWMKeyDown);
begin
if (Msg.CharCode = VK_RETURN) and (Msg.KeyData and $1000000 <> 0) then
ShowMessage('Keypad Enter');
end;

end.


// Saludos