读书人

*请教怎么使进程中的窗体前置,多谢!

发布时间: 2012-02-10 21:27:41 作者: rapoo

***请问如何使进程中的窗体前置,谢谢!*******
请问如何根据程序的窗体名称,使这个程序的窗体在所有打开程序的前面
,该程序已被打开,可能被后运行的其它的程序窗口给挡住了,谢谢!*******

[解决办法]
var
hdw:HWND;
begin
hdw:=FindWindow(nil, '标题 ') ;
SetWindowPos(hdw,hwnd(-1), 0, 0, 0, 0, 3);
[解决办法]
PreviousInstanceWindow:=FindWindow(NIL, '标题 '); //查找类名或标题
if PreviousInstanceWindow <> 0 then
begin
if IsIconic(PreviousInstanceWindow) then //如果该窗口最小化则恢复
ShowWindow(PreviousInstanceWindow,SW_RESTORE)
else //如果程序在后台则将其放到前台
begin
SetForegroundWindow(PreviousInstanceWindow);
end;

读书人网 >.NET

热点推荐