delphi怎么发送回车键到另外一个程式的Edit窗口上? 请高手门指教! 谢谢啦 !

Answer 1

var
FormHandle, EditHandle: Integer;
Buf: Array [0..255] of Char;
begin
FormHandle := FindWindow(nil, 'Form1'); //假设另一个程序的窗口标题是Form1
if FormHandle <> 0 then
begin
EditHandle := Findwindowex(FormHandle, 0, 'TEdit', 'Edit1'); //假设另一个程序的Edit是Edit1
if EditHandle <> 0 then
PostMessage(EditHandle, WM_KEYDOWN, VK_RETURN, 0);
end;
end;

Answer 2

在另一个程序中加参数启动，在Edit窗口上接收参数

Answer 3

用SetFocus不是就可以了吗