Para você saber o número de um tecla

Para você saber o nº de um tecla é só colocar no evento

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift:TShiftState);
Begin
ShowMessage(´O nº da tecla: ´+Char(ORD(Key))+´ é => ´+IntToStr(key));
End;