程序最小化时收到请求，如何把自己最大化并提到前边。
程序最小化时收到请求，如何把自己最大化并提到前边。 问题点数：50、回复次数：6Top
1 楼cnsuyong（小可）回复于 2002-11-29 17:28:45 得分 5
Application.xxxx
自己看看吧，什么Restore，Maximize，BringToFront，等等。Top
2 楼netwei（菩提根）回复于 2002-11-29 17:43:34 得分 0
PostMessage(Application.Handle,WM_SYSCOMMAND,SC_MAXIMIZE,0);
frmMain.SetFocus;
PostMessage(frmMain.Handle,WM_SYSCOMMAND,SC_MAXIMIZE,0);
Application.BringToFront;
我做了这样的操作，还是不行！Top
3 楼hnxrm（浪子）回复于 2002-11-29 17:51:15 得分 5
sendmessage(application.handle,WM_restore)Top
4 楼hnxrm（浪子）回复于 2002-11-29 17:51:35 得分 5
sendmessage(application.handle,SW_restore)Top
5 楼hnxrm（浪子）回复于 2002-11-29 17:52:54 得分 5
SHOWWINDOW(APPLICATION.Handle,SW_RESTORE);Top
6 楼movingboy（movingboy）回复于 2002-12-01 15:20:14 得分 30
function ForceForegroundWindow(HWND: THandle): BOOL;
var
hCurWnd: THandle;
begin
hCurWnd := GetForeGroundWindow;
AttachThreadInput(
GetWindowThreadProcessID(hCurWnd, nil),
GetCurrentThreadID,
True);
Result := SetForegroundWindow(HWND);
AttachThreadInput(
GetWindowThreadProcessID(hCurWnd, nil),
GetCurrentThreadID,
False);
end;
procedure BringSelfToFront;
begin
if IsIconic(Application.handle) then
Application.Restore
else
ForceForegroundWindow(Application.handle);
end;
Top
相关问题
关键词
得分解答快速导航
相关链接
广告也精彩
反馈
