- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [分享]动态添加按钮 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=13865)
-- 发布时间：2011/10/30 10:04:00
-- [分享]动态添加按钮
版友“布莱克朱”提了一个隐藏按钮的问题，后来看到他说动态添加按钮不好弄，其实我觉得挺好弄的，而且好用
因为用代码隐藏了按钮以后，后期修改维护很麻烦，动态的就方便，这个用户以前是员工权限，现在改经理了，
你只要设置一下就行了，或者以前他负责“增加”，现在负责“修改”了。
这个例子可以结合帮助里面的可视化权限控制，只要设置不同的权限，就会呈现不同的按钮。
按钮的代码可以放在全局事件里面。
优点：
1.结合权限控制，维护快捷方便
2.自动排列，美观
此主题相关图片如下：qq截图20111030100116.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:动态添加按钮.rar |
[此贴子已经被作者于2011-10-30 10:13:05编辑过]
-- 发布时间：2011/10/30 13:39:00
--
呵。分享就要顶！
-- 发布时间：2011/10/30 15:57:00
--
我看看噻.
-- 发布时间：2011/10/30 16:00:00
--
这个不错,值得考虑!
-- 发布时间：2011/10/31 7:33:00
--
我顶
-- 发布时间：2011/10/31 7:38:00
--
不错的东西,我已经参照了.
-- 发布时间：2011/10/31 7:48:00
--
Dim btn As WinForm.Button
btn = Forms("窗口1").Controls("Button1")
btn.Image = GetImage("Accept.Ico")
btn.FlatStyle = Windows.Forms.FlatStyle.popup
可以利用代码做样式等,但是 还有文本位置的代码,相对位置的代码是怎样的?
-- 发布时间：2011/10/31 8:15:00
--
这个代码怎么写?我需要动态添加图标,但是位置默认是居中的.所以我必须要 文本位置的代码,图标位置 相对位置等的代码
-- 发布时间：2011/10/31 8:22:00
-- [求助]BuildTree的sort怎么用？
BottomCenter 垂直靠下，水平居中
BottomLeft 垂直靠下，水平靠左
BottomRight 垂直靠下，水平靠右
MiddleCenter 垂直居中，水平居中
MiddleLeft 垂直居中，水平靠左
MiddleRight 垂直居中，水平靠右
TopCenter 垂直靠上，水平居中
TopLeft 垂直靠上，水平靠左
TopRight 垂直靠上，水平靠右
BottomCenter 垂直靠下，水平居中
BottomLeft 垂直靠下，水平靠左
BottomRight 垂直靠下，水平靠右
MiddleCenter 垂直居中，水平居中
MiddleLeft 垂直居中，水平靠左
MiddleRight 垂直居中，水平靠右
TopCenter 垂直靠上，水平居中
TopLeft 垂直靠上，水平靠左
TopRight 垂直靠上，水平靠右
参见帮助吧
[此贴子已经被作者于2011-10-31 8:22:23编辑过]
-- 发布时间：2011/10/31 8:38:00
--
找到图标的对齐代码了