网页链接的效果，

就是正常状态下字体颜色为黑色，

但是鼠标移上去的时候字体颜色就会变成蓝色，还有一条下划线。

 

实现步骤如下:

拖一个Label控件到窗体上，

然后展开SelfOwnMateiral下的DrawCaptionParam，

里面有一个DrawEffectSetting属性，

用于设置各种状态下的效果,

它下面有三个属性，分别是:

MouseDownEffect，用于设置鼠标点击状态的效果，

MouseOverEffect，用于设置鼠标停靠状态的效果，

PushedEffect，用于设置按下状态的效果，

如下图所示：

展开MouseOverEffect会发现里面有很多很多属性，

其中，EffectTypes是用于设置绘制参数需要哪些效果，

有以下三个效果选项:

dtpetFontColorChange:字体颜色变化效果，同时需要设置FontColor,

勾选这个选项，当鼠标停靠在控件上面的时候，字体颜色会发生变化，

dtpetFontSizeChange:字体大小变化效果,同时需要设置FontSize,

勾选这个选项，当鼠标停靠在控件上面的时候，字体大小会发生变化，

dtpetFontStyleChange:字体风格变化效果，同时需要设置FontStyle,

勾选这个选项，当鼠标停靠在控件上面的时候，字体风格会发生变化，

如下图所示:

这里我们只需要设置MouseOverEffect，

在EffectTypes中勾选dtpetFontColorChange和dtpetFontStyleChange，

表示需要字体颜色变化效果和字体风格变化效果，

接着设置FontColor为蓝色，FontStyle为fsUnderLine，

设置完如下显示:

然后运行就能看到效果了，

正常状态:

鼠标停靠状态