$hFile = FileOpen(@ScriptDir & '\FileReadLine.au3', 0)

; Проверяет, является ли файл открытым, перед тем как использовать функции чтения/записи в файл
If $hFile = -1 Then
	MsgBox(4096, "Ошибка", "Невозможно открыть файл.")
	Exit
EndIf

; Читает построчно текст, пока не будет достигнут конец файла EOF
While 1
	$sLine = FileReadLine($hFile)
	If @error = -1 Then ExitLoop
	If MsgBox(1, "Прочитанная строка:", $sLine) = 2 Then ExitLoop
WEnd

FileClose($hFile)

MsgBox(0, "Содержимое 4-ой строки", FileReadLine(@ScriptDir & '\FileReadLine.au3', 4))