让TRichEdit支持BIG5内码

各人好，此刻的软件如：Foxmail等软件，都有显示GB内码和BIG5内码的成果。我颠末一段时间的探索，发明白实现这种成果的要领。此刻就来先容给各人。首先，要给各人先容一下这两种内码：各人都知道英文的ASCII码是用一个字节来暗示的，但中文因为文字数量太多，所以只能用两个字节来暗示。实际上我们常见的文本文件中生存的就是每个汉字对应的内码，而汉字的内码就是该汉字在中文字库中的逻辑位置。在中文字库中，该逻辑位置存放了这个汉字的图像信息，有了这些图像信息，就可以显示该汉字了，虽然在此刻的Windows中这个显示的进程是由操纵系统自动来完成的，我们不必去体贴它。可是由于一些汗青上的原因，汉字的内码方案有两种，我们大陆地域利用的是GB码，而台湾省却利用的是BIG5码。GB码文件中生存的是汉字相应的GB编码，BIG5码文件中生存的是汉字相应的BIG5编码。而两种内码又都对应于各自的字库文件，所以当我们利用GB内码的简体中文Windows来看BIG5内码的文件时，就会发生常说的乱码现象。

由于我们是要显示BIG5码的汉字，所以再先容一下BIG5码的编码方案：每个汉字由两个字节组成，第一字节的范畴从0X81－0XFE，第二个字节的范畴别离为0X40－0X7E，0XA1－0XFE。好了，知道了汉字显示的道理和BIG5码的编码方案，就可以很容易让TRichEdit支持BIG5码了。

第一步：找一个用于内码转换的码表文件。

我用的是CCDOS97里带的CCDOS.TAB，这个文件的巨细为45840个字节。假如你没有这个文件，可以给我来信（[email protected]）我会寄一个给你。虽然你还可以按照BIG5码的编码方案本身做一个，这里就不多说了。

第二步：把码表文件转换成数组文件。见下面的措施。

用BCB成立一个节制台应用措施。把它存为TABTOHEX.BPR和TABTOHEX.CPP。然后在TABTOHEX.cpp中添加以下代码：

#pragma hdrstop
#include <condefs.h>
#include"stdio.h"
#include"stdlib.h"
#pragma argsused
int main(int argc, char **argv)
{
　　 FILE *tab;
　　 FILE *hex;
　　 int i=0;
　　 unsigned int ch;
　　 tab=fopen("ccdos.tab","rb");//打开CCDOS.TAB文件
　　 hex=fopen("tab.h","wb");
　　 fputs("unsigned char tab[45840]={",hex);
　　 fprintf(hex,"\n");
　　 for(i=0;i<45840;i++)
　　 {
　　　　 if(i%20==0)
　　　　 {
　　　　　　 fprintf(hex,"\n");
　　　　 }
　　　　 ch=fgetc(tab);
　　　　 fprintf(hex,"0x%x\x2c",ch);//把码表文件转换为数组文件
　　 }
　　 fputs("0xff};",hex);
　　 fcloseall();
　　 return 0;
}

然后编译并执行这个措施，获得TAB.H文件。

第三步:在BCB3.0中新建一个尺度的应用措施。添加一个TButton组件：Button1添加一个TRichEdit组件：RichEdit1适当调解它们的巨细与位置。然后在Unit1.cpp中添加下面的代码：

#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include"tab.h"//把头文件TAB.H包括在内
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
　　 RichEdit1->Lines->LoadFromFile("c:\\BIG5.TXT");//读取一个BIG5码的文件，可本身的环境设定
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
　　 unsigned long i,address;//把BIG5码转换为GB码
　　 unsigned char ch1,ch2;
　　 char *x;
　　 x=RichEdit1->Lines->GetText();
　　 i=0;
　　 while(x[i]!='\0')
　　 {
　　　　 ch1=x[i];
　　　　 if(ch1>=0xa1)
　　　　 {
　　　　　　 ch2=x[i+1];
　　　　　　 if(ch2>=0x40&&ch2<=0x7e)
　　　　　　 {
　　　　　　　　 address=ch1*314+ch2*2-33010;
　　　　　　　　 x[i]=tab[address];
　　　　　　　　 x[i+1]=tab[address+1];
　　　　　　 }
　　　　　　 if(ch2>=0xa1&&ch2<=0xfe)
　　　　　　 {
　　　　　　　　 address=ch1*314+ch2*2-33078;
　　　　　　　　 x[i]=tab[address];
　　　　　　　　 x[i+1]=tab[address+1];
　　　　　　 }
　　　　　　 i+=2;
　　　　 }
　　　　 else
　　　　 i++;
　　 }
　　 RichEdit1->Lines->Text=x;
　　 RichEdit1->SetFocus();
　　 RichEdit1->SelStart = 0;
}

#p#分页标题#e#

编译并执行它，首先你会看到RichEdit1中的BIG5码文件显示为乱码。按一下Button1，这时，你就会看到RichEdit1中的乱码酿成了正常的汉字。好了，此刻你本身编的软件也可以支持BIG5码了，是不是感受更专业一些。GB->BIG5的转换要领也是雷同的，有乐趣的伴侣可以给我来信。最后，祝各人龙年愉快。本措施在WIN97，BCB3.0下编译通过。