在keydown事件里面 showmessage(inttostr(key)); 在keypress事件里面 showmessage(key); 就知道了。 Form1.KeyPreview := True; procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin Showmes... [阅读全文]