Usas teclado numérico.

[ecfisa]

Hola emii89.

Te conviene usar el evento OnKeyDown y usar un case para evaluar la tecla presionada:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;  
Shift: TShiftState);
begin
   case Key of
     VK_NUMPAD0: { tecla 0 del teclado numérico }
     VK_NUMPAD1: { tecla 1 del teclado numérico}
     ...
     VK_NUMPAD9: { tecla 9 del teclado numérico }
     VK_ADD          { '+' del tec. numérico }
     ...
   end;
end;

Los códigos "VK_.." , los tenés en la ayuda de Delphi. Sólo tenes que poner VK_ en la busqueda del help.

En ejemplo usé el evento OnKeyDown del Form por que no especificas quién es el que debe disparar el evento.

Saludos.