ITextReader.ReadDouble

Syntax

ReadDouble: Double;

Description

The ReadDouble method reads real numbers from a text file.

Example

Sub UserProc;
Var
    File1: IFileInfo;
    TextR: ITextReader;
    d: Double;
Begin
    File1 := New FileInfo.Attach("c:\New_folder\1.txt");
    If File1.Exists Then
        TextR := File1.OpenTextReader;
        TextR.Encoding := CodePage.UTF8;
        d := TextR.ReadDouble;
    End If;
    Dispose File1;
End Sub UserProc;

After executing the example the "d" variable contains a real number read from the 1.txt file. UTF-8 encoding is used when working with file.