Delphi2007中的Label也可以透明显示的

Delphi2007中的Label也可以透明显示的

今天准备把办公系统的登录界面重整精简一下，首要计划的就是把其中引用的rz系统控件（Raize_4..2）都去掉，就因为这个控件，导致必须安装这一个控件包（而且不太好安装，每次都害怕它不能正常安装了）。

检查一下发现，当初为了实现界面的透明，共使用了RzLabel和RzCheckBox这两个控件。

首先要解决的就是Label的透明，想想应该Label是可有透明的，人家可是有一个Transparent属性的，再尝试一下吧，拖一个label上来，默认效果是透明的，想想为什么以前不用呢，实际运行看看，果然，运行时背景就是clBtnFace的颜了，尝试设置Color，发现不管用，没有透明，那是什么原因呢，把Transparent设置为False，再运行，还是不透明，再次把Transparent设置为True，再运行，哈哈...居然透明了，真有趣啊！

再试一次，拖一个label，再反复设置一下Transparent属性，真的又透明了，有趣啊。

然后就是处理CheckBox的透明，这个控件没有Transparent属性的，那如何解决呢，遍控件集，CnPack系列中也没有，那如何办呢，尝试一下，使用标准的CheckBox，只让他显示一个方框，后面的文字使用Label来组合显示，再在Label上面增加OnClick事件来处理点击Label可以CheckBox.Checked:= not CheckBox.Checked，试试效果，跟一个完整的透明CheckBox控件一模一样呢，不错的尝试。