摘要: 网络摘抄//刚封装的ini文件类。保存为unicode的。解决delphi xe的TiniFile保存后不为unicode的问题//今天发现delphi xe的TiniFile类保存后的文件不是以unicode存储的,//所以就自己写了个和他功能类似的类,可能比原版的TIniFile少了一些方法。//其他的方法属性等我的工程都没用到,所以就没写其他的函数。函数只有如下,正常情况下够用了//考虑到时间问题就就用了tstringlist类了。所以效率不怎么样。很一般。//很垃圾的代码,不嫌弃的人拿去用吧!//function ReadString(const cSection, cIdent, c 阅读全文
posted @ 2012-08-30 13:27 马儿快跑 阅读(2203) 评论(1) 推荐(0) 编辑
摘要: 使用Delphi2010中的TStrings或Memo的SaveToFile方法保存UTF8/Unicode编码的字符串时,保存后丢失编码信息,仔细查看,原来在保存时增加了编码设置:aStrings.SaveToFile(aFileName,TEncoding.Unicode);//可以是TEncoding.UTF8,根据需要另:unicode文本文件:头两个字符分别是FF FE(16进制) utf-8文本文件:头两个字符分别是EF BB(16进制) 阅读全文
posted @ 2012-08-30 13:27 马儿快跑 阅读(3474) 评论(0) 推荐(0) 编辑
摘要: 下面是一个通用过程,根据INI文件中的资源改变界面语言(仅Caption和Hint属性)参数一:为一Component,一般为TForm,此过程将循环列举其子Component并查找是否具有相关属性,有的话则从INI文件读取信息并设置属性参数二:为INI文件全名//引用TypInfo,IniFiles/TntInifiles单元//声明的资源,默认的,防止变量出现空值resourcestringS_Menu = 'Menu';S_AppName = 'Window View Tool';S_Null = '(Null)';S_About = &# 阅读全文
posted @ 2012-08-30 11:52 马儿快跑 阅读(1235) 评论(0) 推荐(0) 编辑
摘要: 在写ini时,我们时常需要将一个ini文件写成Unicode的,此时的做法是在文件头前面写一个Unicode的标志量即可。在下面代码中就可以写入一个Unicode的文件 FILE *fp; fp = _tfopen(_T("e:\\sss.ini"), _T("r")); if (fp == NULL) { fp=_tfopen(_T("e:\\sss.ini"), _T("w+b")); wchar_t m_strUnicode[1]; m_strUnicode[0] = wchar_t(0XFEFF); fpu 阅读全文
posted @ 2012-08-30 11:40 马儿快跑 阅读(2673) 评论(0) 推荐(0) 编辑
摘要: 越来越多的程序使用了多国语言切换,虽然DELPHI自带多语言包的添加和配置,但是那种方法在切换语言时界面会出现闪烁,而且实现起来很麻烦,这里我介绍给大家的是利用INI文件来读取界面的语种文字,用这种方法,不但简单易行,而且在切换的时候不会出现界面的闪烁。我们从一个例子出发,看看怎么实现语言的切换。首先建立一个新工程。放置如下组件:MainMenu1: TMainMenu;File1: TMenuItem;Exit1: TMenuItem;Label1: TLabel;Button1: TButton;CheckBox1: TCheckBox;CheckBox2: TCheckBox;Butto 阅读全文
posted @ 2012-08-30 10:21 马儿快跑 阅读(888) 评论(0) 推荐(0) 编辑