如何在文本文件里添加字符串？

Question

并可以换行。
我需要长为300的字符串，应用什么类型，请教。

Answer 1

用String，换行用#13#10就可以了。————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 2

那往文本文件里添加字串用什么函数？
string好像最多只能255个字符。

Answer 3

给你个例子吧
procedure TFDun.WriteErrorMsg(Msg:string);
var
    ErrorLog:           TextFile;
    sErrorLogName:      string;
    sWriteLogTime:      string;
begin
    sWriteLogTime:=FormatDateTime('YYYYMMDD',Now());
    if Msg='' then exit;
       sErrorLogName:='Log\'+sLogFileName+'_'+sWriteLogTime+'.log';
    try
        AssignFile(ErrorLog, sErrorLogName);
        if FileExists(sErrorLogName) then
            Append(ErrorLog)
        else
            Rewrite(ErrorLog);
        writeln(ErrorLog, FormatDatetime('YYYY-MM-DD HH:NN:SS  ',now())
                        +chr(VK_TAB)+Msg);
        Flush(ErrorLog);
        CloseFile(ErrorLog);
    except
    end;
end;

Answer 4

用TStringList.SaveToFile和TStringList.LoadFromFile就可以了————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————