Example: Var In FileAssign (In,'C:\NOTES\READ.ME') FileOpen (In) While not EndOfFile (In) Writeln (FileReadLn (In)) EndWhile FileClose (In)
FileAssign (In,'C:\NOTES\READ.ME') FileOpen (In) While not EndOfFile (In) Writeln (FileReadLn (In)) EndWhile FileClose (In)