vb.net入门——ColorDialog 组件的使用

来源:        2008-03-29 15:46:54        评论
ColorDialog 组件是.net预设的有模式对话框,其功能是弹出系统自带的调色板,让用户选择颜色或者自定义颜色。 在vb.net的工具箱…

ColorDialog 组件是.net预设的有模式对话框,其功能是弹出系统自带的调色板,让用户选择颜色或者自定义颜色。

在vb.net的工具箱中,ColorDialog 组件图下图所示:

vb.net入门——ColorDialog 组件的使用(图一)一、ColorDialog 组件的主要属性

1、AllowFullOpen 属性:指示用户是否可以使用该对话框定义自定义颜色。如果用户可定义自定义颜色,则为 true;否则为 false,将禁用对话框中关联的按钮,而且用户无法访问对话框中的自定义颜色控件。默认值为 true。

FullOpen 属性:指示用于创建自定义颜色的控件在对话框打开时是否可见。如果自定义颜色控件在对话框打开时是可用的,则为 true;否则为 false。默认情况下,自定义颜色控件在第一次打开对话框时是不可见的。必须单击 “规定自定义颜色” 按钮来显示它们。

注意   如果 AllowFullOpen 为 false,则 FullOpen 不起作用。

2、AnyColor 属性:指示对话框是否显示基本颜色集中可用的所有颜色,如果对话框显示基本颜色集中可用的所有颜色,则为 true;否则为 false。默认值为 false。

3、CustomColors 属性:对话框显示的自定义颜色集,默认值为空引用(Visual Basic 中为 Nothing)。

4、ShowHelp 属性:指示在颜色对话框中是否显示“帮助”按钮,如果在对话框中显示“帮助”按钮,则为 true;否则为 false。

当用户单击通用对话框中的“帮助”按钮时将发生 HelpRequest 事件。

5、SolidColorOnly 属性:指示对话框是否限制用户只选择纯色。默认值为 false。

如果用户只能选择纯色,则为 true;否则为 false。该属性适用于只有 256 种颜色或更少颜色的系统,在这些类型的系统上,某些颜色是其他颜色的组合。

我们现在向Form窗体拖放一个 ColorDialog 组件,然后设置 AllowFullOpen=True,FullOpen=False,ShowHelp=True,其它为默认,调用该组件的ShowDialog 方法,显示如下图二所示:

vb.net入门——ColorDialog 组件的使用(图二)

二、为对话框添加自定义颜色

我们可以通过对话框的“添加到自定义颜色”按钮把选定的颜色添加到左边的“自定义颜色”显示列表中,如下图三所示:
vb.net入门——ColorDialog 组件的使用(图三)

同时,我们也可以使用代码来初始化“自定义颜色”列表 CustomColors,比较适用于禁止用户自行添加自定义颜色的情况。下面的示例显示如何将代表自定义颜色添加到 CustomColors 之中。

ColorDialog1.AllowFullOpen = False

ColorDialog1.CustomColors = New Integer() {6916092, 15195440, 16107657, 1836924, 3758726, 12566463, 7526079, 7405793, 6945974, 241502, 2296476, 5130294, 3102017, 7324121, 14993507, 11730944}

ColorDialog1.ShowHelp = True

ColorDialog1.Color = Me.BackColor

ColorDialog1.ShowDialog()

把代码放在按钮的单击事件中,运行后效果如下图四所示:

vb.net入门——ColorDialog 组件的使用(图四)

三、示例

在窗体上拖放一个ColorDialog 组件、一个Button按钮、一个TextBox控件,要求初始化自定义颜色列表,并让用户通过ColorDialog 对话框来改变文本框的文字颜色。

先把如下的init过程添加到Form的New()过程中:

Sub init()

ColorDialog1.AllowFullOpen = False

ColorDialog1.CustomColors = New Integer() {6916092, 15195440, 16107657, 1836924, 3758726, 12566463, 7526079, 7405793, 6945974, 241502, 2296476, 5130294, 3102017, 7324121, 14993507, 11730944}

ColorDialog1.ShowHelp = True

End Sub

然后在按钮的Click事件中添加如下代码:

Me.ColorDialog1.ShowDialog()

TextBox1.ForeColor = Me.ColorDialog1.Color

现在运行,然后单击“设置文本颜色”,我们就可以更改文本框的文字颜色了,如下图五所示:

vb.net入门——ColorDialog 组件的使用(图五)

本文主要是了解.net中预设的标准对话框中的颜色对话框,我们可以通过颜色对话框来增强我们的应用程序的界面自定义功能,让用户能够自行设置显示的颜色效果。本文为巧巧读书网Douces原创,转载请保留该版权信息。

 

评论: vb.net入门——ColorDialog 组件的使用


昵称  密码    匿名
热门
相关