三九宝宝网宝宝百科宝宝知识

GetKeyboardType获取键盘的类型信息

11月16日 编辑 39baobao.com

[留下努力的足迹,获取丰收的喜悦幼师总结]2008年,对于中国真是难以忘怀的一年,对我,又何尝不是呢,这是我踏上社会,进入工作的第一年,我摔倒过,也爬起过,有喜亦有泪。回首来路,我看到了我那清晰可见的脚印,这一路我走得坚定,走得...+阅读

声明:

GetKeyboardType(

nTypeFlag: Integer {0:键盘类型; 1:键盘子类型; 2:功能键数量}

): Integer;

举例:

procedure TForm1.FormCreate(Sender: TObject);

var

i: Integer;

List: TStringList;

begin

List := TStringList.Create;

List.Add('IBM PC/XT or patible (83-key) keyboard');

List.Add('Olivetti "ICO" (102-key) keyboard');

List.Add('IBM PC/AT (84-key) or similar keyboard');

List.Add('IBM enhanced (101/102-key) ke

yboard');

List.Add('Nokia 1050 and similar keyboards');

List.Add('Nokia 9140 and similar keyboards');

List.Add('Japanese keyboard');

i := GetKeyboardType(0);

ShowMessage(List[i-1]); {考试&emsp大提示这里返回: IBM enhanced (101/102-key) keyboard}

i := GetKeyboardType(1);

ShowMessage(IntToStr(i)); {这是厂商自定义数据, 这里返回: 0}

i := GetKeyboardType(2);

ShowMessage(IntToStr(i)); {返回: 12; 就是指 F1..F12}

List.Free;

end;

以下为关联文档:

恭喜张同学成功获取法国入读的机会张同学,本科本站国内专业:中药学国内大学学制:5年法国申请的学校:Tours法国申请的专业:industriallisation et régiementation des produits de santé张同学大学期间学习...

从生活中获取多样化的音乐素材从生活中获取多样化的音乐素材幼儿有他们自己充满幻想和诗意的、多姿多彩的生活小天地,这个小天地中的事物,是他们最关心、最感兴趣的。在开放式的音乐教育中,我们注重从幼儿...

DHCP服务器无法获取IP地址问题解决实录经常进行网络访问操作,遇到一些不能上网的现象是常有的事情,而具体的故障现象无非就是不能进行共享传输或打不开网页内容,不过造成不能上网现象的原因却是错综复杂、千变万化,就...

GetSystemPowerStatus获取系统电源状态的信息声明GetSystemPowerStatus(var lpSystemPowerStatus: TSystemPowerStatus {TSystemPowerStatus 结构}): BOOL;TSystemPowerStatus 是 _SYSTEM_POWER_STATUS 结构的重定义...

GetLogicalDriveStrings获取系统中存在的逻辑驱动器字符串声明:GetLogicalDriveStrings(nBufferLength: DWORD; {缓冲区大小}lpBuffer: PAnsiChar {缓冲区}): DWORD; 缓冲区的结果是这样储存的: 譬如 A 驱动器会表示为 A: 后面隔...

获取生命的硕果我们读过了蒙田的《热爱生命》,懂得了“坏日子,要飞快去‘度’,好日子,要停下来细细品尝”。看完了巴金的《激流》总序,知道了“生活是一个‘搏斗’”。背过了屈原的《国殇》,感悟...

省时省力快速获取PPT的文字内容最近得到一位专家的PowerPoint讲义,领导要我把其中的文字内容提取出来,本想用“复制+粘贴”在Word中搞定,可一看该PPT文稿居然有130多张幻灯片,靠复制粘贴岂不是要把人累倒?经过...

专家谈获取考研英语高分的“核心竞争力”考研翻译从分值上来看,只占去了总分的10%。但是仔细分析翻译在考研英语题型设置中所起的作用,可以说翻译在考研英语中占据着十分重要的地位。为什么这样说呢? 首先,翻译其实是从...

新东方背诵文选80篇:44从冰山中获取淡水ObtainingFre44 Obtaining Fresh Water from Icebergs The concept of obtaining fresh water from icebergs that are towed to populated areas and arid regions of the world was on...

推荐阅读
图文推荐