请问？？？？？？？？如何将子窗体的标题栏隐藏掉。

Question

我用的是Mid，不知如何将子窗体的标题栏藏起来。将BorderStyle设置为bsNone也不行。
请大家帮帮忙

Answer 1

拿刀切了它。
------------------------------------
CSDN新版论坛助手:http://community.csdn.net/Expert/TopicView.asp?id=3108679

Answer 2

Procedure CreateParams(var Params :TCreateParams);override;  //覆盖CreateParams方法procedure TNaviGateForm.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.Style := Params.Style or (not WS_CAPTION);
end;

Answer 3

注：在Public部分覆盖。
错了，应该是:
procedure TNaviGateForm.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.Style := Params.Style and (not WS_CAPTION);
end;

Answer 4

星星球的方法可以，但如果是Form创建后设置其他属性，
如：Form.WindowState:=wsMaximized; //隐藏CAPTION就不起作用了

Answer 5

自定义一个子窗体TChildMidStInfo继承TForm类，重载它的CreateParams方法，在CreateParams方法中隐藏它的标题栏，重载后的CreateParams方法如下：
procedure TChildMidStInfo.CreateParams(var Params: TCreateParams);
begin
  Inherited CreateParams(Params);
  Params.Style:=Params.Style and (not WS_CAPTION);
end;