要求:程序在任务栏自动运行,当有错误发生时,自动显示并且置顶,用下面的语句
问题:当窗体hide的时候,能够完成要求,可是当程序窗体已经显示,但是在ie的后面,就是被别的程序挡住,则不能显示到最前面,不知怎么解决,请教高手!ShowWindow(self.Handle, SW_SHOW);
SetForegroundWindow(self.Handle);
Show;
问题:当窗体hide的时候,能够完成要求,可是当程序窗体已经显示,但是在ie的后面,就是被别的程序挡住,则不能显示到最前面,不知怎么解决,请教高手!ShowWindow(self.Handle, SW_SHOW);
SetForegroundWindow(self.Handle);
Show;
但是用另一个程序来设置的话就可以,
你试试:
procedure TForm1.Button1Click(Sender: TObject);
var h:HWND;
begin
h:=FindWindow(0,'Form1aaa');
SetForegroundWindow(h);
end;