开多个窗口后怎么让每个窗口都在任务栏上有个显示（就像MSN和多个人同时聊天时任务栏显示多个窗口一样）

Question

开多个窗口后怎么让每个窗口都在任务栏上有个显示（就像MSN和多个人同时聊天时任务栏显示多个窗口一样）

Answer 1

若Form1调用Form2，则对Form2做如下处理：
...
  protected
    procedure CreateParams(var Params: TCreateParams); override;
...
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.WndParent := GetDeskTopWindow;
end;