ReadChar: Char;
The ReadChar method reads characters from a text file.
Sub UserProc;
Var
File1: IFileInfo;
TextR: ITextReader;
c: Char;
Begin
File1 := New FileInfo.Attach("c:\New_folder\1.txt");
If File1.Exists Then
TextR := File1.OpenTextReader;
TextR.Encoding := CodePage.UTF8;
c := TextR.ReadChar;
End If;
Dispose File1;
End Sub UserProc;
After executing the example, the "b" variable contains a logical value read from the 1.txt text file. UTF-8 encoding is used when working with file.
See also: