Autoit Txt Ye Yazılan Son Satırı Okutma Sorunu

[Amilo]

başlıktada belirttiğim gibi arkadaşlar bir bir txt ye yazılan en son satırı yada satırları okutma istiyorum ve yardımlarınızı bekliyorum

[DivaneTR]

En son satır ;

#include <FileConstants.au3>
$Open = FileOpen(@ScriptDir & "\deneme.txt", $FO_READ)
$Read = FileReadToArray($Open)
$SonSatir = FileReadLine($Open, UBound($Read))

[Amilo]

@DivaneTR 

 

öncelikle cevabın için çok  teşekkür ederim ancak yanlıs anlamazsanız bir maruzatım daha var

 

örnek vermek gerekirse ;

 

#include <FileConstants.au3>

$Open = FileOpen("deneme.txt", $FO_READ)

$Read = FileReadToArray($Open)

$SonSatir = FileReadLine($Open, UBound($Read))

 

while 1

MsgBox(64,"",$SonSatir)

Sleep(5000)

WEnd

 

 

 

 

 

böyle bir döngü olması gerekiyor. ancak hep aynı son mesaj karşıma cıkıyor . acaba şu şekil yapabilirmiyiz. Mesela program en son mesajı okudu onun altına yenisi gelene kadar okuma yapmayacak 

 

bu arada tekrar teşekkür ederim cevap yazdığın için

[DivaneTR]

AdlibRegister(_Oku, 5000) ;5 saniyede bir tekrarlar

Func _Oku()
	$Open = FileOpen(@ScriptDir & "\deneme.txt", 0)
	$Read = FileReadToArray($Open)
	$SonSatir = FileReadLine($Open, UBound($Read))
	MsgBox(64,"",$SonSatir)
EndFunc   ;==>_Oku

While 1
WEnd

[asmazh]

Local $fileFullPath = @DesktopDir & "\abc.txt", $fileLastEndLine

While True
$fileTotalLine = StringSplit(FileRead($fileFullPath), @CR)[0]
$fileEndLine = FileReadLine($fileFullPath, $fileTotalLine)
If $fileEndLine <> $fileLastEndLine Then _
ConsoleWrite(StringFormat("EndLine.Updated: " & $fileEndLine & "\n"))
$fileLastEndLine = $fileEndLine
Sleep(500) ; // Optional.
WEnd

İstediğin şey tam olarak bu.