override CreateParams events in delphi

      使delphi新建的窗体，像msn聊天窗口一样，在任务管理器里显示，并且它的最大化最小化显示不受主窗体的影响。

    procedure CreateParams(var Params: TCreateParams); override;

procedure TFormDebug.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle   := Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := GetDesktopWindow;
end;