如何使我的程序模块在最小化时在任务栏有图标,就象Excel,每个文件都有。(50分)

  • 主题发起人 主题发起人 8Oxen
  • 开始时间 开始时间
8

8Oxen

Unregistered / Unconfirmed
GUEST, unregistred user!
如何使我的程序模块在最小化时在任务栏有图标,就象Excel,每个文件都有。
 
在每一个表单中加入下列东东就行了.
procedure CreateParams(var Params: TCreateParams);Override;

procedure TFrmShow.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := 0;
end;
 
这段也一样,和zhangkan的基本一样。原理完全相同。
在第二个Form上加上一下代码
procedure CreateParams(var Params: TCreateParams)
override;

procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
end;
 
你把每个模块都写成dll就可一实现
当然你不能按<<delphi5开发人员指南>> 的
把主程序的handle赋给dll来做就可一
象Excel他可能是做成了com
 
但是如果将动态库Dll的任务栏隐藏就要费一番周折的,当初我就费了不少事,将Handle来回赋,最后稀里糊涂的搞定了。呵呵[:D]
 
对不起,我可能说错了,不是在任务栏,也不用这么复杂的,我是说象一般的程序都最小化
到下面的工具栏,我是要每个子窗体都在工具栏中占一部分。
 
是不是说象Foxmail一样,当接收邮件的时候,它占用两个任务栏的位置。
不是任务栏右侧时钟的位置。
我们的那些就是实现这个功能的。
 
createparams是什么
 
多人接受答案了。
 
TO 80xen:
呵呵,我看你说的都是同一个意思,照zhangkan的做法试试,看看是不是你要的效果?:)
原理就是在窗体创建时指定窗体的Parent为桌面(桌面的句柄为0),窗体就会出现在任务栏上了。

TO youngdragon:
呵呵,自己翻译一下,就是创建参数呀
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部