[jose.ignacio.ve]

YO YA LO PROGRAME.. ESTE ES MI CODIGO

Código Delphi [-]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
case Key of
    VK_NUMPAD0  : VISOR.Caption:= '0'; // Tecla 0 del Keypad
    VK_NUMPAD1  : VISOR.Caption:= '1';
    VK_NUMPAD2  : VISOR.Caption:= '2';
    VK_NUMPAD3  : VISOR.Caption:= '3';
    VK_NUMPAD4  : VISOR.Caption:= '4';
    VK_NUMPAD5  : VISOR.Caption:= '5';
    VK_NUMPAD6  : VISOR.Caption:= '6';
    VK_NUMPAD7  : VISOR.Caption:= '7';
    VK_NUMPAD8  : VISOR.Caption:= '8';
    VK_NUMPAD9  :  VISOR.CAPTION:= '9';// Tecla 9 del Keypad
    //VK_MULTIPLY :  // Tecla multiplicación (numeric keypad)
    //VK_ADD      : // Tecla suma (numeric keypad)
    //VK_SEPARATOR:  // Tecla separador (numeric keypad)
    //VK_SUBTRACT  : // Tecla resta (numeric keypad)
    //VK_DECIMAL  : // Tecla decimal (numeric keypad)
    //VK_DIVIDE   : // Tecla división (numeric keypad)
  end;
end;

PERO N FUNCIONA NO HAC NADA