考试首页 | 考试用书 | 培训课程 | 模拟考场 | 考试论坛  
  当前位置:编程开发 > DotNET > Delphi.Net > 文章内容
  

Delphi基础教程:delphi里如何限制Form的大小

 [ 2017年9月5日 ] 【

  使用过DELPHI的朋友都会注意到DELPHI本身最上面的窗口,当它极大时只占屏幕的一小部分,它是如何实现的呢,请看

  下面的说明:

  1)在FORM私有声明部分加上如下一行:

  procedure WMGetMinMaxInfo( var Message:TWMGetMinMaxInfo ); message WM_GETMINMAXINFO;

  2)在声明部分加上如下几行:

  procedure TForm1.WMGetMinMaxInfo( var Message :TWMGetMinMaxInfo );

  begin

  with Message.MinMaxInfo^ do

  begin

  ptMaxSize.X := 200; {最大化时宽度}

  ptMaxSize.Y := 200; {最大化时高度}

  ptMaxPosition.X := 99; {最大化时左上角横坐标}

  ptMaxPosition.Y := 99; {最大化时左上角纵坐标}

  end;

  Message.Result := 0; {告诉Windows你改变了 minmaxinfo}

  inherited;

  end;

本文纠错】【告诉好友】【打印此文】【返回顶部
将考试网添加到收藏夹 | 每次上网自动访问考试网 | 复制本页地址,传给QQ/MSN上的好友 | 申请链接 | 意见留言 TOP
关于本站  网站声明  广告服务  联系方式  站内导航  考试论坛
Copyright © 2007-2013 中华考试网(Examw.com) All Rights Reserved