AtEndOfLine Property

 

Description

 

Returns VARIANT_TRUE if the file pointer is positioned immediately before the end-of-line marker in a TextStream file; VARIANT_FALSE if it is not. Read-only.

 

PowerBASIC Syntax

 

PROPERTY GET AtEndOfLine () AS INTEGER

 

Remarks

 

The AtEndOfLine property applies only to TextStream files that are open for reading; otherwise, an error occurs.

 

Example [PowerBASIC]

 

#INCLUDE "windows.inc"

#INCLUDE "scrrun.inc"

 

DIM fso AS IFileSystem

DIM pStm AS ITextStream

 

' Create an instance of the FileSystemObject

fso = NEWCOM "Scripting.FileSystemObject"

' Open the file for reading

pStm = fso.OpenTextFile(UCODE$("C:\MyFolder\Test.txt"), %IOMode_ForReading, %FALSE, %FALSE)

' Read the entire stream into a string

MSGBOX STR$(pStm.AtEndOfLine)

' Close the file

pstm.Close

 

Valid XHTML 1.0 Transitional