[求助]渐变色的问题！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]渐变色的问题！

共有11183人关注过本帖树形打印复制链接主题：[求助]渐变色的问题！

mosquito1003

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：350 积分：3142 威望：0 精华：0 注册：2012/12/6 18:05:00

[求助]渐变色的问题！ 发帖心情

Post By：2013/8/12 18:06:00 [显示全部帖子]

请教大虾们，我想让窗口背景是渐变色，以及控件的背景是渐变色，大家有什么可行的方法。条件是不可以用背景加载事先处理好的图片哦，必须用程序代码去控制这些渐变色哦！有点难度哦！最好设计成2个函数，一个窗口背景使用，另一个是控件使用。如果能设计多种颜色渐变就更好了，不过这个难度很大。

mosquito1003

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：350 积分：3142 威望：0 精华：0 注册：2012/12/6 18:05:00

Post By：2013/8/16 9:13:00 [显示全部帖子]

果然是高手啊！

mosquito1003

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：350 积分：3142 威望：0 精华：0 注册：2012/12/6 18:05:00

Post By：2013/8/16 9:34:00 [显示全部帖子]

本人初学者！对很多东西不理解！我再问下，我打开看了你的例子，非常不错，还有2点问题。

一、我把代码放到了窗口的AfterLoad去执行，无效！

二、点完按钮变化颜色后，这个控件的背景颜色不是永久的，而是暂时的，只要我拉大窗口，做出来的背景就没有了！

请问下，该怎么处理这些问题！

我是想一加载窗口后，那些控件的背景颜色就都做好了，不管是窗口的变化大小，还是其他的操作都不会是颜色变没有了！帮忙在写点代码，万分的感谢！

mosquito1003

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：350 积分：3142 威望：0 精华：0 注册：2012/12/6 18:05:00

Post By：2013/8/22 21:55:00 [显示全部帖子]

我做了个内部函数如下

'''

Dim Str() As String = Args(0).Split("|")

Dim p As System.Windows.Forms.Panel = Forms(Str(0)).controls(Str(1)).baseControl

Dim brush As new LinearGradientBrush(p.ClientRectangle, Color.Blue, Color.White , LinearGradientMode.Vertical)

Dim g As Graphics = p.CreateGraphics()

g.FillRectangle(brush, p.ClientRectangle)

然后在窗口2 中AfterLoad调用如下

Functions.Execute("渐变色","窗口2|Panel1")

可是还是无效！请问为什么？难道一定要用全局代码！

主题：[求助]渐变色的问题！