此过程多用于创建窗体时指定窗体的类型
如,你想建一个没有标题栏的窗口可如下

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
  protected
    procedure CreateParams(var Params: TCreateParams); override;{重载父类的方法}
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);{执行父类的方法}
  with Params do begin{}
    Style:= (Style OR WS_POPUP) AND (NOT WS_DLGFRAME);
  end;
end;end.了解一下C++程序创建窗体的过程,你就会对此方法有进一步了解