如何给不是激活窗口发送字符用Sendmessage 解决可以加分

2003-04-15 10:06:49 402 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

C#中使用 SendMessage 向非顶端窗体发送组合键开门见山,不废话了, 直接举例说明一下:比如发送ALT + F以下是用spy++截取的消息内容 000310DC P WM_SYSKEYDOWN nVirtKey:VK_MENU cRepeat:1 ScanCode:38 fExtended:0 fAltDown:1 fRepeat:0 fUp:0 000310DC P WM_SYSKEYDOWN nVirtKey:F cRe 阅读详情

我想给其他的程序发送键盘鼠标消息完成自动输入但是不想让被控制的程序为当前活动窗体

...全文

【控件功能】我来做练习-PostMessage和SendMessage有什么区别? PostMessage和SendMessage有什么区别? 阅读详情

xflcx

Windows SDK/API 1,184 成员 22,326 内容

+ 关注 + 加入社区

切换为时间正序

coolkenmester 2003-04-21

打赏
举报

hwnd := FindWindow(类名,标题);
SendMessage(hwnd,WM_KeyDown,0,0);

xflcx 2003-04-21

打赏
举报

可能是我没有说清楚被控制的窗体是未知的不是特定的不是自己篇写的
要让他响应键盘事件但是不能把他激活为当前窗体它的窗体句柄是可以得到的

wjlsmail 2003-04-19

打赏
举报

只要去的目标窗体句柄就可以

H := FindWindow(PChar('ClassName'),PChar('Text')) ;

SendMessage(h,WM_KeyDown,0,VK_F1) ; // 目标窗体要处理 KeyDown 事件

atuchina 2003-04-19

打赏
举报

发送一些数据，不是字符如下，要多少数据（字符）就可以多少
（我也是刚做完一个发送东东的PRG）
以下在工程文件中
var
s : pchar;
buf:tagCOPYDATASTRUCT;
hnd:HWND;
begin
Application.Initialize;
application.Title := 'test';
try
hnd := CreateMutex(nil, True, 'UnifaceTools');
if GetLastError = ERROR_ALREADY_EXISTS then
begin
GetMem(s,100);
buf.lpData :=s;
buf.cbData:=100;
buf.dwData :=100;
strpcopy(s, ParamStr(1));
SendMessage(findwindow(nil,'Uniface Porgram Tools'), $004A, 0, integer(@buf));
freemem(s);
end
else
begin
Application.Title := 'UnifaceTools';
Application.CreateForm(TMainForm, MainForm);
Application.Run;
end;
finally
if hnd <> 0 then ReleaseMutex(hnd);
end;

接收部分：
procedure SetMyWindow(var msg : TMessage); message WM_COPYDATA;

。。。。。
procedure TMainForm.SetMyWindow(var msg: TMessage);
var
P:^tagCOPYDATASTRUCT;
FileName :String;
begin
p:=Pointer(Msg.lParam);
//ShowMessage(strpas(p.lpData));
FileName := strpas(p.lpData);
end;

WorldCreater 2003-04-18

打赏
举报

“我想给其他的程序发送键盘鼠标消息完成自动输入但是不想让被控制的程序为当前活动窗体”
这些都不难。只要你找到你要发送消息的目标窗体的句柄就成

naughtyboy 2003-04-18

打赏
举报

SendMessage(h,wm_char,ord('a'),0);
PostMessage(h,wm_char,ord('a'),0);

向句柄为h的窗口发送字符'a'

wyhhc 2003-04-18

打赏
举报

Hd是你要控制的控件句柄
ParentHd是你要控制的窗体句柄
Handle是你当前的句柄

wyhhc 2003-04-18

打赏
举报

我的程序：
Var
ParentHd,Hd:LongInt;
begin
Hd:=LongInt(StrToInt(TListView(PopupMenu1.PopupComponent).Selected.Caption));
ParentHd:=LongInt(StrToInt(ListView2.Hint));
SetForegroundWindow(ParentHd);
PostMessage(Hd,WM_LBUTTONDOWN,0,0);
PostMessage(Hd,WM_LBUTTONUP,0,0);
SetForegroundWindow(Handle);
end;

shadowfish 2003-04-15

打赏
举报

GZ

帮你up……

Spectrum 2003-04-15

打赏
举报

没有用过，帮不了你

xflcx 2003-04-15

打赏
举报

来人阿

如何给不是激活窗口发送字符 用Sendmessage 解决可以加分

相关推荐

如何给不是激活窗口发送字符用Sendmessage 解决可以加分