Delphi XE7实现的透明度可以调整的对话框

转载地址: http://www.cnblogs.com/qiufeng2014/p/4131073.html

Delphi xe7 android实现透明度可以调整的对话框

 

    要实现对话框透明度可以调整的效果,主要靠Layoutrectangle控件,改变rectangle1fill颜色就可以调整透明度的颜色。

具体步骤如下:

1.将要显示的提示框窗口form的属性Transparency设为true

2.放Layout控件,设置属性

  Alignclient

  Opacity=0.5  //透明度,设置范围:0---1

3.放rectangle控件,将rectangle1拖到Layout1

Rectangle1fill.color设为black

 

4.拖放Rectangle2控件,Rectangle2Layout1同级

5.然后将所有要在提示框显示的可视控件拖到到Rectangle2

经以上步骤处理后,可以实现透明度可以调整的对话框。 效果图:

<ignore_js_op>半透明提示框.rar(1.13 MB, 下载次数: 112) <ignore_js_op>
介绍
本文章介绍了Delphi XE7实现的透明度可以调整的对话框,要实现对话框透明度可以调整的效果,主要靠Layout和rectangle控件,改变rectangle1的fill颜色就可以调整透明度的颜色。
具体请下载附件后查看,代码非常简单
原文地址:https://www.cnblogs.com/lantianhf/p/4335612.html