| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付学习型 ASP/PHP/ASP.NET 主机 30元/年
高端软件开发 = 年薪十万不是梦   
共有 323 人关注过本帖
标题:怎样使窗体中的文本随着窗体的最大化而变大(始终居中)
收藏  订阅  推荐  打印
lisonshaw
Rank: 2
等级:注册会员
帖子:57
积分:750
注册:2008-8-4
怎样使窗体中的文本随着窗体的最大化而变大(始终居中)

如题,请各位达人指教!
2008-8-5 10:22
lisonshaw
Rank: 2
等级:注册会员
帖子:57
积分:750
注册:2008-8-4

各位高手啊,进来帮帮忙啊................
2008-8-5 16:17
wzxc
Rank: 12Rank: 12Rank: 12
等级:贵宾
帖子:468
积分:5424
威望:17
注册:2006-4-25

thisform.label5.left=(thisform.width/2)-(thisform.label5.width/2)

生命不息,冲锋不止! 坚持vfp到最后一刻!
2008-8-5 19:36
zw0127
Rank: 2
等级:注册会员
帖子:37
积分:584
注册:2008-7-21

*在标签label1的AutoSize属性设置为.T.
*在表单的INIT中:
this.Resize
*在表单的Resize中
this.label1.FontSize=IIF(INT(this.width/25)<12,12,INT(this.width/25)) && 在标签label1的字体计算结果(this.width/25)小于12为12,25为拟定数可以自行设置
thisform.label1.left=(thisform.width/2)-(thisform.label1.width/2)  &&调整居中
this.refresh
2008-8-6 10:40
共有 322 人关注过本帖
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.045704 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved