Rss & SiteMap

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

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

标题:[求助]PictureViewer字体大小

1楼
seal51 发表于:2016/1/18 23:17:00

Dim obj As object = Forms("产品单页").Controls("PictureViewer1").basecontrol.Controls("SplitContainer1").panel2.controls("FlowLayoutPanel1")
For Each o As object In obj.controls
    o.Font = new Font("宋体", 11)
Next

 


图片点击可在新窗口打开查看此主题相关图片如下:qqsm20160118231633.png
图片点击可在新窗口打开查看
2楼
大红袍 发表于:2016/1/18 23:20:00

参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=78784&skin=0

 

3楼
大红袍 发表于:2016/1/18 23:31:00

如,代码

 

Dim obj As object = e.Form.Controls("PictureViewer1").basecontrol.Controls(0)
obj.SplitterDistance = 200
For Each o As object In obj.panel2.controls("FlowLayoutPanel2").Controls
    o.Font = new Font("宋体", 20)
Next

4楼
xxfoxtable 发表于:2024/9/23 15:25:00

如,代码

 

Dim obj As object = e.Form.Controls("PictureViewer1").basecontrol.Controls(0)
obj.SplitterDistance = 200
For Each o As object In obj.panel2.controls("FlowLayoutPanel2").Controls
    o.Font = new Font("宋体", 20)
Next

这个代码不管用,报错“未设置对象变量或 With 块变量。”
5楼
有点蓝 发表于:2024/9/23 15:49:00
现在Foxtable不支持使用代码控制底层的东西。
6楼
xxfoxtable 发表于:2024/9/23 15:55:00
那怎么变字体,平板用,字体太,点不了
7楼
有点蓝 发表于:2024/9/23 15:57:00
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=137921
8楼
xxfoxtable 发表于:2024/9/23 16:06:00
好了
[此贴子已经被作者于2024/9/23 16:09:32编辑过]
9楼
有点蓝 发表于:2024/9/23 16:11:00
我测试没有问题,确定窗口和控件名称都写对了,并且去掉了之前错误的代码
共9 条记录, 每页显示 10 条, 页签: [1]

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

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