WriteBoolean(Value: Boolean);
Value — logical value that should be written.
The WriteBoolean method writes a logical value into a binary file.
Executing this example requires a binary file 1.dat to be present in a root of the disc C.
Sub Main;
Var
File1: IFileInfo;
BinW: IBinaryWriter;
Begin
File1:=New FileInfo.Attach("c:\1.dat");
If File1.Exists Then
BinW:=File1.OpenBinaryWriter(True);
BinW.WriteBoolean(True);
End If;
Dispose File1;
End Sub Main;
After executing this example, logical value True is written into a binary file 1.dat.
See also: