Серый форум — AHK: Отправка сообщений в чат

Re: AHK: Отправка сообщений в чат

null@example.com (svoboden) — Sat, 05 Feb 2022 20:32:14 +0000

Попробую сам разобраться.

Re: AHK: Отправка сообщений в чат

null@example.com (svoboden) — Sat, 05 Feb 2022 20:03:46 +0000

Не переменную, а строку, непонятен синтаксис:

VarSetCapacity(UTF-8, size := StrPut(ConsoleCommand, "UTF-8") * 2, 0)

Re: AHK: Отправка сообщений в чат

null@example.com (teadrinker) — Sat, 05 Feb 2022 19:50:30 +0000

Я не понял вопроса. Какую переменную имеете в виду?

Re: AHK: Отправка сообщений в чат

null@example.com (svoboden) — Sat, 05 Feb 2022 19:48:52 +0000

Хорошо, спасибо. А не подскажите, зачем в:

VarSetCapacity(UTF-8, size := StrPut(ConsoleCommand, "UTF-8") * 2, 0)

нужно отправлять строку?

Re: AHK: Отправка сообщений в чат

null@example.com (teadrinker) — Sat, 05 Feb 2022 18:41:24 +0000

Посылать нужно в той кодировке, которую ожидает принимающая функция.

svoboden пишет:

Т.е. нужно так писать?

Если отправляете из Юникод-версии, и хотите отправить в кодировке UTF-16, то так. Если вресия ANSI, тогда нужно преобразовать строку в Юникод.

Re: AHK: Отправка сообщений в чат

null@example.com (svoboden) — Sat, 05 Feb 2022 15:53:11 +0000

Насколько я понял, вместо 520 должна быть длина строки в байтах, а не в символов, но как узнать длину строки в байтах. Т.е. нужно так писать?

size := StrPut(ConsoleCommand, "UTF-16")*2

NumPut(size, COPYDATASTRUCT, A_PtrSize, "Uint")
NumPut(&ConsoleCommand, COPYDATASTRUCT, A_PtrSize*2)

Но у меня UTF-16 не посылает русский текст, только UTF-8 посылает.

Re: AHK: Отправка сообщений в чат

null@example.com (teadrinker) — Sat, 05 Feb 2022 15:43:00 +0000

Да там, кроме ошибок, ничего и нету. И вообще мало что понятно. Что там за 520, откуда оно взялось? Почему не 666? Судя по строке

VarSetCapacity(COPYDATASTRUCT, A_PtrSize * 3, 0)

предполагается учитывать размер указателя, но в следующих строках он не учитывается.

Re: AHK: Отправка сообщений в чат

null@example.com (svoboden) — Sat, 05 Feb 2022 13:52:14 +0000

Хорошо, спасибо. Т.е. кроме названия переменных, ошибок больше нету?

Re: AHK: Отправка сообщений в чат

null@example.com (teadrinker) — Sat, 05 Feb 2022 09:21:56 +0000

Это именно переменная.

Re: AHK: Отправка сообщений в чат

null@example.com (svoboden) — Sat, 05 Feb 2022 08:37:20 +0000

Это указатель вроде , переменную я бы так не называл. А так да, согласен. Чтобы не запутаться в коде написал.

Re: AHK: Отправка сообщений в чат

null@example.com (teadrinker) — Sat, 05 Feb 2022 08:22:28 +0000

svoboden пишет:

правильно ли составлен скрипт?

Прежде всего, не стоило бы называть переменную UTF-8. Это надо же было додуматься!

AHK: Отправка сообщений в чат

null@example.com (svoboden) — Sat, 05 Feb 2022 08:11:21 +0000

Написал скрипт для отправки в чат сообщений для игры. Если кто разбирается, то есть несколько вопросов:

ConsoleCommand := "say привет"

F1::
VarSetCapacity(UTF-8, size := StrPut(ConsoleCommand, "UTF-8") * 2, 0)
StrPut(ConsoleCommand, &UTF-8, "UTF-8")

VarSetCapacity(COPYDATASTRUCT, A_PtrSize * 3, 0)

;NumPut(0, COPYDATASTRUCT, 0, "Uint")
NumPut(520, COPYDATASTRUCT, 4, "Uint")
NumPut(&UTF-8, COPYDATASTRUCT, 8, "UPtr")

SendMessage, 0x004A,, ©DATASTRUCT,, ahk_exe csgo.exe
return

1) Почему первое поле структуры CopyDataStruct нужно указывать в 0? По идее должно быть 1, т.к. передается текст.
2) Зачем в VarSetCapacity заносить StrPut? Только потому, что так точнее отображается длинна строки?.
3) Как посчитать, сколько байт содержит строка в анси или юникод кодировке, т.к. ее размер в байтах нужно передать.

Ну и вообще, правильно ли составлен скрипт? Т.к. нужно правильно передать русский текст? Спасибо.

Исправленный вариант:

DetectHiddenWindows, On
Setbatchlines -1

ConsoleCommand := "say привет"

F1::
WinGet, hWnd, ID, ahk_class Valve001
VarSetCapacity(message, SizeInBytes := StrPut(ConsoleCommand, "UTF-8") * (A_IsUnicode ? 2 : 1), 0)
StrPut(ConsoleCommand, &message, "UTF-8")

VarSetCapacity(COPYDATASTRUCT, A_PtrSize*3, 0)

;NumPut(0, COPYDATASTRUCT, 0, "Uint")
NumPut(SizeInBytes, COPYDATASTRUCT, A_PtrSize, "UInt")
NumPut(&message, COPYDATASTRUCT, A_PtrSize*2, "Ptr")
   
DllCall("SendMessage", "Ptr", hWnd, UInt, WM_COPYDATA := 0x4A, "Ptr", 0, "Ptr", ©DATASTRUCT)
return