在IE和VB中支持png图片透明效果的实现方法(vb源码打包)
来源:本站原创|时间:2022-11-25|栏目:vb|
1,使用js文件使IE支持png图片透明效果。
pngfix.js:
复制代码 代码如下:
var arVersion = navigator.appVersion.split("MSIE")
var version = parseFloat(arVersion[1])
function fixPNG(myImage)
{
if ((version >= 5.5) && (version < 7) && (document.body.filters))
{
var imgID = (myImage.id) ? "id='" + myImage.id + "' " : ""
var imgClass = (myImage.className) ? "class='" + myImage.className + "' " : ""
var imgTitle = (myImage.title) ?
"title='" + myImage.title + "' " : "title='" + myImage.alt + "' "
var imgStyle = "display:inline-block;" + myImage.style.cssText
var strNewHTML = "<span " + imgID + imgClass + imgTitle
+ " style=\"" + "width:" + myImage.width
+ "px; height:" + myImage.height
+ "px;" + imgStyle + ";"
+ "filter:progid:DXImageTransform.Microsoft.AlphaImageLoader"
+ "(src=\'" + myImage.src + "\', sizingMethod='scale');\"></span>"
myImage.outerHTML = strNewHTML
}
}
使用方法 :
在模板的<HEAD>
<!--[if lt IE 7]>
<script defer type="text/javascript" src="pngfix.js"></script>
<![endif]-->
<img src="xyz.png" alt="foo" width="10" height="20" onload="fixPNG(this)">
高和宽不能去掉。方法来自autoit,详细说明可以看看原文http://homepage.ntlworld.com/bobosola/index.htm
2,vb程序使用png图片,做启动画面相当帮,这里有一个vb中读取png图片的类,我以前的一个程序也是使用的这个类实现的PNG透明效果启动画面。
附件中资源来自枕善居 文件下载
您可能感兴趣的文章
- 01-10VBS中的正则表达式的用法大全 <font color=red>原创&
- 01-10VBS中SendKeys的基本应用
- 01-10VBS中Select CASE的其它用法
- 01-10VBScript教程 第二课在HTML页面中添加VBscript代码
- 01-10VBScript教程 第十四课在VBScript中使用对象
- 01-10MsgBox函数语言参考
- 01-10VBS教程:属性-Key 属性
- 01-10VBS教程:运算符-运算符优先级
- 01-10VBS教程:运算符-运算符(+)
- 01-10VBS教程:函数-Mid 函数