Что нового

Удалить первую строчку из блокнота

Налим

Новичок
Сообщения
2
Репутация
0
Добрый день всем !!
Подскажите новичку пожалуйста, как удалить первую строчку текста из блокнота и сдвинуть весь текст наверх так, что бы вторая строчка встала на место удаленной первой. А потом закрыть этот блокнот с сохранением изменений.

Cпасибо огромное!))
 

ZaRaki

Знающий
Сообщения
48
Репутация
19
Ня.
Код:
#include <array.au3>

$filename = 'ssss.txt'
$hFile = FileOpen(@ScriptDir & '\' & $filename, 0)
local $array[0]

While 1
    $sLine = FileReadLine($hFile)
    If @error = -1 Then ExitLoop
    _ArrayAdd($array, $sLine)
WEnd

FileClose($hFile)
$hFile = FileOpen(@ScriptDir & '\' & $filename, 2)

For $aa = 1 to ubound($array)-1
   FileWriteLine($hFile, $array[$aa])
Next

FileClose($hFile)
 
Автор
Н

Налим

Новичок
Сообщения
2
Репутация
0
Да! Работает!
Могешь!!)))
Спасибо большое
 

eam

Новичок
Сообщения
8
Репутация
1
еще можно так:
Код:
#Include <Array.au3>
$sFile = "sss.txt"
$aAr = StringSplit(StringStripCR(FileRead($sFile)), @LF)
$hFile = FileOpen ( $sFile, 2 )
FileWrite($hFile, _ArrayToString($aAr, @CRLF, 2))
FileClose($hFile)

Сообщение автоматически объединено:

 
Верх