多国语言Demo源码 c++builder6编写

多国语言 c++builder bcb6编写 bcb6编写

//---------------------------------------------------------------------------
#define _UNICODE
#define MAX_COUNT 50
#include 
#pragma hdrstop

#include “D1.h“
//#include “help.h“
#include 
//---------------------------------------------------------------------------
#pragma package（smart_init）
#pragma link “TntMenus“
#pragma link “TntStdCtrls“
#pragma link “TntComCtrls“
#pragma resource “*.dfm“
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1（TComponent* Owner）
        : TForm（Owner）
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::English1Click（Tobject *Sender）
{
 this->English1->Checked=True;

 this->Language1->Caption=L“Language“;
 this->File1->Caption=L“File“;
 this->Open1->Caption=L“Open“;
 this->Close1->Caption=L“Close“;
 this->Save1->Caption=L“Save“;
 this->Edit1->Caption=L“Edit“;
 this->Cut1->Caption=L“Cut“;
 this->Copy1->Caption=L“Copy“;
 this->Paste1->Caption=L“Paste“;
 this->Abou1->Caption=L“Help“;
 this->AbouttheProgram1->Caption=L“About the Program“;
/*Form2->TntStaticText1->Caption=L“Multi-language test program“;
 Form2->TntStaticText2->Caption=L“Copyright （C） 2010 “;
 Form2->TntStaticText3->Caption=L“ Author: lhy “;
 Form2->TntButton1->Caption=L“OK“; */

}

//---------------------------------------------------------------------------


void __fastcall TForm1::FormShow（Tobject *Sender）
{
this->English1->RadioItem=true;
this->Spain1->RadioItem=true;
this->ChineseTraditional1->RadioItem=true;
this->ChineseSimplified1->RadioItem=true;

this->English1->Checked=True;
this->TntRichEdit1->Text=L““;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Spain1Click（Tobject *Sender）
{
 this->Spain1->Checked=True;
 this->ReadInifile（2）;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::ChineseTraditional1Click（Tobject *Sender）
{
  this->ChineseTraditional1->Checked=True;
  this->ReadInifile（1）;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ChineseSimplified1Click（Tobject *Sender）
{
  this->ChineseSimplified1->Checked=True;
  this->ReadInifile（0）;
}
//---------------------------------------------------------------------------


//---------------------------------------------------------------------------



void __fastcall TForm1::AbouttheProgram1Click（Tobject *Sender）
{
//Form2->ShowModal（）;
}
void __fastcall TForm1::ReadInifile（int n）
{
 TCHAR dir[MAX_PATH];
 TCHAR  file[MAX_COUNT]open[MAX_COUNT];
 TCHAR  close[MAX_COUNT]save[MAX_COUNT];
 TCHAR  edit[MAX_COUNT]cut[MAX_COUNT];
 TCHAR  copy[MAX_COUNT]paste[MAX_COUNT];
 TCHAR  help[MAX_COUNT]about[MAX_COUNT];
 TCHAR  text1[MAX_COUNT]text2[MAX_COUNT];
 TCHAR  text3[MAX_COUNT]language[M

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       4918  2010-08-28 14:14  Demoproject\D1.cpp

     文件         51  2010-08-28 14:20  Demoproject\D1.ddp

     文件       2484  2010-08-28 14:01  Demoproject\D1.dfm

     文件       2011  2010-08-28 14:01  Demoproject\D1.h

     文件     108151  2010-08-28 14:37  Demoproject\D1.obj

     文件       4906  2010-08-28 12:22  Demoproject\D1.~cpp

     文件         51  2010-08-28 14:08  Demoproject\D1.~ddp

     文件       2484  2010-08-28 14:01  Demoproject\D1.~dfm

     文件       2011  2010-08-28 14:01  Demoproject\D1.~h

     文件       3535  2010-08-27 18:22  Demoproject\Demo.bpr

     文件       1066  2010-08-27 17:51  Demoproject\Demo.cpp

     文件      37888  2010-09-10 15:30  Demoproject\Demo.exe

     文件      17850  2010-08-28 14:37  Demoproject\Demo.obj

     文件        876  2010-08-27 17:50  Demoproject\Demo.res

     文件    2293760  2010-09-10 15:31  Demoproject\Demo.tds

     文件       3494  2010-08-27 17:51  Demoproject\Demo.~bpr

     文件       3539  2010-08-28 14:20  Demoproject\Demo1.bpr

     文件       1066  2010-08-28 14:09  Demoproject\Demo1.cpp

     文件      17790  2010-08-28 14:13  Demoproject\Demo1.obj

     文件        876  2010-08-28 14:06  Demoproject\Demo1.res

     文件    2293760  2010-08-28 14:20  Demoproject\Demo1.tds

     文件       3539  2010-08-28 14:09  Demoproject\Demo1.~bpr

     文件        763  2010-08-28 14:15  Demoproject\help.cpp

     文件         51  2010-08-28 14:20  Demoproject\help.ddp

     文件       2914  2010-08-28 12:27  Demoproject\help.dfm

     文件       1099  2010-08-28 12:26  Demoproject\help.h

     文件      56944  2010-08-28 12:30  Demoproject\help.obj

     文件        763  2010-08-28 14:15  Demoproject\help.~cpp

     文件         51  2010-08-28 14:15  Demoproject\help.~ddp

     文件       2914  2010-08-28 12:27  Demoproject\help.~dfm

............此处省略9个文件信息