form 的宽度 最小只能120 有什么方式,可让它更小一点吗(50分)

  • 主题发起人 主题发起人 goddy
  • 开始时间 开始时间
G

goddy

Unregistered / Unconfirmed
GUEST, unregistred user!
form 的宽度 最小只能120 有什么方式,可让它更小一点吗
 
那么小有什么意义,直接visible=false得了。
 
设计时修改<br> &nbsp;BorderIcons<br> &nbsp;BorderStyle<br>属性<br>在窗体的 OnCreate 事件里修改 Width 属性
 
BorderStyle:=bsNone; <br>或<br>BorderStyle:=bsSingle;
 
都不行,好像真的不能再小了
 
BorderStyle 只要不设为 bsSizeable 即可
 
你有试过吗,真是不能再小了
 
我不知道楼主怎么试,<br>但是我试可以缩小到1个点。
 
这几行代码就贴出来吧:<br>procedure TForm1.FormCreate(Sender: TObject);<br>begin<br> &nbsp;BorderIcons := [];<br> &nbsp;BorderStyle := bsNone;<br> &nbsp;Width := 10;<br> &nbsp;Height := 10;<br>end;
 
缩那么小有什么用处啊!真是的!干脆Hide掉算了。
 
可以再小<br><br>不过在设计期间不能拉到很小<br>用代码控制即可<br><br>在oncreate的时候 <br><br>self.width:=1;<br>self.height:=1;<br><br>即可,结案吧,呵呵
 
什么情况下窗体不能修改.楼主先说明清楚!
 
他肯定把在Constrait属性中设置了最小宽度了(MinWidth)
 
在世寻欢 说得对<br>改过来就可以了
 

Similar threads

D
回复
0
查看
930
DelphiTeacher的专栏
D
D
回复
0
查看
871
DelphiTeacher的专栏
D
D
回复
0
查看
945
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部