Taschenrechner über Tastatur bedienen

[Tormentor32]

Delphi-Quellcode:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: char); 
begin 
  if key='1' then button1.click; 
end;

Probier mal das

edit: Ist der Fokus auf einem der buttons? Ich glaube, dann wird das KeyPress eines Buttons ausgelöst, und nicht der Form... oder?