Delphi窗体任务栏隐藏和透明

主窗体:把工程里的Application.MainFormOnTaskBar:=true ; 
改为 Application.MainFormOnTaskBar:=False ; 

在onshow 里加入:ShowWindow(Application.Handle, SW_HIDE); //不在任务栏显示 

就搞定.


透明: 设置窗体color和Transparentcolor颜色相同即可


子窗体:

今天用delphi写一个小程序的时候想使我的窗口在任务栏影藏,同时有渐变的效果从透明变过来。在fromcreate中写了一个api使窗口能够在任务栏隐藏的:

SetWindowLong(Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW );

写完这个之后发现我调用form1.alphablendvalue更改窗口的透明度没有效果了,百思不得其解,于是查了一下用api设置窗口透明属性的:

SetWindowLong(Handle,GWL_EXSTYLE,WS_EX_LAYERED);//

这个时候才恍然大悟,原来设置窗口的style只是分别设置了两个,当然只有一个生效了,所以要这么写

SetWindowLong(Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW Or WS_EX_LAYERED);

然后调用:

SetLayeredWindowAttributes(Self.Handle,0,alphacount,LWA_ALPHA);

设置它的透明度 alphacount ,这个是最大到255的;

同时还要注意使用setwindowlong中不能是这个参数WS_EX_TRASPARENT 这个也是设置窗口透明的,但是如果设置了,在之后修改窗口的透明度的时候会修改不了,所以应该用WS_EX_LAYERED。

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值