showwindow('小算盤',sw_show)
如果小算盤最小化后,可以通過showwindow('小算盤',sw_restore)進行顯示出來,而如果在打開小算盤后再打開word后(word為當前窗體),再執行showwindow('小算盤',sw_restore)便不會使小算盤顯示出來(變為當前窗口),請問如何將其顯示出來?
以下為網友給的回復在声明里加上这些东西
Procedure RestoreRequest(var message: TMessage); message CM_RESTORE;
CM_RESTORE在前面有定義WM_SER+1000
实现部分:
procedure TFrmMain.RestoreRequest(var message: TMessage);
begin
if IsIconic(Application.Handle) = TRUE then
Application.Restore
else
Application.BringToFront;end;
...
tmpHandle := FindWindow('小算盤',NIL) ;
PostMessage(tmpHandle, CM_RESTORE, 0, 0);
...
好像還不行呀
如果小算盤最小化后,可以通過showwindow('小算盤',sw_restore)進行顯示出來,而如果在打開小算盤后再打開word后(word為當前窗體),再執行showwindow('小算盤',sw_restore)便不會使小算盤顯示出來(變為當前窗口),請問如何將其顯示出來?
以下為網友給的回復在声明里加上这些东西
Procedure RestoreRequest(var message: TMessage); message CM_RESTORE;
CM_RESTORE在前面有定義WM_SER+1000
实现部分:
procedure TFrmMain.RestoreRequest(var message: TMessage);
begin
if IsIconic(Application.Handle) = TRUE then
Application.Restore
else
Application.BringToFront;end;
...
tmpHandle := FindWindow('小算盤',NIL) ;
PostMessage(tmpHandle, CM_RESTORE, 0, 0);
...
好像還不行呀
解决方案 »
- delphi中ToolButton图标问题
- 有一首MP3的文件,已保存到数据库中,如何将它播放出来,而不用 savetofile 的方式?
- 怎么实现歌曲的循环播放
- 急求sql语句。分高,简单的,但要快。马上结贴。谢谢了。救火的
- 求助:怎么知道 ini 文件里有多少个 小节?谢谢!
- adoquery.fieldByName('ip').asString,找不到'ip'这个字段
- 请问Folder定义在Delphi的哪个unit?
- 从vb到delphi发现delphi的书写格式远不如vb灵活方便。
- 怎么获得Tdbedit中的内容
- adoqry 不能识别 GO 命令
- 自己做过私活的朋友进来看一下!!!!!!!!!!!!!!!!!!1111
- 我怎樣直接把表中的數據原封不動的存入文本
小弟先謝了