程序最小化时收到请求,如何把自己最大化并提到前边。
解决方案 »
- 郁闷了,这个问题请高手帮忙了!!
- 找人帮忙
- 在QUERY里,如何直接对数据进行操作
- 我在编程的时间遇到一个问题想请大家帮忙解决一下!比较急!!谢谢各位了!!
- 如何建立DLL的创建和销毁时的事件函数?
- 听说Delphi中的visibroker是开发版,如果作为商品软件必须购买license,是真的吗?
- 如何将屏幕上鼠标的移动用视频捕获?
- 不重提问?关于progressbar?
- 我不知道修改了什么的属性了,现在凡是添加到form中的任何控制的color都是红的,应该怎么改?
- 使用资源文件的好处是什么?用记事本怎样编辑一个资源文件?
- ★ 你是否经常使用资源 ?? ●关注有分 + ●给你个软件
- 散分:开发程序直接从Delphi4 升级到 Delphi7 好不好?
自己看看吧,什么Restore,Maximize,BringToFront,等等。
frmMain.SetFocus;
PostMessage(frmMain.Handle,WM_SYSCOMMAND,SC_MAXIMIZE,0);
Application.BringToFront;我做了这样的操作,还是不行!
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;