Question

Delphi 让子窗体显示在任务栏上的几种方法

Answer 1

这几种方法都需要重载 CreateParams 方法。
声明部分
protected
procedure CreateParams(var Params: TCreateParams); override;
1、
//inherited;
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW; //这个好用。
2、
inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;//获取桌面句柄
3、
inherited;
Params.WndParent := 0;

Answer 2

程序最小化到任务栏，有两种情形：
一、将窗口最小化，代码如下：
procedure?TForm1.Button1Click(Sender:?TObject);
begin
??Application.Minimize;
end;
二、将窗口最小化，程序图标显示在任务栏的右下角(系统托盘)：
使用 TTrayIcon 控件即可。