如何让窗体透明(20分)

  • 主题发起人 主题发起人 sy0116
  • 开始时间 开始时间
S

sy0116

Unregistered / Unconfirmed
GUEST, unregistred user!
我想让我的程序的窗体透明,只把可视的控件显示出来,应该怎么办呢?
 
在OnCreate事件中添加:<br><br>procedure TForm1.FormCreate(Sender: TObject);<br>begin<br>&nbsp; ......<br>&nbsp; Form1.Brush.Style := bsClear;<br>&nbsp; Form1.BorderStyle := bsNone<br>&nbsp; ......<br>end;<br>
 
delphi6、7<br>TFrom的属性:<br>alphablend=true<br>alphablendvalue=0<br>通过调alphablendvalue的值即可.alphablendvalue的值最大为:255<br>
 
to gyh75<br>可是这样又遇到一个问题,我的程序用到了一个IMAGE控件加载了一个背景为白色的ICO文件,我设置了窗体的TransparentColor属性,使白色透明,但用了你的方法后运行时窗体背景会变成一片黑色,并不透明了,这该怎么办呢?
 
这么老的问题啊?<br>设置了窗体的TransparentColor属性之后就不要再写代码了。
 
怎么在WIN98下没用啊?
 
笨,透明窗体的api 2000以上才有
 
其实要绝对透明很麻烦!<br>
 
TransparentColor属性在98里不能用吗
 
高手帮忙啊
 
这个问题看来是没有很好的方法可以解决 了
 
那异形窗体在98下怎么做?
 
后退
顶部