用户登录  |  用户注册
首 页商业源码原创产品编程论坛
当前位置:PB创新网文章中心编程技巧Delphi

暑期缤纷巨献之~------按比例改变你的图象

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2009-03-16 20:15:32
//--------------------------
         ROOT1.嘿嘿!
//--------------------------
var imgs,times
function showimg(a) //a代表你要传入的图片地址
{
imgs=new Image();
imgs.src=a
times=setTimeout("se()",700)
}
function se(){
if(imgs.complete==true){
clearTimeout(times);
loads();
}
}

function loads()  
//这里限制了图片必须按比例缩小到不能宽过190,不能高过120
{
var zhen=false;
var picW=imgs.width;
var picH=imgs.height;
var picws=picW
var pichs=picH
if (picW>190){
picws=190;
pichs=parseInt(picH*(190/picW));
if(pichs>120){
pichs=120;
picws=parseInt(picW*(120/picH))
}
zhen=true
}else{
if (picH>120){
pichs=120;
picws=parseInt(picW*(120/picH));
zhen=true
}
}
var str;
if(zhen){
str="<a href=\"javascript:winopen(''"+imgs.src+"'',"+picW+","+picH+")\">"+
    "<img src=\"" + imgs.src + "\" border=\"0\" width=\"" +picws+"\" height=\""+pichs+"\"></a>"
}else{
str="<img src=\"" + imgs.src + "\" border=\"0\" width=\"" +picws+"\" height=\""+pichs+"\">"
}
document.all["imgdiv"].innerHTML=str
                //这里是将图片写到一个TD,你也可以改成层的.
delete(imgs);
}

function winopen(url,wid,hei){
window.open(url,"","width="+(wid+10)+",height="+(hei+10))
}

Tags:

作者:佚名

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论
PB创新网ourmis.com】Copyright © 2000-2009 . All Rights Reserved .
页面执行时间:9,875.00000 毫秒
Email:ourmis@126.com QQ:2322888 蜀ICP备05006790号