Foxtable(狐表)用户栏目专家坐堂 → Groupbox 边框的线条颜色


  共有2195人关注过本帖树形打印复制链接

主题:Groupbox 边框的线条颜色

帅哥哟,离线,有人找我吗?
drcqh
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:329 积分:3754 威望:0 精华:0 注册:2013/1/7 17:39:00
Groupbox 边框的线条颜色  发帖心情 Post By:2018/5/11 11:21:00 [只看该作者]

像Groupbox控件 边框的线条颜色属性中能设置就太好了,期待狐表以后能改进一下

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/11 11:29:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
drcqh
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:329 积分:3754 威望:0 精华:0 注册:2013/1/7 17:39:00
  发帖心情 Post By:2018/5/11 11:44:00 [只看该作者]

 

 

全局代码

Public Sub groupBox1_Paint(sender As Object, e As Windows.Forms.PaintEventArgs)

e.Graphics.Clear(Sender.BackColor)
e.Graphics.DrawString(Sender.Text, Sender.Font, Brushes.Red, 10, 1)
e.Graphics.DrawLine(Pens.Red, 1, 7, 8, 7)
e.Graphics.DrawLine(Pens.Red, e.Graphics.MeasureString(Sender.Text, Sender.Font).Width + 8, 7, Sender.Width - 2, 7)
e.Graphics.DrawLine(Pens.Red, 1, 7, 1, Sender.Height - 2)
e.Graphics.DrawLine(Pens.Red, 1, Sender.Height - 2, Sender.Width - 2, Sender.Height - 2)
e.Graphics.DrawLine(Pens.Red, Sender.Width - 2, 7, Sender.Width - 2, Sender.Height - 2)
End Sub

上面代码看不太懂。用这段代码测试时发现边框线条是红色,背景是黑色的。我只需要设置线条颜色,上面代码怎么改?


 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/11 12:00:00 [只看该作者]

看看这里

 

http://www.foxtable.com/webhelp/scr/1482.htm

 

e.Graphics.Clear(Sender.BackColor) '可以删除

 

设置颜色,修改这个 Pens.Red


 回到顶部
帅哥哟,离线,有人找我吗?
drcqh
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:329 积分:3754 威望:0 精华:0 注册:2013/1/7 17:39:00
  发帖心情 Post By:2018/5/11 15:36:00 [只看该作者]

谢谢版主!


 回到顶部