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;

    本文转自 OldHawk  博客园博客，原文链接：http://www.cnblogs.com/taobataoma/archive/2007/04/30/733323.html，如需转载请自行联系原作者