标题:[求助]簡體跟繁體之間怎麼轉換?
只看楼主
subway0592
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2006-12-20
 问题点数:0 回复次数:4 
[求助]簡體跟繁體之間怎麼轉換?
大家好,我有些資料需要做簡體和繁體之間的轉換,我想用delphi編程來實現,但不知道怎麼實現,還有,簡體跟繁體之間不知道是否有什麼聯系,(如漢字跟字母有字節上的聯系)。
搜索更多相关主题的帖子: delphi 字母 
2007-02-28 17:31
xu2000
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:51
帖 子:3890
专家分:56
注 册:2006-4-8
得分:0 
给你两个转贴,你自己看吧。
我先生成一个所有的简体汉字字符表,然后用Word的转换功能
将其转换成对应的繁体字表,再查表就可以.
procedure TForm1.Button1Click(Sender: TObject);
var
codefile:File of Byte;
i,j:Integer;
W:Array [0..1] of Byte;
begin
AssignFile(codefile,'table2.txt');
ReWrite(CodeFile);//生成简体表
for i:=$80 to $FF do
for j:=$80 to $FF do begin
W[0]:=i; W[1]:=j;
BlockWrite(codeFile,W,2);
end;
CloseFile(codefile);
end;

//用Word将table2.txt转换成table.txt后再运行下面代码
procedure TForm1.Button2Click(Sender: TObject);
var
i,j:Integer;
W:Array [0..1] of Char;
codefile:File of Byte;
begin
Edit2.Clear;
AssignFile(codefile,'table.txt');
ReSet(CodeFile);
for i:=1 to Length(Edit1.Text) do
if i mod 2=0 then begin
j:=((Ord(Edit1.Text[i-1])-$80)*$80+(Ord(Edit1.Text[i])-$80))*2;
Seek(CodeFile,j);//查表
BlockRead(CodeFile,W,2);
Edit2.Text:=Edit2.Text+W[0]+W[1];//生成繁体字
end;
CloseFile(codefile);
end;
运行结果实现:
中华人民共和国--->中華人民共和國
本程序没有考虑数字等其它字符与汉字混合的情况.不过这应该不难解决.

我会拿出我全部的钱财,以保你衣食无忧。我会献出我所有的智慧,以助你一帆风顺。我会想到所有的笑语,以令你展眉开颜。我会挤出最长的时间,以使你终生幸福。        [本人原创的结婚宣言]
2007-02-28 22:49
xu2000
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:51
帖 子:3890
专家分:56
注 册:2006-4-8
得分:0 
給你一個我的程序中的函數(vc的,不過改造成delphi的應該很容易的)

===================================================================
#include <string.h>
#include <windows.h>

#define myCodeLen 4561

int gb2big(char *pszBuf,WORD CodePage)
{
char *GB,*B5;
char c[3];
int i,nLen,nTmp;
char *pstr,*Ptr;
GB=(char *)malloc(myCodeLen*sizeof(char));
strnset(GB,'\0',sizeof(char)*myCodeLen);
strcpy(GB,"锕锿皑嗳蔼霭爱嫒碍暧瑷谙鹌铵肮鳌袄媪岙骜钯坝罢鲅摆呗败颁钣办绊帮绑谤镑龅宝饱鸨报鲍鹎贝狈备钡惫辈贲锛绷笔币毕闭哔荜毙铋筚滗痹跸辟边笾编鳊贬变缏辩辫标飑骠镖飙镳鳔鳖别瘪宾傧滨缤槟镔濒摈殡膑髌鬓饼禀并拨剥钵饽驳钹铂鹁礴钸补钚才财参骖残蚕惭惨黪灿仓伧沧苍舱册侧厕恻测层馇锸镲诧姹钗侪虿觇掺搀婵谗禅馋缠蝉镡产谄铲阐蒇冁忏颤伥阊鲳长肠苌尝偿厂场怅畅钞车砗彻嗔尘沉陈谌碜闯衬称龀榇谶柽蛏铛撑枨诚铖惩骋鸱痴驰迟齿耻饬炽冲虫宠铳俦帱绸畴筹踌雠刍厨锄雏橱蹰础储处绌触传钏囱疮创怆锤纯唇莼鹑绰辍龊词辞鹚赐从苁枞葱骢聪丛凑辏撺镩蹿窜鹾锉错哒达鞑绐带贷单担郸殚瘅箪胆掸诞弹惮当裆挡党谠砀荡档导岛捣祷焘盗锝灯邓镫镝籴敌涤觌诋递谛缔颠巅癫点电垫钿鲷钓调铞谍叠鲽钉顶订锭丢铥东岽鸫动冻栋胨钭窦读渎椟牍犊黩独笃赌镀断缎锻簖队对兑怼镦吨趸炖钝顿夺铎缍堕讹锇鹅额轭垩恶饿谔阏锷鹗颚鳄儿鸸鲕尔迩饵铒贰发罚阀珐矾钒烦饭贩钫鲂访纺飞绯鲱诽废费镄纷坟奋偾愤粪鲼丰风沣枫疯砜锋冯缝讽凤肤麸凫绂绋辐呒抚辅讣妇负驸复赋缚鲋赙鳆钆该赅钙盖干尴秆赶绀赣冈刚岗纲钢戆缟镐诰锆纥鸽搁阁镉个铬给亘赓绠");
strcat(GB,"鲠宫龚巩贡沟钩缑构诟购够觏轱鸪毂鹘诂钴蛊鹄顾雇锢鲴鸹剐诖挂关观鳏馆贯惯掼鹳广犷归妫龟规闺鲑轨匦诡刽刿柜贵鳜衮绲辊滚鲧呙埚锅蝈国帼掴椁过铪骇顸韩汉颔绗颃蚝号皓颢灏诃阂颌阖贺鹤恒横轰红闳荭鸿黉讧后鲎轷壶鹕浒户护沪鹱华哗骅铧划画话桦怀坏欢还环锾缳缓奂唤换涣焕痪鲩黄鳇谎诙挥晖珲辉汇会讳哕浍绘荟诲桧烩贿秽缋毁荤阍浑馄诨锪钬货获祸镬讥击叽饥机玑矶鸡迹积绩缉赍跻齑羁级极辑几虮挤计记纪际剂哜济继觊蓟霁鲚鲫骥夹浃镓郏荚铗蛱颊贾钾价驾戋坚歼间艰监笺缄缣鲣鹣鞯拣枧俭茧捡笕减检睑裥锏简谫戬碱见饯剑荐贱涧舰渐谏溅践鉴键槛将浆缰讲奖桨蒋绛酱娇浇骄胶鲛鹪侥挢绞饺矫脚铰搅缴峤轿较阶疖节讦杰诘洁结颉鲒届诫仅卺紧谨锦馑尽劲进荩晋烬赆缙觐泾经茎荆惊鲸刭颈净弪径迳胫痉竞靓静镜纠鸠阄旧厩鹫驹锔举榉龃讵钜剧惧据飓锯窭屦鹃镌锩绢隽决诀珏绝觉谲镢军钧皲骏开锎凯剀垲恺铠锴忾龛阚瞰闶钪铐轲钶颏颗壳课骒缂锞垦恳铿抠眍库绔喾裤夸块侩郐哙狯脍宽髋诓诳邝圹纩况旷矿贶亏岿窥匮愦溃蒉馈篑聩锟鲲阃扩阔腊蜡来崃徕涞莱铼赉睐赖濑癞籁兰岚拦栏阑蓝谰澜褴斓篮镧览揽缆榄懒烂滥锒阆捞劳唠崂痨铹铑涝耢乐鳓");
strcat(GB,"缧镭诔垒泪类离骊鹂缡蓠鲡篱礼里逦锂鲤鳢历厉丽励呖坜沥苈枥疠隶俪栎疬轹郦砺砾莅粝蛎跞雳俩奁连帘怜涟莲联裢鲢镰敛琏脸裣蔹练娈炼恋殓链潋凉粮两魉谅辆辽疗缭镣鹩钌猎邻临辚鳞凛廪懔檩赁蔺躏灵岭铃棂绫龄鲮领刘浏馏骝镏绺锍鹨龙咙泷茏栊珑胧砻笼聋陇垄拢娄偻喽蒌楼耧蝼髅嵝搂篓瘘镂噜撸卢庐芦垆泸炉栌胪轳鸬舻颅鲈卤虏掳鲁橹镥陆录赂辂渌禄滤辘鹭氇驴闾榈吕侣铝屡缕褛虑绿孪峦挛栾鸾脔滦銮乱锊抡仑伦囵沦纶轮论罗猡脶萝逻椤锣箩骡镙泺络荦骆妈嬷马犸玛码蚂杩骂唛吗买荬劢迈麦卖脉颟蛮馒瞒鳗满谩缦镘猫锚铆贸么没镅鹛镁门扪钔闷焖懑们锰梦弥祢猕谜芈眯觅幂谧绵黾缅腼鹋缈庙灭缗闵闽悯鳘鸣铭谬缪谟馍殁蓦镆谋亩钼镎内纳钠难馕挠铙蛲垴恼脑闹讷呐馁铌鲵拟腻鲇鲶辇撵酿鸟茑袅陧聂啮嗫镊镍颞蹑宁咛拧狞柠聍泞纽钮农侬哝浓脓驽钕疟傩诺锘讴欧殴瓯鸥呕怄沤盘蹒庞抛赔锫辔喷鹏纰铍噼罴骈谝骗缥飘贫嫔频颦评凭鲆钋泼颇钷仆扑铺镤谱镨凄栖桤齐脐颀骐骑蛴蕲鳍岂启绮气讫弃荠碛迁佥钎牵悭铅谦签骞荨钤钱钳潜浅谴缱堑椠呛戗枪跄锖锵镪强墙嫱蔷樯抢羟炝硗跷锹缲乔侨荞桥谯鞒诮窍翘窃惬箧锲亲钦锓寝吣揿氢轻倾鲭顷请庆穷茕琼鳅");
strcat(GB,"虬赇巯区岖诎驱躯趋鸲癯蠼龋阒觑权诠辁铨颧绻劝却悫确阕阙鹊让荛饶桡扰娆绕热认纫轫韧饪绒荣嵘蝾铷颥缛软锐睿闰润洒飒萨鳃赛毵伞糁馓颡丧骚缫鳋扫涩啬铯穑杀纱刹铩鲨筛晒删姗钐闪陕讪骟缮赡鳝伤殇觞赏绱烧绍赊舍厍设慑摄滠绅诜审谂婶肾渗升声胜渑绳圣尸师诗狮湿酾鲺时识实蚀埘莳鲥驶势视试饰贳适轼铈弑谥释寿兽绶书纾枢摅输赎术树竖数帅闩双谁税顺说烁铄硕丝咝鸶缌蛳厮锶饲驷怂耸讼诵颂馊飕锼擞薮苏稣诉肃谡虽绥随岁谇孙狲荪损笋缩唢琐锁铊獭鳎挞闼骀台鲐态钛贪摊滩瘫坛昙谈锬谭钽叹赕汤铴镗饧傥烫涛绦韬讨铽腾誊锑绨缇鹈题体屉阗条龆鲦粜铫贴铁厅听烃铤铜统恸头秃图钍团抟颓蜕饨氽脱驮驼鸵鼍椭箨洼娲袜腽弯湾纨顽绾万网辋为韦围帏沩违闱涠维潍伟伪纬苇炜玮诿韪鲔卫谓猬温纹闻阌稳问挝涡莴窝蜗卧龌乌邬呜诬钨无吴芜坞妩庑怃鹉务误骛雾鹜诶牺锡习袭觋玺铣戏饩细阋虾侠峡狭硖辖吓厦纤籼莶跹锨鲜闲贤娴衔痫鹇显险猃蚬藓县岘苋现线宪馅献乡芗厢缃骧镶详响饷飨鲞项枭哓骁绡萧销潇箫嚣晓啸蝎协胁挟谐携撷缬写泻绁亵谢锌衅兴陉汹鸺馐绣锈须顼虚嘘许诩叙绪续溆轩谖悬选癣绚铉镟学泶鳕谑勋埙寻驯询浔鲟训讯逊压鸦桠鸭哑痖");
strcat(GB,"亚讶垭娅氩恹烟阉腌闫严盐阎颜兖俨厣魇鼹厌彦砚艳验谚滟酽谳餍赝鸯扬阳杨炀疡养痒样尧肴轺窑谣摇遥瑶鳐药鹞爷铘业叶页邺晔烨谒靥医铱仪诒饴贻遗颐彝钇舣蚁义亿忆艺议异呓译峄怿绎诣驿轶谊缢瘗镒镱阴荫铟银龈饮隐瘾应莺婴嘤撄缨罂樱璎鹦鹰茔荥荧莹萤营萦滢蓥潆蝇赢颍颖瘿哟佣拥痈镛鳙咏涌踊优忧犹邮莸铀鱿铕诱纡于余欤鱼娱谀馀渔觎舆与伛屿俣语龉驭妪饫狱钰预谕阈鹆蓣誉鹬鸢鸳渊员园圆缘鼋辕橼远愿约钥悦钺阅跃粤云匀纭郧氲陨殒运郓恽晕酝愠韫韵蕴杂灾载攒趱暂赞錾瓒赃驵脏凿枣则择泽责啧帻箦赜贼谮缯锃赠扎轧闸铡诈咤栅斋债毡谵斩盏崭辗占战栈绽骣张涨帐胀账钊诏赵辄蛰谪辙锗这鹧贞针侦浈桢砧祯诊轸缜阵鸩赈镇争峥挣狰钲睁铮筝证诤郑帧症织栀执职絷跖踯纸轵帜质栉挚贽轾掷鸷滞骘觯踬终钟肿种众诌轴纣绉昼胄荮皱骤诛诸猪铢槠潴橥烛属嘱瞩伫苎贮驻筑铸专砖颛转啭赚馔妆庄桩装壮状骓锥坠缀缒赘谆浊诼着镯兹咨赀资缁谘辎锱龇鲻渍眦综踪总偬纵邹驺诹鲰镞诅组躜缵钻鳟");

B5=(char *)malloc(myCodeLen*sizeof(char));
strnset(B5,'\0',sizeof(char)*myCodeLen);
strcpy(B5,"錒鎄皚噯藹靄愛嬡礙曖璦諳鵪銨骯鰲襖媼嶴驁鈀壩罷鮁擺唄敗頒鈑辦絆幫綁謗鎊齙寶飽鴇報鮑鵯貝狽備鋇憊輩賁錛繃筆幣畢閉嗶蓽斃鉍篳潷痺蹕闢邊籩編鯿貶變緶辯辮標颮驃鏢飆鑣鰾鱉別癟賓儐濱繽檳鑌瀕擯殯臏髕鬢餅稟並撥剝缽餑駁鈸鉑鵓礡鈽補鈈纔財參驂殘蠶慚慘黲燦倉傖滄蒼艙冊側廁惻測層餷鍤鑔詫奼釵儕蠆覘摻攙嬋讒禪饞纏蟬鐔產諂鏟闡蕆囅懺顫倀閶鯧長腸萇嘗償廠場悵暢鈔車硨徹瞋塵沈陳諶磣闖襯稱齔櫬讖檉蟶鐺橕棖誠鋮懲騁鴟癡馳遲齒恥飭熾沖蟲寵銃儔幬綢疇籌躊讎芻廚鋤雛櫥躕礎儲處絀觸傳釧囪瘡創愴錘純脣蒓鶉綽輟齪詞辭鷀賜從蓯樅蔥驄聰叢湊輳攛鑹躥竄鹺銼錯噠達韃紿帶貸單擔鄲殫癉簞膽撣誕彈憚當襠擋黨讜碭蕩檔導島搗禱燾盜鍀燈鄧鐙鏑糴敵滌覿詆遞諦締顛巔癲點電墊鈿鯛釣調銱諜疊鰈釘頂訂錠丟銩東崬鶇動凍棟腖鈄竇讀瀆櫝牘犢黷獨篤賭鍍斷緞鍛籪隊對兌懟鐓噸躉燉鈍頓奪鐸綞墮訛鋨鵝額軛堊惡餓諤閼鍔鶚顎鱷兒鴯鮞爾邇餌鉺貳發罰閥琺礬釩煩飯販鈁魴訪紡飛緋鯡誹廢費鐨紛墳奮僨憤糞鱝豐風灃楓瘋碸鋒馮縫諷鳳膚麩鳧紱紼輻嘸撫輔訃婦負駙復賦縛鮒賻鰒釓該賅鈣蓋乾尷稈趕紺贛岡剛崗綱鋼戇縞鎬誥鋯紇鴿擱閣鎘個鉻給亙賡綆");
strcat(B5,"鯁宮龔鞏貢溝鉤緱構詬購夠覯軲鴣轂鶻詁鈷蠱鵠顧僱錮鯝鴰剮詿掛關觀鰥館貫慣摜鸛廣獷歸媯龜規閨鮭軌匭詭劊劌櫃貴鱖袞緄輥滾鯀咼堝鍋蟈國幗摑槨過鉿駭頇韓漢頷絎頏蠔號皜顥灝訶閡頜闔賀鶴恆橫轟紅閎葒鴻黌訌後鱟軤壺鶘滸戶護滬鸌華嘩驊鏵劃畫話樺懷壞歡還環鍰繯緩奐喚換渙煥瘓鯇黃鰉謊詼揮暉琿輝匯會諱噦澮繪薈誨檜燴賄穢繢毀葷閽渾餛諢鍃鈥貨獲禍鑊譏擊嘰飢機璣磯雞跡積績緝賫躋齏羈級極輯幾蟣擠計記紀際劑嚌濟繼覬薊霽鱭鯽驥夾浹鎵郟莢鋏蛺頰賈鉀價駕戔堅殲間艱監箋緘縑鰹鶼韉揀梘儉繭撿筧減檢瞼襉鐧簡譾戩鹼見餞劍薦賤澗艦漸諫濺踐鑒鍵檻將漿韁講獎槳蔣絳醬嬌澆驕膠鮫鷦僥撟絞餃矯腳鉸攪繳嶠轎較階癤節訐傑詰潔結頡鮚屆誡僅巹緊謹錦饉盡勁進藎晉燼贐縉覲涇經莖荊驚鯨剄頸淨弳徑逕脛痙競靚靜鏡糾鳩鬮舊廄鷲駒鋦舉櫸齟詎鉅劇懼據颶鋸窶屨鵑鐫錈絹雋決訣玨絕覺譎鐝軍鈞皸駿開鐦凱剴塏愷鎧鍇愾龕闞矙閌鈧銬軻鈳頦顆殼課騍緙錁墾懇鏗摳瞘庫絝嚳褲誇塊儈鄶噲獪膾寬髖誆誑鄺壙纊況曠礦貺虧巋窺匱憒潰蕢饋簣聵錕鯤閫擴闊臘蠟來崍徠淶萊錸賚睞賴瀨癩籟蘭嵐攔欄闌藍讕瀾襤斕籃鑭覽攬纜欖懶爛濫鋃閬撈勞嘮嶗癆鐒銠澇耮樂鰳");
strcat(B5,"縲鐳誄壘淚類離驪鸝縭蘺鱺籬禮裡邐鋰鯉鱧歷厲麗勵嚦壢瀝藶櫪癘隸儷櫟癧轢酈礪礫蒞糲蠣躒靂倆奩連簾憐漣蓮聯褳鰱鐮斂璉臉襝蘞練孌煉戀殮鏈瀲涼糧兩魎諒輛遼療繚鐐鷯釕獵鄰臨轔鱗凜廩懍檁賃藺躪靈嶺鈴櫺綾齡鯪領劉瀏餾騮鎦綹鋶鷚龍嚨瀧蘢櫳瓏朧礱籠聾隴壟攏婁僂嘍蔞樓耬螻髏嶁摟簍瘻鏤嚕擼盧廬蘆壚瀘爐櫨臚轤鸕艫顱鱸鹵虜擄魯櫓鑥陸錄賂輅淥祿濾轆鷺氌驢閭櫚呂侶鋁屢縷褸慮綠孿巒攣欒鸞臠灤鑾亂鋝掄侖倫圇淪綸輪論羅玀腡蘿邏欏鑼籮騾鏍濼絡犖駱媽嬤馬獁瑪碼螞榪罵嘜嗎買蕒勱邁麥賣脈顢蠻饅瞞鰻滿謾縵鏝貓錨鉚貿麼沒鎇鶥鎂門捫鍆悶燜懣們錳夢彌禰獼謎羋瞇覓冪謐綿黽緬靦鶓緲廟滅緡閔閩憫鰵鳴銘謬繆謨饃歿驀鏌謀畝鉬鎿內納鈉難饢撓鐃蟯堖惱腦鬧訥吶餒鈮鯢擬膩鯰鯰輦攆釀鳥蔦裊隉聶嚙囁鑷鎳顳躡寧嚀擰獰檸聹濘紐鈕農儂噥濃膿駑釹瘧儺諾鍩謳歐毆甌鷗嘔慪漚盤蹣龐拋賠錇轡噴鵬紕鈹劈羆駢諞騙縹飄貧嬪頻顰評憑鮃釙潑頗鉕僕撲鋪鏷譜鐠淒棲榿齊臍頎騏騎蠐蘄鰭豈啟綺氣訖棄薺磧遷僉釺牽慳鉛謙簽騫蕁鈐錢鉗潛淺譴繾塹槧嗆戧槍蹌錆鏘鏹強牆嬙薔檣搶羥熗磽蹺鍬繰喬僑蕎橋譙鞽誚竅翹竊愜篋鍥親欽鋟寢唚撳氫輕傾鯖頃請慶窮煢瓊鰍");
strcat(B5,"虯賕巰區嶇詘驅軀趨鴝臞蠷齲闃覷權詮輇銓顴綣勸卻愨確闋闕鵲讓蕘饒橈擾嬈繞熱認紉軔韌飪絨榮嶸蠑銣顬縟軟銳叡閏潤灑颯薩鰓賽毿傘糝饊顙喪騷繅鰠掃澀嗇銫穡殺紗剎鎩鯊篩曬刪姍釤閃陝訕騸繕贍鱔傷殤觴賞緔燒紹賒捨厙設懾攝灄紳詵審諗嬸腎滲昇聲勝澠繩聖屍師詩獅濕釃鯴時識實蝕塒蒔鰣駛勢視試飾貰適軾鈰弒謚釋壽獸綬書紓樞攄輸贖術樹豎數帥閂雙誰稅順說爍鑠碩絲噝鷥緦螄廝鍶飼駟慫聳訟誦頌餿颼鎪擻藪蘇穌訴肅謖雖綏隨歲誶孫猻蓀損筍縮嗩瑣鎖鉈獺鰨撻闥駘臺鮐態鈦貪攤灘癱壇曇談錟譚鉭嘆賧湯鐋鏜餳儻燙濤絛韜討鋱騰謄銻綈緹鵜題體屜闐條齠鰷糶銚貼鐵廳聽烴鋌銅統慟頭禿圖釷團摶頹蛻飩汆脫馱駝鴕鼉橢籜窪媧襪膃彎灣紈頑綰萬網輞為韋圍幃溈違闈潿維濰偉偽緯葦煒瑋諉韙鮪衛謂蝟溫紋聞閿穩問撾渦萵窩蝸臥齷烏鄔嗚誣鎢無吳蕪塢嫵廡憮鵡務誤騖霧鶩誒犧錫習襲覡璽銑戲餼細鬩蝦俠峽狹硤轄嚇廈纖秈薟躚鍁鮮閑賢嫻銜癇鷴顯險獫蜆蘚縣峴莧現線憲餡獻鄉薌廂緗驤鑲詳響餉饗鯗項梟嘵驍綃蕭銷瀟簫囂曉嘯蠍協脅挾諧攜擷纈寫瀉紲褻謝鋅釁興陘洶鵂饈繡鏽須頊虛噓許詡敘緒續漵軒諼懸選癬絢鉉鏇學澩鱈謔勛塤尋馴詢潯鱘訓訊遜壓鴉椏鴨啞瘂");
strcat(B5,"亞訝埡婭氬懨煙閹醃閆嚴鹽閻顏兗儼厴魘鼴厭彥硯艷驗諺灩釅讞饜贗鴦揚陽楊煬瘍養癢樣堯餚軺窯謠搖遙瑤鰩藥鷂爺鋣業葉頁鄴曄燁謁靨醫銥儀詒飴貽遺頤彞釔艤蟻義億憶藝議異囈譯嶧懌繹詣驛軼誼縊瘞鎰鐿陰蔭銦銀齦飲隱癮應鶯嬰嚶攖纓罌櫻瓔鸚鷹塋滎熒瑩螢營縈瀅鎣瀠蠅贏潁穎癭喲傭擁癰鏞鱅詠湧踴優懮猶郵蕕鈾魷銪誘紆於餘歟魚娛諛餘漁覦輿與傴嶼俁語齬馭嫗飫獄鈺預諭閾鵒蕷譽鷸鳶鴛淵員園圓緣黿轅櫞遠願約鑰悅鉞閱躍粵雲勻紜鄖氳隕殞運鄆惲暈醞慍韞韻蘊雜災載攢趲暫贊鏨瓚贓駔髒鑿棗則擇澤責嘖幘簀賾賊譖繒鋥贈紮軋閘鍘詐吒柵齋債氈譫斬盞嶄輾佔戰棧綻驏張漲帳脹賬釗詔趙輒蟄謫轍鍺這鷓貞針偵湞楨碪禎診軫縝陣鴆賑鎮爭崢掙猙鉦睜錚箏證諍鄭幀癥織梔執職縶蹠躑紙軹幟質櫛摯贄輊擲鷙滯騭觶躓終鍾腫種眾謅軸紂縐晝冑葤皺驟誅諸豬銖櫧瀦櫫燭屬囑矚佇苧貯駐築鑄專磚顓轉囀賺饌妝莊樁裝壯狀騅錐墜綴縋贅諄濁諑著鐲茲諮貲資緇諮輜錙齜鯔漬眥綜蹤總傯縱鄒騶諏鯫鏃詛組躦纘鑽鱒");
/*
switch(CodePage)
{
case 0: //gb code
break;
case 1: //gbk code
break;
case 2: //big5 code
break;
case 3: //hz code
break;
default:
break;
}
*/
pstr=pszBuf;
nLen=strlen(pstr);
i=0;
while (i<nLen ) {
if (!IsDBCSLeadByte((BYTE)*pstr))
{
pstr++;
i++;
continue;
}
c[0]=*pstr;
c[1]=*(pstr+1);
c[2]='\0';
Ptr=strstr(GB,c);
nTmp=Ptr-GB;
if(Ptr!=NULL && ((nTmp/2)*2==nTmp) )
{
*pstr=B5[nTmp];
*(pstr+1)=B5[nTmp+1];
}
pstr += 2;
i += 2;
}
free(GB);
free(B5);
return 1;
}

我会拿出我全部的钱财,以保你衣食无忧。我会献出我所有的智慧,以助你一帆风顺。我会想到所有的笑语,以令你展眉开颜。我会挤出最长的时间,以使你终生幸福。        [本人原创的结婚宣言]
2007-02-28 22:49
subway0592
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2006-12-20
得分:0 

好的,先謝謝了,我去研究下。。。。。

2007-03-01 09:51
subway0592
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2006-12-20
得分:0 

你好,//用Word将table2.txt转换成table.txt后再运行下面代码,這裡能不能再幫我解釋解釋,具體用word怎麼轉換?

2007-03-01 10:14



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-122017-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.160849 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved