Q&A

  • MDIChild폼의 타이틀바 없애기
MDIChild 폼의 Caption 내용이 나오는 곳이 타이틀바가 맞는지 잘 몰겠지만.

암튼 그 영역을 화면에 안보이게 하구 싶거든여?

첨엔 BorderIcons를 아무것도 안주고 BorderStyle 을 bsNone으로 놓으면 쉽게 해결될줄

알았는데..(fsNormal 폼에서는 이렇게 하면 잘 됩니다)

그래도 타이틀바가 나오네요...

해결방법 부탁드립니다..
2  COMMENTS
  • Profile
    최석기 2003.05.27 01:56

    Child Form에 CreateParam을 Override 시켜 Style를 변경 시켜주면 됩니다.

    unit Unit2;

    interface

    uses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

    type
      TForm2 = class(TForm)
      private
        { Private declarations }
      public
        { Public declarations }
        procedure CreateParams(VAR Params: TCreateParams); override;
      end;

    var
      Form2: TForm2;

    implementation

    {$R *.DFM}

    { TForm2 }

    procedure TForm2.CreateParams(var Params: TCreateParams);
    begin
      Inherited Createparams(Params);
      WITH Params DO
        Style := (Style OR WS_CHILD OR WS_BORDER) AND NOT WS_DLGFRAME;
    end;

    end.
  • Profile
    김종화 2003.05.27 02:15