delphi窗体控制
一、窗体最大化
第一步:进入主界面后,先获取主界面的高度。
第二步:将需要将窗体最大化的窗体,在show事件中写:
windowstate:=wsmaximized;//最大化
self.Align:=alClient;
self.Height::=mainfrm.Height;
self.position:=poDesigned;
self..borderstyle:=bssingle;
如此能保证最大化的窗体不变形。
二、不允许窗体出现最大化按钮。
有时,我们希望窗体只保持初始设计时的大小,那么去掉最大化按钮就很有必要了。如下图:
如果被用户按到,则会显示如下:
变形走样,非常难看。
我们只需要做如下操作:
将BorderStyle窗体类别改为“bsDialog”即可,更改后的窗体如下图: