改为 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。