Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共4 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[原创]窗体最小尺寸控制问题

1楼
Luosen1956 发表于:2011/10/2 18:17:00

在 VB 中『窗体最小尺寸控制』是用以下(除去首尾语句后的)三条语句来实现的——

Private Sub Form_Resize()

   On Error Resume Next

   Me.Width = IIf(Me.Width < 8000, 8000, Me.Width)

   Me.Height = IIf(Me.Height < 6000, 6000, Me.Height)

End Sub

上述语句实现了窗体尺寸≥8000×6000,并可以进行最小化操作。

在 Foxtable 中怎样实现这个功能呀?

 

2楼
110228095 发表于:2011/10/3 9:22:00
我不会,其它高手回复
3楼
Luosen1956 发表于:2011/10/3 9:41:00

Dim n1%, n2%
n1 = e.Form.Width
n2 = e.Form.Height
n1 = IIf(n1 < 800, 800, n1)
n2 = IIf(n2 < 450, 450, n2)
e.Form.Width = n1
e.Form.Height = n2
e.Form.Controls("Panel1").Width = n1 - 18
e.Form.Controls("PictureBox1").Width = n1 - 18
e.Form.Controls("PictureBox1").Height = n2 - 44

这段程序可以解决三个问题:

⑴ 窗体的尺寸必须≥800×450(像素);

⑵ 容器控件(Panel1)的宽度将随窗口的宽度改变而改变;

⑶ 图片控件(PictureBox1)的宽高尺寸也将随窗体的宽高改变而改变。

现在的关键是:这段程序放在窗体的哪个事件程序中!!!

我没有看见类似【Form_Resize()】一样的事件程序。

4楼
狐狸爸爸 发表于:2011/10/3 9:55:00

可以在设计窗口的时候指定大小,如果要通过代码,参考:

 

http://www.foxtable.com/help/topics/2312.htm

 

共4 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01855 s, 2 queries.