L lcb139 Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-10 #1 当form窗体在别的应用程序后面的时候,当form接到一个消息,我要把窗体显示在桌面的最前面该为何做? 只问如果把窗体显示到最前面来。
那 那年黄梅花开 Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-10 #2 api setwindowpos; for example : procedure TForm1.Button1Click(Sender: TObject); var hHandle: hwnd; begin hHandle:= FindWindow(nil,'我的电脑'); if hHandle<>0 then SetWindowPos(hHandle,HWND_TOPMOST,0,0,0,0,SWP_NOSIZE); end;
api setwindowpos; for example : procedure TForm1.Button1Click(Sender: TObject); var hHandle: hwnd; begin hHandle:= FindWindow(nil,'我的电脑'); if hHandle<>0 then SetWindowPos(hHandle,HWND_TOPMOST,0,0,0,0,SWP_NOSIZE); end;
A ANiDelphi Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-11 #3 Application.BringToFront; SetForegroundWindow(Handle); //Application.handle //Self.Handle;