AppendFile

procedure AppendFile(

  const FileName: string;

  const Buf;

  const BufSize: Integer;

  const FileSharing: TFileSharing = fsDenyWrite;

  const FileCreationMode: TFileCreationMode = fcOpenAlways;

  const FileOpenWait: PFileOpenWait = Nil

);