关于窗体透明的做法
2017-06-12 23:10
127 查看
1.在Delphi中,设置窗体的AlphaBlend := true;AlphaBlendValue := 0-255;
AlphaBlendValue越小窗体的透明度就越高。这种方法将会使窗体和窗体中控件都变成透明。
2.在Delphi中,设置TransparentColor := True与TransparentColorValue
:= TForm.Color, 则窗体变成透明,控件不透明。
3.使用API控制指定区域透明,如下,通过不绘制窗体四角的方法,来使四角变得圆滑透明,可在窗体Resize时调用。
procedure TFormPadMain.SetFormTransparent;
var
Rgn: HRGN;
begin
Rgn := CreateRoundRectRgn(0, 0, Width, Height, 11, 11);
SetWindowRgn(Handle, Rgn, True);
end;
AlphaBlendValue越小窗体的透明度就越高。这种方法将会使窗体和窗体中控件都变成透明。
2.在Delphi中,设置TransparentColor := True与TransparentColorValue
:= TForm.Color, 则窗体变成透明,控件不透明。
3.使用API控制指定区域透明,如下,通过不绘制窗体四角的方法,来使四角变得圆滑透明,可在窗体Resize时调用。
procedure TFormPadMain.SetFormTransparent;
var
Rgn: HRGN;
begin
Rgn := CreateRoundRectRgn(0, 0, Width, Height, 11, 11);
SetWindowRgn(Handle, Rgn, True);
end;
相关文章推荐
- 关于窗体透明的做法
- 关于窗体透明的做法
- Flex透明窗体做法 spark的Window加Skin
- 关于C#窗体的半透明,控件不透明的解决方案
- 关于Swing实现透明窗体的。我也很喜欢,收藏!
- 关于截屏实现透明窗体的bug
- 关于窗体透明的注意事项
- 关于windowless窗体设计的研究---借鉴一些directui的做法
- 关于Java Swing中的透明窗体
- 关于Swing实现透明窗体
- 关于一些透明窗体所需的的函数
- 关于缩放 Windows 窗体 DataGridView 控件的最佳做法的介绍
- 求救(关于窗体调用的问题)
- 创建位图型不规则窗体(可透明,可移动)
- 关于不同窗体之间的控件查询 - 方式二(事件与回调)
- 关于弹出式窗体的(转载csdn blackhero blog)
- VB 6中透明窗体的制作
- 使窗体拥有透明效果的API
- 关于加密,随机数,和后台绑定前台事件的做法
- 菜鸟求救!!!关于用popupmenu弹出新窗体的问题