获取键盘类型解决办法

获取键盘类型
本人知道GetKeyboardType是获取键盘类型的函数，请问高手怎么使用?

------解决方案--------------------
在窗体上放置一个Ｅｄｉｔ１和按钮，然后这样试试

int iType=GetKeyboardType(0);
switch(iType)
{
case 1:
this-> Edit1-> Text= "IBM PC/XT or compatible (83-key) keyboard ";
break;
case 2:
this-> Edit1-> Text= "Olivetti 'ICO ' (102-key) keyboard ";
break;
case 3:
this-> Edit1-> Text= "IBM PC/AT (84-key) or similar keyboard ";
break;
case 4:
this-> Edit1-> Text= "IBM enhanced (101- or 102-key) keyboard ";
break;
case 5:
this-> Edit1-> Text= "Nokia 1050 and similar keyboards ";
break;
case 6:
this-> Edit1-> Text= "Nokia 9140 and similar keyboards ";
break;
case 7:
this-> Edit1-> Text= "Japanese keyboard ";
break;
}