现在是2002年10月10日,19:20。我第一次意识到自己可以在CSDN的文档中心发表文章。

    本文是我在CSDN文档中心的第一篇文档,记录一下最近用到的几个小技巧。这些技巧放在我的硬盘上,经常会被无意的删除。

1、创建无标题栏但可以Resize的窗体

声明部分

TForm1 = class(TForm)
……
protected
   procedure CreateParams(var Param: TCreateParams);override;
……
end;

实现部分

procedure TForm1.CreateParams(var Param: TCreateParams);
begin
  inherited;
  Param.Style := WS_THICKFRAME or WS_POPUP;
end;

(近期会继续完善本文。)