2

我整理了一堆在线资源，这些资源让我来到了这里。希望我所拥有的很接近。不幸的是，我没有 Windows 编程经验。我来自 Linux 背景。我也是Lua外星人的新手，但我对 Lua 足够了解。

我想要做的是sendMessage()从Win32 API运行Notepad.exe窗口发送一个简单的“Hello World”。

我使用以下命令从命令提示符获取进程 ID：

tasklist /FI "IMAGENAME eq notepad.exe" /FI "USERNAME eq user"

记事本PID

我收到了从这里发送 0x000C 代码的消息。

到目前为止，这就是我所拥有的：

require "luarocks.require"
require "alien"

myTestMessage = 0x000C -- Notepad "Set text" id
notepadPID = 2316      -- Notepad Process ID

-- Prototype the SendMessage function from User32.dll
local SendMessage= alien.User32.SendMessageA
SendMessage:types{ret ='long', abi = 'stdcall','long','long','string','string'}

-- Prototype the FindWindowExA function from User32.dll
local FindWindowEx = alien.User32.FindWindowExA
FindWindowEx:types{ret = 'long', abi = 'stdcall', 'long', 'long', 'string', 'string'}

-- Prototype the GetWindowThreadProcessID function from User32.dll
local GetWindowThreadProcessId = alien.User32.GetWindowThreadProcessId
GetWindowThreadProcessId:types{ret = 'long', abi = 'stdcall', 'long', 'pointer'}

local buffer = alien.buffer(4) -- This creates a 4-byte buffer

local threadID = GetWindowThreadProcessId(notepadPID, buffer) -- this fills threadID and our 4-byte buffer

local longFromBuffer = buffer:get(1, 'long') -- this tells that I want x bytes forming a 'long' value and starting at the first byte of the
                             -- 'buffer' to be in 'longFromBuffer' variable and let its type be 'long'

local handle = FindWindowEx(threadID, "0", "Edit", nil); -- Get the handle to send the message to

local x = SendMessage(handle, myTestMessage, "0", "Hello World!") -- Actually send the message

很多代码是从Lua 外来文档、msdn和一些谷歌搜索（即这个结果）拼凑而成的。

有没有人可以成为英雄并向我解释我做错了什么，以及我应该如何去做。而且，最重要的是，为什么！

4

2 回答 2

2

我最终找到了一种更简单的方法来使用Windows API 中的FindWindow和FindWindowEX。这样您就可以找到记事本的父进程和子进程的正确句柄。

-- Require luarocks and alien which are necessray for calling Windows functions
require "luarocks.require"
require "alien"

local SendMessage= alien.User32.SendMessageA
SendMessage:types{ret ='long', abi = 'stdcall','long','long','string','string'}

local FindWindowEx = alien.User32.FindWindowExA
FindWindowEx:types{ret = 'long', abi = 'stdcall', 'long', 'long', 'string', 'string'}

local FindWindow = alien.User32.FindWindowA
FindWindow:types{ret = 'long', abi = 'stdcall', 'string', 'string'}

local notepadHandle = FindWindow("Notepad", NULL )

local childHandle = FindWindowEx(notepadHandle, "0", "Edit", nil)

local x = SendMessage(childHandle, "0x000C", "0", "Hello World!") -- Actually send the message
于 2014-03-05T14:56:15.613 回答
1

您在滥用 GetWindowThreadProcessId() 和 FindWindowEx()。它们的第一个参数是所需窗口的 HWND 句柄，但是您将进程 ID 传递给 GetWindowThreadProcessId() 并将线程 ID 传递给 FindWindowEx()，这两个都是错误的。

没有直接的方法可以从进程 ID 中获取 HWND。您将不得不使用 EnumWindows() 循环遍历当前正在运行的窗口，在每个窗口上调用 GetWindowThreadProcessId() ，直到找到与您已有的进程 ID 匹配的进程 ID。

于 2013-06-04T14:51:16.800 回答