unit1.cpp

本书《C++Builder与WindowsAPI经典范例》附含配套光盘包括132个WindowsAPI函数及206个完整、可执行的实例

//---------------------------------------------------------------------------
//目的：取得现在线程输入法的伪码与扫描码相互转换
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{//将Form1的Tag作为递增变量
Tag = 0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//先删除Memo1中所有文字
Memo1->Text = "";
while(Tag<400)
   {//MapVirtualKeyEx第二项参数决定伪码与扫描码相互转换的机制
   //GetKeyboardLayout(0)取得现在线程输入法的handle
   int g = ::MapVirtualKeyEx(Tag++, 0, ::GetKeyboardLayout(0));
   if(g)//可转换成功，则列出
      Memo1->Lines->Add("伪码_" + AnsiString(Tag) +
                        " <-> 扫描码_"+AnsiString(g));
   }
Tag = 0;//将Form1的Tag归零
}
//---------------------------------------------------------------------------