限制MDI子窗体的最大化后,没有自己的标题栏。

procedure TExplorer.WMMax(var Msg: TWMGetMinMaxInfo); message WM_GETMINMAXINFO;
begin
   //什么都不用写。
end;

procedure TExplorer_Frm.WmSize(var msg: TWMSIZE);
begin
  if msg.SizeType = SIZE_MAXIMIZED then
    msg.SizeType := SIZENORMAL;
  inherited;
end;
阅读更多
想对作者说点什么?

博主推荐

换一批

没有更多推荐了,返回首页