function AppendFile(const Path: AnsiString; const Shared: Boolean): Integer;
SCAR Divi 3.28 > Current
Opens a file specified by Path for writing access without overwriting the contents if a file was already present at the given filepath. If the path name is valid it will return the handle of the file stream to the file in the files resource manager, if not, it raises an exception. If Shared is true, the file can be accessed by other processes while it is in use by SCAR Divi, if it is false the script gets exclusive access until CloseFile is used to close the file stream. If you wish to read a file, you can use the OpenFile function.
var f: Integer; s: string; begin f := Rewritefile(LogsPath + 'Test.txt', False); WriteFileString(f, 'Hello World! '); CloseFile(f); f := Appendfile(LogsPath + 'Test.txt', False); WriteFileString(f, 'Hello Mars?'); CloseFile(f); f := OpenFile(LogsPath + 'Test.txt', False); ReadFileString(f, s, FileSize(f)); WriteLn(s); CloseFile(f); DeleteFile(LogsPath + 'Test.txt'); end.
Hello World! Hello Mars?