菜鸟问题,送分啊!

tiancanshi 2002-12-28 11:58:00
经常见到这样的语句key=13等,这我知道表示按下回车。
但是下面的我还是头一次见到Key = #$1b,请高手指点一下,这是什么编码方式?
另外还经常看到 if key=27 or key=40 then
27表示ESC 可是40表示的是"( ",为什么要这么判断呢??
...全文
22 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
井中老男孩 2002-12-28
  • 打赏
  • 举报
回复
看下面的代码:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);//Char
begin
if key=#$31 then ShowMessage(''); //数字1
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState); //Word
begin
if key=$31 then ShowMessage(''); //数字1
end;

#将ascii码转换成字符
$是数字的16进制
star_of_light 2002-12-28
  • 打赏
  • 举报
回复
#$1b表示ASSIC码为1b(十六进制)的字符。
tiancanshi 2002-12-28
  • 打赏
  • 举报
回复
搞糊涂了,键盘码和ASCII码不是一回事吗???
killlaoli 2002-12-28
  • 打赏
  • 举报
回复
40表示的是"( "????

不是吧,40 = $28, 应该是向下的方向键吧....

.....
vk_Left = $25;
vk_Up = $26;
vk_Right = $27;
vk_Down = $28;
vk_Select = $29;
vk_Print = $2A;
vk_Execute = $2B;
vk_SnapShot = $2C;
.......

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧