16,748
社区成员
发帖
与我相关
我的任务
分享文件导入
有一个'1.txt'文件我用记事本读出并复制到Memo1中是582字节,可是用Memo1.Lines.LoadFromFile('1.txt');打开却得不到这么多内容了?这是怎么回事,怎样才能把'1.txt'内的582字节导入在一个String中?
急!
急!
...全文
请发表友善的回复…
发表回复
lszxyxl 2006-10-12
- 打赏
- 举报
谢谢,问题已解决!
还是在CSDN上找答案快,我自己在网上搜索了很久都没解决,QQ十来个QQ群也没有用!
还是在CSDN上找答案快,我自己在网上搜索了很久都没解决,QQ十来个QQ群也没有用!
spirit_sheng 2006-10-12
- 打赏
- 举报
记事本和Memo都会对非正常的字符进行处理, 如回车变为回车换行
其都不能正确反映文件的字节数
可以在资源管理器中查看文件属性可以知道文件的确切这节数, 如果要将文件的内容读入String, 以下代码最准确
var
s: String;
f: TFileStream;
begin
f := TFileStream.Create('C:\1.txt', fmOpenRead);
try
SetLength(s, f.Size);
f.ReadBuffer(s[1], f.Size);
finally
f.free;
end;
end;
其都不能正确反映文件的字节数
可以在资源管理器中查看文件属性可以知道文件的确切这节数, 如果要将文件的内容读入String, 以下代码最准确
var
s: String;
f: TFileStream;
begin
f := TFileStream.Create('C:\1.txt', fmOpenRead);
try
SetLength(s, f.Size);
f.ReadBuffer(s[1], f.Size);
finally
f.free;
end;
end;
lszxyxl 2006-10-11
- 打赏
- 举报
以上是通过记事本读出的内容!
以上是通过记事本读出的内容!
