用delphi写文本文件时的一个问题(50分)

  • 主题发起人 主题发起人 fifa99
  • 开始时间 开始时间
F

fifa99

Unregistered / Unconfirmed
GUEST, unregistred user!
用delphi写文本文件时的一个问题
var
auto:tstringlist;
begin
try
auto:=tstringlist.Create;
auto.LoadFromFile('auto.txt');
auto.Append('测试回车'+#10#13+'成功');
auto.SaveToFile('auto.txt');
finally
auto.Free ;
end;
end;
但是在"测试回车"与"成功"之间有一个黑色的小方块。不知道怎么回事。
 
tstringlist型的最好写成两个append
 
回车换行应该是#13#10不是#10#13(黑色的小方块)。
 
将#10#13写成#13#10:(加分吧)
var
auto:tstringlist;
begin
try
auto:=tstringlist.Create;
auto.LoadFromFile('c:/1.txt');
auto.Append('测试回车'+#13#10+'成功');
auto.SaveToFile('c:/1.txt');
finally
auto.Free ;
end;
end;
 
同意楼上二位的看法。
 
同意。不过我一直这样写
F: TextFile;
assignfile(F, ...);
append(F);
writeln(F, ...);
closeFile(F);

这才是pascal
 
iie的是对的
 
是这样
auto.Append('测试回车成功');
append是增加一行啊,同志哥,不用再加回车符了
 
感谢楼上几位大哥,帮我解决了一个大问题。
 
是呀

auto.Append('测试回车'+#10#13+'成功');应写成
auto.Append('测试回车'+#13#10+'成功')

auto.Append('测试回车');
auto.Append('成功');
 
不用加#13#10
 
谢谢你们,可惜分数太少。
 
后退
顶部