Серый форум — AHK: Функция чтения памяти перестала работать

Re: AHK: Функция чтения памяти перестала работать

null@example.com (YMP) — Mon, 29 Dec 2014 03:42:11 +0000

Возможно, там версия AutoHotkey устаревшая.

Re: AHK: Функция чтения памяти перестала работать

null@example.com (teadrinker) — Sun, 28 Dec 2014 20:05:42 +0000

Зато у вас именно эта ошибка. Прошу ознакомиться.

Re: AHK: Функция чтения памяти перестала работать

null@example.com (Dworkin) — Sun, 28 Dec 2014 20:01:17 +0000

teadrinker пишет:

Dworkin пишет:
Хотя на другом ноуте все работает
Error: Missing point

Не понял о чем вы.
Вот именно что при запуске скрипта сразу выдается именно та ошибка которую я написал. Именно comma, а не point.

Re: AHK: Функция чтения памяти перестала работать

null@example.com (teadrinker) — Sun, 28 Dec 2014 19:38:54 +0000

Dworkin пишет:

Хотя на другом ноуте все работает

Error: Missing point

AHK: Функция чтения памяти перестала работать

null@example.com (Dworkin) — Sun, 28 Dec 2014 19:32:26 +0000

Здравствуйте.
Данная функция для чтения из памяти работала на другом ноутбуке(где стояла x32 windows XP):

ProcessReadMemory(address, processIDorName, type := "Int", numBytes := 4) {
    VarSetCapacity(buf, numBytes, 0)
    VarSetCapacity(numBytesRead, A_PtrSize, 0)

    Process Exist, %processIDorName%
    if !processID := ErrorLevel
        throw Exception("Invalid process name or process ID:`n`n""" . processIDorName . """")

    if !processHandle := DllCall("OpenProcess", "Int", 24, "UInt", 0, "UInt", processID, "Ptr")
        throw Exception("Failed to open process.`n`nError code:`t" . A_LastError)

    result := DllCall("ReadProcessMemory", "Ptr", processHandle, "Ptr", address, "Ptr", &buf, "Ptr", numBytes, "PtrP", numBytesRead, "UInt")

    if !DllCall("CloseHandle", "Ptr", processHandle, "UInt") && !result
        throw Exception("Failed to close process handle.`n`nError code:`t" . A_LastError)

    if !result
        throw Exception("Failed to read process memory.`n`nError code:`t" . A_LastError)

    if !numBytesRead
        throw Exception("Read 0 bytes from the`n`nprocess:`t" . processIDorName . "`naddress:`t" . address)

    return NumGet(buf, 0, type)
}

Я перенес скрипт на другой ноутбук на котором стоит windows 7 x64 и теперь при запуске скрипта выскакивает такое:

Line text: ProcessReadMemory(address, processIDorName, type := "Int", numBytes := 4)
Error: Missing comma

Хотя на другом ноуте все работает