取键盘相关信息GetKeyboardType函数

.判断开始 (ret ＝ 1)
编辑框1.加入文本 (“键盘类型：PC或兼容的83键键盘；” ＋ #换行符)
.判断 (ret ＝ 2)
编辑框1.加入文本 (“键盘类型：Olivetti102键键盘；” ＋ #换行符)
.判断 (ret ＝ 3)
编辑框1.加入文本 (“键盘类型：AT或兼容84键键盘；” ＋ #换行符)
.判断 (ret ＝ 4)
编辑框1.加入文本 (“键盘类型：增强型（IBM）101或102键键盘；” ＋ #换行符)