WriteDouble(Value: Double);
Value — real number that must be written.
The WriteDouble method writes a real number into a binary file.
Executing the example requires the 1.dat binary file to be present in the root of the disc C.
Sub UserProc;
Var
File1: IFileInfo;
BinW: IBinaryWriter;
Begin
File1:=New FileInfo.Attach("c:\1.dat");
If File1.Exists Then
BinW:=File1.OpenBinaryWriter(True);
BinW.WriteDouble(3.14);
End If;
Dispose File1;
End Sub UserProc;
After executing the example the number 3.14 is written into the 1.dat binary file.
See also: