[Данные, строки] Запись части текстового файла в переменную

;~ AutoIt Version: 3.3.8.1

Global $hFile, $iCount, $iExit

HotKeySet('{Esc}', '_Exit')
$hFile = FileOpen(@ScriptDir & '\Log.txt', 2)

Do
	Sleep(Random(2000, 5000, 1))
	$iCount += 1
	FileWrite($hFile, 'String number ' & $iCount & @CRLF)
Until $iExit

FileClose($hFile)
Exit

Func _Exit()
	$iExit = 1
EndFunc

;~ AutoIt Version: 3.3.8.1

Global $sFile = @ScriptDir & '\Log.txt', $hFile, $iSizeOld, $iSizeNew, $sTxt

$hFile = FileOpen($sFile)
If $hFile = -1 Then Exit 1
While ProcessExists('Write.exe'); поменяйте на нужный процесс
	Sleep(500)
	$iSizeNew = FileGetSize($sFile)
	If $iSizeOld <> $iSizeNew Then
		FileSetPos($hFile, $iSizeOld, 0);$FILE_BEGIN
		$sTxt = StringStripWS(FileRead($hFile), 3)
		ConsoleWrite($sTxt & @LF)
		ConsoleWrite('-----------------------' & @LF)
		$iSizeOld = $iSizeNew
	EndIf
WEnd
FileClose($hFile)
Exit