Серый форум — AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T11:15:35Z

serzh82saratov пишет:

в справке смотрел, но не там
1 Документация по программе AutoHotkey
2 Ctrl+F в браузере
3 пишем FileRead в строку поиска
???

Всегда так делаю, у меня даже страница справки в закладках, просто по невнимательности пытался найти ответ на свой вопрос в FileReadLine.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:54:32Z

в справке смотрел, но не там

1 Документация по программе AutoHotkey
2 Ctrl+F в браузере
3 пишем FileRead в строку поиска

???

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:50:08Z

serzh82saratov пишет:

Русская справка не катит?
Все эти заморочки для полной универсальности, так как файлы могут быть с тремя вариантами перевода строк - `r`n, `n, `r. Если вариант заранее известен, то это надо указывать в задаче.
Поэтому я сказал Malcev что StringReplace не совсем то, а также поправил свой вариант.

Спасибо, я что-то в справке смотрел, но не там.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:37:01Z

Русская справка не катит?

Все эти заморочки для полной универсальности, так как файлы могут быть с тремя вариантами перевода строк - `r`n, `n, `r. Если вариант заранее известен, то это надо указывать в задаче.
Поэтому я сказал Malcev что StringReplace не совсем то, а также поправил свой вариант.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:28:48Z

serzh82saratov пишет:

Не то чтобы лучше для конкретной задачи, но если потом надо будет вернуть пред-пред-пред-пред последнюю строку, то с Loop, read будет не очень удобно это делать.
Поправка в мой вариант с StrSplit:
b := 2 ; 0 последняя, 1 предпоследняя, и.т.д. 
FileRead, Text, *t %A_ScriptFullPath% 
MsgBox % (a := StrSplit(Text, ["`n","`r"]))[a.maxindex()-b]

Можно вопрос? Что означает "*t" в этой строке:

FileRead, Text, *t %A_ScriptFullPath%

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:12:37Z

Не то чтобы лучше для конкретной задачи, но если потом надо будет вернуть пред-пред-пред-пред последнюю строку, то с Loop, read будет не очень удобно это делать.

Поправка в мой вариант с StrSplit:


b := 2 ; 0 последняя, 1 предпоследняя, и.т.д. 
FileRead, Text, *t %A_ScriptFullPath% 
MsgBox % (a := StrSplit(Text, ["`n","`r"]))[a.maxindex()-b]

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:09:57Z

serzh82saratov пишет:

Desire
Ну и причём тут Loop, read?

Да я уже въехал, что ваш вариант лучше.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:08:39Z

Desire
Ну и причём тут Loop, read?

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:05:10Z

serzh82saratov, просто необходимо считывать Log-файл, а он постоянно обновляет и содержит разное кол-во строк.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T10:04:02Z

Так в чём необходимость Loop, read? С FileRead варианты выглядят как то проще:


b := 2 ; 0 последняя, 1 предпоследняя, и.т.д.
FileRead, Text, % A_ScriptFullPath 
RegExReplace(Text, "m`a)$", "", RowCount)
FileReadLine, Line, % A_ScriptFullPath, % RowCount - b
MsgBox % Line

или

b := 2 ; 0 последняя, 1 предпоследняя, и.т.д.
FileRead, Text, % A_ScriptFullPath 
MsgBox % (a := StrSplit(Text, "`n", "`r"))[a.maxindex()-b]

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T09:59:44Z

Помог этот код

YMP пишет:


Loop, read, C:\Text.txt
{
    predpred_line := pred_line
    pred_line := last_line
    last_line := A_LoopReadLine
}

Только "predpred_line" почему-то всегда оказывалась пустой, а вот "pred_line" выдает нужный результат.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T09:52:28Z

Malcev
Хороший вариант.

Хотя лучше RegExReplace:

FileRead, Text, %A_ScriptFullPath% 
RegExReplace(Text, "m`a)$", "", RowCount)
MsgBox % RowCount

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T09:49:36Z

Можно узнать общее количество строк с помощью StringReplace и UseErrorLevel.
И потом прочитать нужную строку с помощью FileReadLine.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T09:49:00Z

Если без Loop подойдёт, то:


Text=
(
Строка1

Строка2

Строка3

Нужная строка


)
b := 2 ; 0 последняя, 1 предпоследняя, и.т.д.

MsgBox % (a := StrSplit(Text, "`n", "`r"))[a.maxindex()-b]

Конечно тут подразумевается FileRead.

Re: AHK: Loop (Read). Как вернуть пред-пред последнюю строку?

2014-08-11T09:42:20Z

Так, наверно.


Loop, read, C:\Text.txt
{
    predpred_line := pred_line
    pred_line := last_line
    last_line := A_LoopReadLine
}