L
linmu
Unregistered / Unconfirmed
GUEST, unregistred user!
<font color=red>请高手指教：怎样像网络蚂蚁的浮动窗口一样，按任务条的显示桌面，程序不会消失(最小化)。</font>(200分)<br />请高手指教：怎样像网络蚂蚁的浮动窗口一样，按任务条的显示桌面，程序不会消失(最小化)。</
您正在使用一款已经过时的浏览器！部分功能不能正常使用。
请尝试升级或使用 其他浏览器。
请尝试升级或使用 其他浏览器。
L
linmu
Unregistered / Unconfirmed
GUEST, unregistred user!
就是浮动窗口不会不见了。我试了，我的浮动窗口，一按显示桌面（或按Window键+D），就消失了。
Y
ypy
Unregistered / Unconfirmed
GUEST, unregistred user!
过滤消息。。。。。。。
L
linmu
Unregistered / Unconfirmed
GUEST, unregistred user!
那个网友发一个源程序到<a href="mailto:linmucn@163.net">linmucn@163.net</a>200分送上。
或贴在论坛也行。
或贴在论坛也行。
C
CathyEagle
Unregistered / Unconfirmed
GUEST, unregistred user!
把浮动窗口的parentwnd设成桌面句柄不行吗？
L
linmu
Unregistered / Unconfirmed
GUEST, unregistred user!
详细一点
L
linmu
Unregistered / Unconfirmed
GUEST, unregistred user!
200分无人要吗？
W
www
Unregistered / Unconfirmed
GUEST, unregistred user!
把浮动窗口置成总在最上面就可以了。
到http://www.wapsec.com.cn/delphi下载这个看看.
http://www.wapsec.com.cn/delphi/viewdownload.asp?type=chengxu&id=1
到http://www.wapsec.com.cn/delphi下载这个看看.
http://www.wapsec.com.cn/delphi/viewdownload.asp?type=chengxu&id=1
I
iamfly
Unregistered / Unconfirmed
GUEST, unregistred user!
好像用waitmessage()还是getmessage()API函数可以截获系统消息，如果是最小化的消息
就过滤掉它，这样应该可以的
就过滤掉它，这样应该可以的
L
linmu
Unregistered / Unconfirmed
GUEST, unregistred user!
to www:
把浮动窗口置成总在最上面就可以了????????????????
按任务条的显示桌面就是最小化了。
把浮动窗口置成总在最上面就可以了????????????????
按任务条的显示桌面就是最小化了。
W
www
Unregistered / Unconfirmed
GUEST, unregistred user!
我做的 没有问题呀.
J
JSP
Unregistered / Unconfirmed
GUEST, unregistred user!
to www
你那个我也看过了，不行。按任务条的显示桌面（或按Window键+D），就最小化了。
建议过滤消息.....
你那个我也看过了，不行。按任务条的显示桌面（或按Window键+D），就最小化了。
建议过滤消息.....
C
CathyEagle
Unregistered / Unconfirmed
GUEST, unregistred user!
呵呵……拿分来。
form2是浮动窗口，在Form1Acivate的时候把它show出来就可以了，
最小化的时候只有form1会消失。
...
public
{ Public declarations }
procedure CreateParams(var Params: TCreateParams);override;
end;
var
Form2: TForm2;
implementation
{$R *.DFM}
{ TForm2 }
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
end;
form2是浮动窗口，在Form1Acivate的时候把它show出来就可以了，
最小化的时候只有form1会消失。
...
public
{ Public declarations }
procedure CreateParams(var Params: TCreateParams);override;
end;
var
Form2: TForm2;
implementation
{$R *.DFM}
{ TForm2 }
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
end;
J
JSP
Unregistered / Unconfirmed
GUEST, unregistred user!
To CathyEagle:
他说的不是这个意思，你桌面任务条有一个显示桌面的图标。按一下，
全部程序就最小化，再按一下就还原。现在就是要解决这个问题。而不是那个
问题。就是要屏蔽这个最小化的消息。
他说的不是这个意思，你桌面任务条有一个显示桌面的图标。按一下，
全部程序就最小化，再按一下就还原。现在就是要解决这个问题。而不是那个
问题。就是要屏蔽这个最小化的消息。
L
linmu
Unregistered / Unconfirmed
GUEST, unregistred user!
多人接受答案了。
C
CathyEagle
Unregistered / Unconfirmed
GUEST, unregistred user!
to JSP：
看来他的意思我理解对了。
看来他的意思我理解对了。
Z
zdy0155
Unregistered / Unconfirmed
GUEST, unregistred user!
params.WndParent :=GetDeskTopWindow ;