主题：这些键的Ascii码是多少？？？？？？？？？
幽灵密码
[专家分：3510] 发布于 2011-06-04 20:43:00
上键、下键、左键、右键、F1键、F2键……F12键、Tab键、Ctrl键、Alt键、Win键、Caps Lock键、Shift键、Insert,Delete,Home,End,PageUp,PageDown,Num Lock, Scroll Lock,Pause/Break
这些键的Ascii码是多少？
别告诉我上下左右键是24,25,26,27，那个只是字符，我所说的是按键盘
也别告诉我用Ord（Readkey），用这个全是0
更别告诉我在Tools的Ascii table里，那里面也同样只是显示的字符
用Qbasic的Moz曾经曰过：“这些是扫描符，要在Chr(扫描符的Ascii码)前面加上Chr(0)。上键是Chr(0)+Chr(72),下键是Chr(80),左键是Chr(0)+Chr(75),右键是Chr(0)+Chr(77)。”
我以前用的是Qbasic，Qbasic可以像Moz说的这么搞，
但是我在Pascal里用这个就没有效果了，卡在while readkey<>chr(0)+chr(72)里死出不来，怎么按上键都没有用
等待正解的闪亮登场！！
最后更新于：2011-06-04 20:57:00
回复列表 （共9个回复）
沙发
小田甜 [专家分：3910] 发布于 2011-06-05 09:08:00
uses crt;
var c:char;
begin
while not keypressed do;
while keypressed do writeln(byte(readkey));
end.
你试一下，这几个键都是返回两次readkey的结果的，
第一次是0，第二次是你上面说的那个值。
他没法 while readkey<>chr(0)+chr(72)
只能
[b]repeat while readkey<>char(0) do; until readkey=char(72);[/b]
板凳
幽灵密码 [专家分：3510] 发布于 2011-06-05 16:07:00
能不能这么写
while readkey<>' ' do
if readkey=#0 then begin
if readkey=#72 then ...
if readkey=#80 then ...
end;
3 楼
xzmlyy [专家分：0] 发布于 2011-06-10 17:35:00
新人学习了
zsezt2011bo
4 楼
小田甜 [专家分：3910] 发布于 2011-06-11 15:17:00
先读给一个char变量再判断吧，不然每次读完，上次读入的那个就过去了。
5 楼
幽灵密码 [专家分：3510] 发布于 2011-06-11 16:44:00
while readkey<>' ' do
if readkey=#0 then begin
ch:=readkey;
if ch=#72 then ...
if ch=#80 then ...
end;
这样？
6 楼
sharrow [专家分：0] 发布于 2011-06-23 22:30:00
[url=http://www.worldsmileshop.com/nike-air-jordan-shoes-c-15.html/]cheap Nike air Jordan shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-5-v-shoes-c-15_18.html/]cheap Air Jordan 5 (V) shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-6-vi-shoes-c-15_19.html/]cheap Air Jordan 6 (VI) shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-7-vii-shoes-c-15_76.html/]cheap Air Jordan 7 (VII) shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-8-viii-shoes-c-15_77.html/]cheap Air Jordan 8 (VIII) shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-9-ix-shoes-c-15_78.html/]cheap Air Jordan 9 (IX) shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-10-x-shoes-c-15_79.html/]cheap Air Jordan 10 (X) shoes[/url]
[url=http://www.worldsmileshop.com/air-jordan-11-xi-shoes-c-15_80.html/]cheap Air Jordan 11 (XI) shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-12-xii-shoes-c-15_81.html/]cheap Air Jordan 12 (XII) shoes [/url]
[url=http://www.worldsmileshop.com/air-jordan-13-xiii-shoes-c-15_82.html/]cheap Air Jordan 13 (XIII) Shoes [/url]
[url=http://www.worldsmileshop.com/nike-dunk-high-men-shoes-c-50_65.html/]cheap Nike Dunk High Men Shoes [/url]
[url=http://www.worldsmileshop.com/nike-dunk-low-men-shoes-c-50_66.html/]cheap Nike Dunk Low Men Shoes [/url]
[url=http://www.worldsmileshop.com/nike-dunk-mid-men-shoes-c-50_67.html/]cheap Nike Dunk Mid Men Shoes [/url]
[url=http://www.worldsmileshop.com/nike-dunk-high-women-shoes-c-50_68.html/]cheap Nike Dunk High Women Shoes [/url]
[url=http://www.worldsmileshop.com/nike-dunk-low-women-shoes-c-50_69.html/]cheap Nike Dunk Low Women Shoes [/url]
[url=http://www.worldsmileshop.com/cole-haan-air-conner-shoes-c-70_71.html/]cheap Cole Haan Air Conner shoes [/url]
[url=http://www.worldsmileshop.com/cole-haan-air-conner-boots-c-70_72.html/]cheap Cole Haan Air Conner Boots [/url]
[url=http://www.worldsmileshop.com/mens-gucci-low-top-shoes-c-55_73.html/]cheap Men's Gucci Low Top Shoes [/url]
[url=http://www.worldsmileshop.com/mens-gucci-middle-top-shoes-c-55_74.html/]cheap Men's Gucci Middle Top Shoes [/url]
[url=http://www.worldsmileshop.com/mens-gucci-high-top-shoes-c-55_75.html/]cheap Men's Gucci High Top Shoes [/url]
[url=http://www.worldsmileshop.com/prada-mens-low-shoes-c-13_14.html/]cheap Prada Men's Low Shoes [/url]
[url=http://www.worldsmileshop.com/prada-high-men-shoes-c-13_20.html/]cheap prada high men shoes [/url]
[url=http://www.worldsmileshop.com/prada-mens-slipper-c-13_58.html/]cheap Prada Men's Slipper [/url]
[url=http://www.worldsmileshop.com/supra-skytop-c-3_4.html/]cheap Supra Skytop shoes[/url]
[url=http://www.worldsmileshop.com/supra-shoes-c-3.html/]cheap Supra shoes [/url]
[url=http://www.worldsmileshop.com/radii-footwear-c-7.html/]cheap RADII Footwear shoes[/url]
[url=http://www.worldsmileshop.com/420top-c-7_8.html/]420TOP [/url]
[url=http://www.worldsmileshop.com/christian-louboutin-pumps-c-21_36.html/]cheap Christian Louboutin Pumps shoes[/url]
[url=http://www.worldsmileshop.com/christian-louboutin-evening-c-21_43.html/]cheap Christian Louboutin Evening [/url]
[url=http://www.worldsmileshop.com/christian-louboutin-sandals-c-21_33.html/]cheap Christian Louboutin Sandals [/url]
[url=http://www.worldsmileshop.com/christian-louboutin-boots-c-21_40.html/]cheap Christian Louboutin Boots[/url]
7 楼
idealguy [专家分：110] 发布于 2011-11-24 12:25:00
[img]http://bbs.pfan.cn/image/zip.gif[/img] [url=http://bbs.pfan.cn/downfile.asp?fileid=7835]点击下载附件[/url]
一个任何时候可查看键盘吗的DOS“驻留程序”，绝对不是病毒。
使用方法：运行后驻留。以后在编程的时候，可以按 左SHift + 右Shift激活。
8 楼
1007726717 [专家分：0] 发布于 2011-12-15 20:52:00
搞不懂（我是菜鸟）
9 楼
idealguy [专家分：110] 发布于 2011-12-15 23:21:00
7楼补充：
先用cmd或4nt等进入DOS,运行Keycod后，再运行其他程序，如FPC
我来回复
您所在位置：