delphi繁体程序怎么读简体数据库(delphi编写的程序的db文件如何读取)
本文目录
- delphi编写的程序的db文件如何读取
- 在SQL中,怎样把数据库资料有繁体转换为简体呢
- 怎样将DELPHI里显示的繁体字转换成简体字
- delphi2009 GB2Big5 Gb简体转繁体BIG5,不仅仅是GBK的繁简转换,要转到大五码Big5,D7的代码就不必贴了,D09的
- delphi下怎样实现richedit控件中文本的繁体简体转换
- delphi 现有一程序,要转换成繁体,请问有什么好的方法吗
- 繁体os delphi中乱码简体怎么转换为繁体
- delphi如何读取服务器上的数据库文件
delphi编写的程序的db文件如何读取
这是数据库数据存放文件。每种软件都有它自己的存放格式,就是数据的排列方式。后缀名均为DB。很多软件都可以打开啊。delphi 、VB、VC等等编程类软件都可以打开的。
在SQL中,怎样把数据库资料有繁体转换为简体呢
有个好办法,在繁体下,转换成access 格式的文件,复制到简体下,是可以正常识别的我测试过,非常方便
怎样将DELPHI里显示的繁体字转换成简体字
有一个转换的pas,ChineseCharactersConvert.pas,你可以搜索
呃。。这个好像是简体转繁体的,反过来我没测试。。应该也可以
delphi2009 GB2Big5 Gb简体转繁体BIG5,不仅仅是GBK的繁简转换,要转到大五码Big5,D7的代码就不必贴了,D09的
一个叫尤陵的女孩,死前15岁,被活埋至死了成了猛鬼,凶手是余霍。这是她想让别人知道的!请把这消息传达给10人,或5个群。她会报答你的,让你喜欢的人喜欢上你。如果不发,你晚上做梦一只梦到她死前的活埋情景,等你结婚那天,你人会消失,并在15天后发现他死在你们家你家的院子里,也是被活埋的!这是情连锁信,5天内必须帮她传达给别人。
delphi下怎样实现richedit控件中文本的繁体简体转换
Function Big52GB(BIG5Str: String): AnsiString; {进行big5转GB内码} Var Len: integer; pBIG5Char: PChar; pGBCHSChar: PChar; pGBCHTChar: PChar; pUniCodeChar: PWideChar; Begin //String -》 PChar pBIG5Char := PChar(BIG5Str); Len := MultiByteToWideChar(950, 0, pBIG5Char, -1, Nil, 0); GetMem(pUniCodeChar, Len * 2); ZeroMemory(pUniCodeChar, Len * 2); //Big5 -》 UniCode MultiByteToWideChar(950, 0, pBIG5Char, -1, pUniCodeChar, Len); Len := WideCharToMultiByte(936, 0, pUniCodeChar, -1, Nil, 0, Nil, Nil); GetMem(pGBCHTChar, Len * 2); GetMem(pGBCHSChar, Len * 2); ZeroMemory(pGBCHTChar, Len * 2); ZeroMemory(pGBCHSChar, Len * 2); //UniCode-》GB CHT WideCharToMultiByte(936, 0, pUniCodeChar, -1, pGBCHTChar, Len, Nil, Nil); //GB CHT -》 GB CHS LCMapString($804, LCMAP_SIMPLIFIED_CHINESE, pGBCHTChar, -1, pGBCHSChar, Len); result := String(pGBCHSChar); FreeMem(pGBCHTChar); FreeMem(pGBCHSChar); FreeMem(pUniCodeChar); End; Function GB2Big5(GBStr: String): AnsiString; {进行GB转BIG5内码} Var Len: integer; pGBCHTChar: PChar; pGBCHSChar: PChar; pUniCodeChar: PWideChar; pBIG5Char: PChar; Begin pGBCHSChar := PChar(GBStr); Len := MultiByteToWideChar(936, 0, pGBCHSChar, -1, Nil, 0); GetMem(pGBCHTChar, Len * 2 + 1); ZeroMemory(pGBCHTChar, Len * 2 + 1); //GB CHS -》 GB CHT LCMapString($804, LCMAP_TRADITIONAL_CHINESE, pGBCHSChar, -1, pGBCHTChar, Len * 2); GetMem(pUniCodeChar, Len * 2); ZeroMemory(pUniCodeChar, Len * 2); //GB CHT -》 UniCode MultiByteToWideChar(936, 0, pGBCHTChar, -1, pUniCodeChar, Len * 2); Len := WideCharToMultiByte(950, 0, pUniCodeChar, -1, Nil, 0, Nil, Nil); GetMem(pBIG5Char, Len); ZeroMemory(pBIG5Char, Len); //UniCode -》 Big5 WideCharToMultiByte(950, 0, pUniCodeChar, -1, pBIG5Char, Len, Nil, Nil); result := String(pBIG5Char); FreeMem(pBIG5Char); FreeMem(pGBCHTChar); FreeMem(pUniCodeChar); End; Function GBCht2Chs(GBStr: String): AnsiString; {进行GBK繁体转简体} Var Len: integer; pGBCHTChar: PChar; pGBCHSChar: PChar; Begin pGBCHTChar := PChar(GBStr); Len := MultiByteToWideChar(936, 0, pGBCHTChar, -1, Nil, 0); GetMem(pGBCHSChar, Len * 2 + 1); ZeroMemory(pGBCHSChar, Len * 2 + 1); //GB CHS -》 GB CHT LCMapString($804, LCMAP_SIMPLIFIED_CHINESE, pGBCHTChar, -1, pGBCHSChar, Len * 2); result := String(pGBCHSChar); //FreeMem(pGBCHTChar); FreeMem(pGBCHSChar); End; Function GBChs2Cht(GBStr: String): AnsiString; {进行GBK简体转繁体} Var Len: integer; pGBCHTChar: PChar; pGBCHSChar: PChar; Begin pGBCHSChar := PChar(GBStr); Len := MultiByteToWideChar(936, 0, pGBCHSChar, -1, Nil, 0); GetMem(pGBCHTChar, Len * 2 + 1); ZeroMemory(pGBCHTChar, Len * 2 + 1); //GB CHS -》 GB CHT LCMapString($804, LCMAP_TRADITIONAL_CHINESE, pGBCHSChar, -1, pGBCHTChar, Len * 2); result := String(pGBCHTChar); FreeMem(pGBCHTChar); //FreeMem(pGBCHSChar); End; End.Top
delphi 现有一程序,要转换成繁体,请问有什么好的方法吗
你的程序是否均以TXT格式保存﹖请将之用内码转换工具批量转换成GBN2312-》Unicode(将简体字转批成繁体字)即可(如东方快车的那个工个,或用2000自带的内码转换器也可﹐只是只能一个个地转换)。或在工程中﹐将每个窗体与包括中文字硬编码的PAS文件拷贝(对于窗体﹐请先Viewastext﹐将代码拷贝到剪贴板)﹐然后将之粘贴到2000的代码转换工具中﹐将之转换成Unicode(繁体)即可.(并不需要转换成BIG5码)﹐然后再贴回来。将以上处理过的工程另存﹐重新build一次即可(这是最简单﹑快速的方法﹐只是有它的局域性。。。。)
繁体os delphi中乱码简体怎么转换为繁体
function Cn2Big(CnStr: string): string; varLen: Integer; beginLen := Length(CnStr);SetLength(Result, Len);LCMapString(GetUserDefaultLCID, LCMAP_TRADITIONAL_CHINESE, PChar(CnStr), Len, PChar(Result), Len); end;function BIG2cn(bigStr: string): string; varLen: Integer; beginLen := Length(bigStr);SetLength(Result, Len);LCMapString(GetUserDefaultLCID, LCMAP_SIMPLIFIED_CHINESE, PChar(bigStr), Len, PChar(Result), Len); end;procedure TForm1.Button1Click(Sender: TObject); begin edit2.Text:=CN2BIG(EDIT1.Text); end;procedure TForm1.Button2Click(Sender: TObject); begin edit2.Text:=big2cn(EDIT1.Text); end;
delphi如何读取服务器上的数据库文件
db是dbase数据库文件,直接用记事本就可以打开,打开后可以看见里面的内容,但排列不规律,你必须得知道读取数据的方法才可以正确读取,(比如第一个字段要读取多少个字节,或者第一个字段需要从哪个位置开始读),如果使用程序读取的话,直接使用文件名.db就可以了.可以用DBASE数据库打开,也可以用DELPHI等第三方开发工具!
更多文章:
win7系统主题下载(怎么给win7系统换主题一套的那种 有没有软件可以下载)
2024年6月20日 15:05
cpu频率越高越好吗(cpu频率越高越好吗,高低频有什么区别)
2024年2月15日 20:40
office2007产品密钥永久激活(求Microsoft Office 2007 可用密钥(激活码))
2024年6月25日 22:48
鬼吹灯单机版(求有适合安卓手机的《正版鬼吹灯(网络*火热)》手机单机游戏)
2024年7月24日 11:38
cf单机版最新版本下载(穿越火线单机版内置修改器菜单下载方法)
2024年5月8日 03:04
可以赚钱的游戏手游(有什么单号搬砖的游戏呢,手游端游都可,多开伤不起)
2024年6月11日 02:58