为什么我通过TStringList.LoadFromFile加载文件内容到StringList中后就变成乱码了呢?

gouxiaoyu 2010-03-05 05:06:31
我写好了一个.sql文件,可以通过这个sql脚本创建数据库、创建表等。。
CREATE DATABASE [EasyERP] ON PRIMARY
( NAME = N'EasyERP_Data', FILENAME = N'固定的路径\EasyERP.mdf' , SIZE = 524288KB , MAXSIZE = UNLIMITED, FILEGROWTH = 80KB )
--下面还有很多语句

现在因为要支持 可由用户改变数据库存放的物理位置 ,所以我写了如下代码 用执行程序的人员选择的路径替换我原来的固定路径:

ts := TStringList.Create;
ts.LoadFromFile('C:\Documents and Settings\Administrator\桌面\test.txt'); //加载文件内容到ts中
ts.Text := StringReplace(ts.Text, '固定的路径','执行程序的人员选择的路径',[rfReplaceAll]); //替换文件内容
ts.SaveToFile('C:\Documents and Settings\Administrator\桌面\test.txt');//保存到原文件中.
ts.Free;

但是在执行完ts.LoadFromFile之后,我发现ts.Text的值只有一小行乱码


求高手帮忙,谢谢!

...全文
573 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
gouxiaoyu 2010-03-05
  • 打赏
  • 举报
回复
引用 2 楼 bdmh 的回复:
要编码转换,现在txt文本有好几种格式


编码转换? 不是很懂 怎么转?
gouxiaoyu 2010-03-05
  • 打赏
  • 举报
回复
用.sql文件来读取也是乱码 .........
gouxiaoyu 2010-03-05
  • 打赏
  • 举报
回复
手敲的文本 保存到.txt文件,再来读取也是乱码。 跟UNICODE没有关系吧?
bdmh 2010-03-05
  • 打赏
  • 举报
回复
要编码转换,现在txt文本有好几种格式
Harryfin 2010-03-05
  • 打赏
  • 举报
回复
文本内容是UNICODE的?

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧