DelphiFAQ Home Search:

Borderless MDI Form

 

commentsThis article has not been rated yet. After reading, feel free to leave comments and rate it.

To create an MDI Form without a border, you need to override the CreateParams() method and modify the style and exStyle bytes there.

type
  TForm1 = class(TForm)
    // ..
    procedure CreateParams(var Params: TCreateParams);
      override;
  end;

implementation

{$R *.DFM}

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  with Params do 
  begin
    Style := Style and WS_BORDER;
    exStyle := exStyle and WS_DLGFRAME;
  end;
end;
You don't like the formatting? Check out SourceCoder then!

Comments:

2007-08-24, 14:03:35
anonymous from United States  
might be nice to the the Visual Basic equivalent.

 

 

NEW: Optional: Register   Login
Email address (not necessary):

Rate as
Hide my email when showing my comment.
Please notify me once a day about new comments on this topic.
Please provide a valid email address if you select this option, or post under a registered account.
 

Show city and country
Show country only
Hide my location
You can mark text as 'quoted' by putting [quote] .. [/quote] around it.
Please type in the code:

Please do not post inappropriate pictures. Inappropriate pictures include pictures of minors and nudity.
The owner of this web site reserves the right to delete such material.

photo Add a picture: