Серый форум — AHK:Чтение txt и открытие файла из строки.

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Wed, 13 Feb 2013 13:39:53 +0000

И если за секунду\цикл появилось несколько совпадений, нужно обработать каждое, или первое появившееся (как в примере выше), а остальные игнорировать?

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Wed, 13 Feb 2013 12:59:22 +0000

Uniors пишет:

Столкнулся с похожей проблемой, необходимо каждую секунду проверять текстовый документ на наличие цифр (1,3,7,9) , если не найдено то запомнить текущую строку для последующего поиска со следующей строки (искать только в новом тексте) если найдено, то gosub, xxx(1,3,7,9) ......................


SelectedFile = %A_ScriptDir%\Лог.txt
loop 
{
    Sleep 1000
    IfNotExist, %SelectedFile%
    {
        MsgBox, Лог файл не найден.
        Continue
    }
    FileRead, File, %SelectedFile%
    Pos := RegExMatch(File, "1|3|7|9", match, Len) , Len := StrLen(File)+1
    if !Pos
        Continue
    gosub, xxx_%match%
}

xxx_1:
    MsgBox xxx_1
    return
xxx_3:
    MsgBox xxx_3
    return
xxx_7:
    MsgBox xxx_7
    return
xxx_9:
    MsgBox xxx_9
    return

Uniors пишет:

...................... После активации метки "ххх1" в лог будет записано "1", при следующей проверке скрипт должен пропустить эту строку

Не понятно в какой лог и как записывать?

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (Uniors) — Thu, 06 Dec 2012 03:22:44 +0000

Столкнулся с похожей проблемой, необходимо каждую секунду проверять текстовый документ на наличие цифр (1,3,7,9) , если не найдено то запомнить текущую строку для последующего поиска со следующей строки (искать только в новом тексте) если найдено, то gosub, xxx(1,3,7,9)

FileSelectFile, SelectedFile, 3, log,Открыть файл, Текстовые файлы (*.txt)
if SelectedFile =
    MsgBox, Лог файл не найден.
else
Loop, Read, %SelectedFile%
{
    IfInString, A_LoopReadLine, 1
    {
gosub, xxx1
        Break
    }
}
return

xxx1:
SendInput, 1
return

После активации метки "ххх1" в лог будет записано "1", при следующей проверке скрипт должен пропустить эту строку

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Tue, 04 Dec 2012 21:51:18 +0000

Читать и правда оч. сложно такое.
Поправил посты.
Прошу прощения.

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (alexii) — Tue, 04 Dec 2012 11:06:49 +0000

creature.ws пишет:

Граждане, а зачем вы полностью цитируете предыдущее сообщение?

Всецело поддерживаю замечание.

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Tue, 04 Dec 2012 11:06:16 +0000

Спасибо creature.ws за код, очень пригодится!

Оно бы может и без этого свершилось, но только через *опу

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (Maxfashko) — Tue, 04 Dec 2012 11:00:28 +0000

ТОВАРИЩИ! СВЕРШИЛОСЬ

Не знаю как Вас благодарить, всех, кто мне помог!)

Спасибо!

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Tue, 04 Dec 2012 10:54:51 +0000

DropFiles( "D:\work\Script VAR\готовые\" FileName ".psd", "Вариограф" )

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (Maxfashko) — Tue, 04 Dec 2012 10:53:20 +0000

вот тут маленькая поправочка не получиться всегда обращаться к классу. Он всегда меняется, когда программа открывается в другом окне
DropFiles( "D:\work\Script VAR\готовые\" FileName ".psd", "ahk_class Afx:00410000:8:00010003:00000000:048809A5" )

сейчас вот он стал Вариограф
ahk_class Afx:00410000:8:00010003:00000000:0E8D0AA3

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Tue, 04 Dec 2012 10:49:08 +0000

creature.ws
А что можно лишнего убрать?

DropFiles(ByRef fileList, windowTitle := "", ctrl := "", x := 0, y := 0, NCA := 0)
на
DropFiles(ByRef fileList, windowTitle )

и это удалять или оно может понадобится?
NumPut(x, pDP + 4, "UInt")
NumPut(y, pDP + 8, "UInt")
NumPut(NCA, pDP + 12, "UInt")

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Tue, 04 Dec 2012 10:44:25 +0000

creature.ws

Граждане, а зачем вы полностью цитируете предыдущее сообщение?

Да кто нас знает, места много

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (Maxfashko) — Tue, 04 Dec 2012 10:44:22 +0000

Направьте мозг в нужный поток=)
Как это использовать в моём случае?

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (creature.ws) — Tue, 04 Dec 2012 10:39:35 +0000

Видимо в неправильно сформированной структуре dropFiles.
Процедура, приведенная выше, срисована кажется из кода teadrinker'а.

Граждане, а зачем вы полностью цитируете предыдущее сообщение?

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (serzh82saratov) — Tue, 04 Dec 2012 10:35:03 +0000

creature.ws
КРУТО!!!
А в чём трабла была, если не трудно...

Re: AHK:Чтение txt и открытие файла из строки.

null@example.com (Maxfashko) — Tue, 04 Dec 2012 10:32:26 +0000

creature.ws пишет:

serzh82saratov пишет:

Я не нашёл решение http://www.autohotkey.com/board/topic/4 … lications/

DropFiles(ByRef fileList, windowTitle := "", ctrl := "", x := 0, y := 0, NCA := 0)
{
    offset := 20
    VarSetCapacity(dropFiles, StrLen(fileList) + offset, 0)
    pDP := &dropFiles

    loop, parse, fileList, `n, `r
        StrPut(A_LoopField, pDP + offset, StrLen(A_LoopField), "CP0")
        , offset += StrLen(A_LoopField) + 4
        , NumPut(0, pDP + offset - 4, "UInt")

    NumPut(0, pDP + offset, "UInt")
    NumPut(20, pDP + 0, "UInt")
    NumPut(x, pDP + 4, "UInt")
    NumPut(y, pDP + 8, "UInt")
    NumPut(NCA, pDP + 12, "UInt")
    NumPut(0, pDP + 16, "UInt")

    nSize := offset + 4
    hDrop := DllCall("GlobalAlloc", "UInt", 0x42, "UInt", nSize, "Ptr")
    pData := DllCall("GlobalLock", "Ptr", hDrop, "Ptr")
    DllCall("RtlMoveMemory", "Ptr", pData, "Ptr", pDP, "UInt", nSize)
    DllCall("GlobalUnlock", "Ptr", hDrop)

    PostMessage, 0x233, hDrop, 0, %ctrl%, %windowTitle%
}

Это как на китайском=)