隐藏窗体的标题栏

Question

隐藏窗体的标题栏，周围原有的蓝色边框仍然存在
找了很多不能满足要求
各位大侠拜托了

Answer 1

handle:=findwindow('窗体标题',nil);
setwindowtext(handle,'');

Answer 2

重载CreateParams:
  procedure CreateParams(var Params: TCreateParams); override;
在里面去掉 Params.Style and (not WS_CAPTION).或者：
  SetWindowLong(Self.Handle, GWL_STYLE, GetWindowLong(Self.Handle, GWL_STYLE) and (not WS_CAPTION));
改变一下大小看。

Answer 3

1楼的是在Form的CREATE事件里写吗，

Answer 4

说错了，在里面去掉标题栏，也就是加上这个： Params.Style and (not WS_CAPTION). 

Answer 5

CREATE里面 setwindowtext(self.Handle,'');也可以
self.Caption:='';