建体彩网|中彩网双色球连号|
?
快捷搜索:  as  test  1111  test aNd 8=8  test++aNd+8=8  as++aNd+8=8  as aNd 8=8

?和記娛h188下載app:C++ Builder控件版

?

奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫**

* [翻文轉字]C++ Builder控件版 *

* V1.0 正式版 應用闡明 *

* 2000-04-30 *

奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫**

版權闡明:

-------------

作者:周鵬飛(莫高軟件事情室)

Email: [email protected]

URL: http://mogao.126.com

教導網:http://home.gbsource.net/mogao

本控件為開放源代碼的自由軟件,版權由作者:周鵬飛和[莫高軟件事情室]所有。

功能簡介:

-------------

本控件主要感化是: 可編碼和解碼今朝常見的各類亂碼。有我在手,亂碼不愁!

可以使漢字在Gb碼、Big5碼和HZ碼和之間進行自由的轉換。

可以把隨意率性翰墨和文件轉換為UUencode、XXencode、Base64

和QP碼這四種在Email中常用的編碼規劃,同時還支持解碼。

進級先容:

-------------

V1.0正式版(2000-04-30) 增添三種在Email中常用的編碼規劃:UUencode、XXencode和Base64,

可以把隨意率性翰墨和文件轉換為這三種編碼,同時還支持解碼。

V1.0 beta(1999-12-05) 可以使漢字在Gb碼、Big5碼、HZ碼和QP碼之間進行自由的轉換。

應用授權:

-------------

見License.txt文件。

應用情況:

-------------

本控件是用C++ Builder4.0開拓而成,現在只能在C++ Builder4.0下應用,

BCB3因手頭沒有以是沒法測試,存問裝BCB3的同伙協助測試,感謝。同時

For Delphi的版本、DLL版本和ActiveX版本也將在近期推出。

技巧支持與反饋:

-------------

本控件為自由軟件,不用注冊但同樣可以獲得技巧支持。假如您想獲得本控件的技

術支持和更新看護,請造訪我的Homepage,加入郵遞列表或直接給我寫信,Email的

主題(Subject)應寫為:訂閱郵件列表。

假如您對本控件有什么設法主見、建議或者您應用了本控件,請來信見告。感謝您的支持。

應用闡明:

-------------

1. [安裝控件]

在BCB4的IDE中選擇Component菜單下Install Component項,在Unit file name、

Package file name中指定“gbbig.cpp”文件的路徑和所應用的包。包可所以已經

存在的,例如D:\borland\cbuilder4\Lib\dclusr40.bpk,也可以創建新包,例如

D:\Borland\CBuilder4\Projects\gb.bpk。單擊OK,然后BCB會提示要編譯,當編

譯完成后單擊Install。至此,控件安裝成功,應能在構件面板[莫高軟件]頁上看

到控件圖標,假如沒有,選擇Component菜單下Install Package項,單擊Add,選

定剛才編譯的.bpl文件(如gb.bpl),單擊“確定”,單擊OK。

2. [應用控件]

請先將下面3個文件

gbbig.h (控件頭文件)

gbbig.res (控件資本文件)

gbbig.dcr (控件圖標文件)

拷貝到和您的法度榜樣同一個目錄下,然后您就可以象應用BCB自帶的控件一樣應用本

控件了^_^

3. [函數闡明]

請參看源法度榜樣。

/奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫*

*       [翻文轉字]C++ Builder控件版            *

*           V1.0 正式版                *

*               2000-04-30                 *

*                                    *

*作者:周鵬飛(莫高軟件事情室)                     *

*Email: [email protected]                          *

*URL: http://mogao.126.com                        *

*教導網:http://home.gbsource.net/mogao                 *

*本控件為開放源代碼的自由軟件,版權由作者:周鵬飛和[莫高軟件事情室]所有。*

奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫奸淫*/

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

#include

#pragma hdrstop

#include "GbBig.h"

#pragma package(smart_init)

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

// ValidCtrCheck is used to assure that the components created do not have

// any pure virtual functions.

//

static inline void ValidCtrCheck(TGbBig *)

{

new TGbBig(NULL);

}

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

__fastcall TGbBig::TGbBig(TComponent* Owner)

: TComponent(Owner)

{

FInputText=NULL;

FOutputText=NULL;

temp=NULL;

FInput='\0';

FOutput='\0';

}

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

__fastcall TGbBig::~TGbBig(void)

{

FInputText=NULL;

delete FOutputText;

FOutputText=NULL;

delete temp;

temp=NULL;

FInput='\0';

FOutput='\0';

}

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

//編碼函數

vo?和記娛h188下載appid __fastcall TGbBig::Encode(void)

{

if(FInputText)

{

delete FOutputText;

FOutputText=NULL;

switch(Code)

{

case 0 :

FOutputText=new char[Num+1];

Res=LoadResource(HInstance,FindResource(HInstance,"GB_BIG5","TEXT"));

FontLib=(char*)LockResource(Res);

GbToBig5();

break;

case 1 :

FOutputText=new char[Num+1];

Res=LoadResource(HInstance,FindResource(HInstance,"BIG5_GB","TEXT"));

FontLib=(char*)LockResource(Res);

Big5ToGb();

break;

case 2 :

FOutputText=new char[Num*3+1];

EncodeHZ();

break;

case 3 :

FOutputText=new char[Num+1];

DecodeHZ();

break;

case 4 :

FOutputText=new char[Num*3+1];

EncodeQP();

break;

case 5 :

FOutputText=new char[Num+1];

DecodeQP();

break;

case 6 :

FOutputText=new char[Num/57+Num*4/3+5];

EncodeBase64();

break;

case 7 :

FOutputText=new char[Num*3/4+1];

DecodeBase64();

break;

case 8 :

FOutputText=new char[Num*2/45+Num*4/3+5];

EncodeUue();

break;

case 9 :

FOutputText=new char[Num*3/4+1];

DecodeUue();

break;

case 10 :

FOutputText=new char[Num*2/45+Num*4/3+5];

EncodeXxe();

break;

case 11 :

FOutputText=new char[Num*3/4+1];

DecodeXxe();

break;

}

}

}

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

//GB碼轉換為Big5碼

void __fastcall TGbBig::GbToBig5(void)

{

unsigned char gx,gy,bx,by;

unsigned int xx,yy,i=0;

while((gx=*FInputText++)!='\0')

{

if(gx>=161)

{

gy=*FInputText++;

xx=(gx-16?和記娛h188下載app1)*190;

yy=(gy-161)*2;

bx=*(FontLib+xx+yy);

by=*(FontLib+xx+yy+1);

if(gy=161)

{

by=*FInputText++;

xx=(bx-161)*316;

if(by=161)

{

if(!x)

{

*(FOutputText+i)='~';

i++;

*(FOutputText+i)='{';

i++;

x=1;

}

else x=1;

*(FOutputText+i)=(char)(hz-128);

i++;

}

else

{

if(x)

{

*(FOutputText+i)='~';

i++;

*(FOutputText+i)='}';

i++;

x=0;

}

else x=0;

*(FOutputText+i)=hz;

i++;

}

}

if(x)

{

*(FOutputText+i)='~';

i++;

*(FOutputText+i)='}';

i++;

x=0;

}

*(FOutputText+i)='\0';

FOutput=(AnsiString)FOutputText;

}

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

//對HZ進行解碼

void __fastcall TGbBig::DecodeHZ(void)

{

unsigned i=0;

unsigned char hz;

while((hz=*FInputText++)!='\0')

{

loop2:

if(hz==126)

if((hz=*FInputText++)!='\0')

if(hz==123)

while((hz=*FInputText++)!='\0')

{

loop3:

if(hz==126)

{

if((hz=*FInputText++)!='\0')

if(hz==125) goto loop;

else {*(FOutputText+i)=(char)254;i++;goto loop3;}

}

else {*(FOutputText+i)=(char)(hz+128);i++;}

}

else {*(FOutputText+i)='~';i++;goto loop2;}

else {*(FOutputText+i)='~';i++;goto end;}

else {*(FOutputText+i)=hz;i++;}

loop:;

}

end:;

*(FOutputText+i)='\0';

FOutput=(AnsiString)FOutputText;

}

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

//用QP進行編碼

void __fastcall TGbBig::EncodeQP(void)

{

unsigned char first,second,sour;

unsigned int i=0;

while((sour=*FInputText++)!='\0')

{

if(sour==61)

{

*(FOutputText+i)='=';

i++;

*(FOutputText+i)='3';

i++;

*(FOutputText+i)='D';

i++;

}

else

{

if(sour>127)

{

first=sour>>4;

second=sour&15;

if(first>9) first+=55;

else first+=48;

if(second>9) second+=55;

else second+=48;

*(FOutputText+i)='=';

i++;

*(FOutputText+i)=first;

i++;

*(FOutputText+i)=second;

i++;

}

else {*(FOutputText+i)=sour;i++;}

}

}

*(FOutputText+i)='\0';

FOutput=(AnsiString)FOutputText;

}

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

//對QP進行解碼

void __fastcall TGbBig::DecodeQP(void)

{

unsigned char first,second,sour;

unsigned int i=0;

while((sour=*FInputText++)!='\0')

{

if(sour==61)

{

if((first=*FInputText++)=='\0') {*(FOutputText+i)=sour;i++;break;}

else if((first57)&&(first70))

{

*(FOutputText+i)=sour;

i++;

*(FOutputText+i)=first;

i++;

continue;

}

else if((second=*FInputText++)=='\0')

{

*(FOutputText+i)=sour;

i++;

*(FOutputText+i)=first;

i++;

break;

}

else if((second57)&&(second70))

{

*(FOutputText+i)=sour;

i++;

*(FOutputText+i)=first;

i++;

*(FOutputText+i)=second;

i++;

continue;

}

if(first>=65) first-=55;

else first-=48;

if(second>=65) second-=55;

else second-=48;

sour=NULL;

sour=first>k;

*(chuue+i)|=t;

t=*(chasc+i)>=2;

k+=2;

}

*(chuue+3)=*(chasc+2)&63;

for(i=0;i=0)&&(*(chuue+i)=26)&&(*(chuue+i)=52)&&(*(chuue+i)=65)&&(*(chuue+i)=97)&&(*(chuue+i)=48)&&(*(chuue+i)>8-k;

*(chasc+i)|=t;

}

}

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

//用UUenCode進行編碼

void __fastcall TGbBig::EncodeUue(void)

{

unsigned char *sour,*obje,*inputtext;

unsigned int i,j=0,m=45,n=45,num;

inputtext=FInputText;

sour=new char[45];

obje=new char[60];

while(m==45)

{

m=strlen(inputtext);

if(m>k;

*(chuue+i)|=t;

if(*(chuue+i)==NULL) *(chuue+i)+=96;

else *(chuue+i)+=32;

t=*(chasc+i)>=2;

k+=2;

}

*(chuue+3)=*(chasc+2)&63;

if(*(chuue+3)==NULL) *(chuue+3)+=96;

else *(chuue+3)+=32;

}

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

//對UUenCode解碼

void __fastcall TGbBig::DecodeUue(void)

{

unsigned char *sour,*obje,*inputtext;

unsigned int i,j=0,m=45,n;

sour=new char[60];

obje=new char[45];

inputtext=FInputText;

while(m==45)

{

while(*inputtext=='\r'||*inputtext=='\n')

inputtext+?和記娛h188下載app+;

if((m=*inputtext)!=96||m=='\0')

{

n=m-32;

m=n;

inputtext++;

}

else break;

if(n>8-k;

*(chasc+i)|=t;

}

}

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

//用XXenCode進行編碼

void __fastcall TGbBig::EncodeXxe(void)

{

unsigned char *sour,*obje,*inputtext;

unsigned int i,j=0,m=45,n=45;

char set[]="+-01234567?和記娛h188下載app89ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";

inputtext=FInputText;

sour=new char[45];

obje=new char[60];

while(m==45)

{

m=strlen(inputtext);

if(m>2;

chxxe[1]=(chasc[0]>4)&15;

chxxe[2]=(chasc[1]>6)&3;

chxxe[3]=chasc[2]&63;

for(i=0;i=48&&ch=65&&ch=97&&ch>8-k;

*(chasc+i)|=t;

}

}

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

void __fastcall TGbBig::Input(AnsiString FInput)

{

delete temp;

temp=NULL;

Num=FInput.Length();

FInputText=new char[Num+1];

strncpy(FInputText,FInput.c_str(),Num);

FInputText[Num]='\0';

temp=FInputText;

}

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

void __fastcall TGbBig::InputText(char* Text)

{

delete temp;

temp=NULL;

Num=StrLen(Text);

FInputText=new char[Num+1];

strncpy(FInputText,Text,Num);

FInputText[Num]='\0'?和記娛h188下載app;;

temp=FInputText;

}

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

namespace Gbbig

{

void __fastcall PACKAGE Register()

{

TComponentClass classes[1] = {__classid(TGbBig)};

RegisterComponents("莫高軟件", classes, 0);

}

}

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

免責聲明:以上內容源自網絡,版權歸原作者所有,如有侵犯您的原創版權請告知,我們將盡快刪除相關內容。

您可能還會對下面的文章感興趣:

建体彩网
装修行业卖什么最赚钱 全天极速时时彩计划 银豹彩票游戏 南粤36选7好彩3技巧 8比分网 街机电玩捕鱼千炮版 韩国快乐8官网下载不了 精准一尾中特资料 全民赢彩票开户 江西快三开奖结果一定牛