mainform.cpp

C++ BUILDER精彩编程实例集锦(源码) 第一部分 界面设计 第二部分 程序设置

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

#include <vcl.h>
#pragma hdrstop

#include "Mainform.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
bool __fastcall In(int LowPosition, int HighPosition,int Value)
{
  return ((Value<=HighPosition)&&(Value>=LowPosition));
}
char __fastcall GetPYFirstChar(AnsiString HZ)
{
   WORD High =WORD(HZ[1])<<8;
   WORD Low =BYTE(HZ[2]);
   int n=High +Low ;
   if (In(0xB0A1,0xB0C4,n))
     return 'A';
   if (In(0XB0C5,0XB2C0,n))
     return 'B';
   if (In(0xB2C1,0xB4ED,n))
     return 'C';
   if (In(0xB4EE,0xB6E9,n))
     return 'D';
   if (In(0xB6EA,0xB7A1,n))
     return 'E';
   if (In(0xB7A2,0xB8c0,n))
     return 'F';
   if (In(0xB8C1,0xB9FD,n))
     return 'G';
   if (In(0xB9FE,0xBBF6,n))
     return 'H';
   if (In(0xBBF7,0xBFA5,n))
     return 'J';
   if (In(0xBFA6,0xC0AB,n))
     return 'K';
   if (In(0xC0AC,0xC2E7,n))
     return 'L';
   if (In(0xC2E8,0xC4C2,n))
     return 'M';
   if (In(0xC4C3,0xC5B5,n))
     return 'N';
   if (In(0xC5B6,0xC5BD,n))
     return 'O';
   if (In(0xC5BE,0xC6D9,n))
     return 'P';
   if (In(0xC6DA,0xC8BA,n))
     return 'Q';
   if (In(0xC8BB,0xC8F5,n))
     return 'R';
   if (In(0xC8F6,0xCBF0,n))
     return 'S';
   if (In(0xCBFA,0xCDD9,n))
     return 'T';
   if (In(0xCDDA,0xCEF3,n))
     return 'W';
   if (In(0xCEF4,0xD188,n))
     return 'X';
   if (In(0xD1B9,0xD4D0,n))
     return 'Y';
   if (In(0xD4D1,0xD7F9,n))
     return 'Z';
   return char(0);
}
AnsiString __fastcall GetPYString(AnsiString InputHZString)
{
   AnsiString TempString, ReturnString;
   AnsiString Str =InputHZString.Trim();
   for (int i=1; i<=Str.Length(); i++)
   {
      if (isprint(Str[i]))
      {
         ReturnString = ReturnString + Str[i];
      }
      else
      {
         TempString += Str[i];
         if (TempString.Length() == 2)
         {
            ReturnString = ReturnString + GetPYFirstChar(TempString);
            TempString = "";
         }
      }
   }
   return ReturnString;
}

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
  if(this->Edit1->Text.Length()<1)
    return;
  this->Edit2->Text=GetPYString(this->Edit1->Text);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
   this->Close();        
}
//---------------------------------------------------------------------------