AppendBinary: IBinaryWriter;
The AppendBinary method opens a file for writing in a binary format and sets a cursor to the end of a file.
Sub Main;
Var
File1: IFileInfo;
BynW: IBinaryWriter;
Begin
File1:=New FileInfo.Attach("c:\Work\1.txt");
If File1.Exists Then
BynW:=File1.AppendBinary;
BynW.WriteDateTime(DateTime.Now);
End If;
Dispose File1;
End Sub Main;
After executing this example, current date and time converted to a binary format are written into the end of the file 1.txt.
See also: