哪个函数可以键盘的ascii码号?

Question

edit1.Text:=inttostr(ord('a'));//显示a的ascii码

Answer 1

可是我想知道"backspace"的ascii码.该怎么办呢?

Answer 2

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 showmessage(inttostr(key));
end;
在窗体的keydown时间中写如上代码

Answer 3

OnKeypress和OnKeyDown这两个事件都可以得到

Answer 4

但是有个问题，取得的ascii码，只有大写的，（不区分大小写），怎样区分呢，是不是要判断键盘的状态，自己加上一个数，！·#￥%这些符号的ascii呢？？？