回 帖 发 新 帖 刷新版面

主题:这些键的Ascii码是多少?????????

上键、下键、左键、右键、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)里死出不来,怎么按上键都没有用


等待正解的闪亮登场!!

回复列表 (共9个回复)

沙发

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]

板凳

能不能这么写
while readkey<>' ' do
  if readkey=#0 then begin
    if readkey=#72 then ...
    if readkey=#80 then ...
  end;

3 楼

新人学习了
zsezt2011bo

4 楼

先读给一个char变量再判断吧,不然每次读完,上次读入的那个就过去了。

5 楼

while readkey<>' ' do
  if readkey=#0 then begin
    ch:=readkey;
    if ch=#72 then ...
    if ch=#80 then ...
  end;
这样?

6 楼

[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 楼

[img]http://bbs.pfan.cn/image/zip.gif[/img] [url=http://bbs.pfan.cn/downfile.asp?fileid=7835]点击下载附件[/url]

一个任何时候可查看键盘吗的DOS“驻留程序”,绝对不是病毒。

使用方法:运行后驻留。以后在编程的时候,可以按 左SHift + 右Shift激活。

8 楼

搞不懂(我是菜鸟)

9 楼

7楼补充:
先用cmd或4nt等进入DOS,运行Keycod后,再运行其他程序,如FPC

我来回复

您尚未登录,请登录后再回复。点此登录或注册