R
RenWang1
Unregistered / Unconfirmed
GUEST, unregistred user!
下载地址:
http://www.playicq.com/dispdocnew.php?id=10466
http://www.2ccc.com/article.asp?articleid=284
1.新建一个工程;
2.在窗口上放置一个Image控件，并调入一个图片,Image1.Autosize:=True;
3.Form1.AutoSize:=True;Form1.TransparentColor:=True; Form1.TransparentColorValue:=ClWhite(由于这个图片的边缘是白色的);
4.好了，运行就能看到一个透明的窗口了，如果将Form1.BorderStyle设置成BsNone，就是异形窗口了。
http://www.playicq.com/dispdocnew.php?id=10466
http://www.2ccc.com/article.asp?articleid=284
1.新建一个工程;
2.在窗口上放置一个Image控件，并调入一个图片,Image1.Autosize:=True;
3.Form1.AutoSize:=True;Form1.TransparentColor:=True; Form1.TransparentColorValue:=ClWhite(由于这个图片的边缘是白色的);
4.好了，运行就能看到一个透明的窗口了，如果将Form1.BorderStyle设置成BsNone，就是异形窗口了。
aladin@fair-link.com/down/异型窗口.rar