怎样在程序中控制切换到某个应用程序窗口 怎样在程序中控制切换到某个应用程序窗口注:我用SendMessage(h, WM_SETFOCUS,0, 0)或者SendMessage(h, WM_ACTIVATE,0, 0)都没用.h为一窗口的句柄 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);var HWndCalc: HWnd;beginHWndCalc:= FindWindow(nil, '托盘控件');if HWndCalc <> 0 thenbegin SendMessage(HWndCalc,WM_SYSCOMMAND,SC_RESTORE,0);end;end; 问题解决了,setforegroundwindow(vHandle)用这个就可以切换了,SendMessage和ShowWindow实现最大化,最小化,还原这类的操作。 经典问题!!!急 关于cxGrid的问题. 关于IDE 送分,关于断点的问题 Delphi8何时推出? 关于帮助文件制作:HTML Help Workshop编译成CHM后,图片的显示问题? 高分提问,解决结帖,急 DecisionCube用法 UP有分 声音问题!! 为什么出错? TXMLDocument SetAttributeNS,属性值为中文,生成的XML文件,属性值是乱码,为什么? 非常基础的问题:如何一次性给数组赋值???
var
HWndCalc: HWnd;
begin
HWndCalc:= FindWindow(nil, '托盘控件');
if HWndCalc <> 0 then
begin
SendMessage(HWndCalc,WM_SYSCOMMAND,SC_RESTORE,0);
end;
end;
setforegroundwindow(vHandle)
用这个就可以切换了,
SendMessage和ShowWindow实现最大化,最小化,还原这类的操作。