SaveToFile后我是一条记录保存进去后打开文件他在最后面会自动换行，怎么取消他的自动换行

[a15963254]

SaveToFile后我是一条记录保存进去后打开文件他在最后面会自动换行，怎么取消他的自动换行 自动换行了那我读这个文件会得到我要的数据加一个（0D0A --> 换行）那么我的数据就会是错的 怎么去掉呢

[a15963254]

在线等啊 自己SF

[ADSLAN]

自己写 SAVETOFILE的函数

//----- 流写 保存到txt 文件可覆盖可追加 默认是追加 最好用
function SaveToTxt(const SaveFN, SaveData: string; Append: Boolean = True): Boolean;
var
  FS: TStreamWriter;
begin
  Result := False;
  if (SaveFN = '') or (SaveData = '') then
    Exit;
  FS := TStreamWriter.Create(SaveFN, Append, TEncoding.UTF8);  //参数2 True表追加  TEncoding.Default
  try
    FS.Write(SaveData);          //按行写入 FS.Write(SaveData); 没有换行符
    Result := True;
  finally
    FS.Close;
    FS.Free;
  end;
end;


D2010的用法
uses
  IOUtils;

//----- 字节流？保存到
function SaveToTxt(const SaveFN, SaveData: string): Boolean;
begin
  Result := False;
  if (SaveFN = '') or (SaveData = '') then
    Exit;
  try
    TFile.AppendAllText(SaveFN, SaveData, TEncoding.UTF8); //; {可指定编码格式}
    Result := True;
  except
  end;
end;

[一如当初]

用文件流的方式写

[OO_is_just_P]

其实都是用TStringList类读写的话这个回车换行是无所谓的。

[a15963254]

谢谢各位 我问题已经解决了