tupianjianyinzhuanhuan.txt

来自「一个不错的图片渐隐转换代码」· 文本 代码 · 共 38 行

<script language="JavaScript">

var picture1="http://www.51js.com/attachments/oaGt_winsky.gif"
var picture2="http://www.51js.com/attachments/l34N_01.jpg"

var picturewidth=300
var pictureheight=135

</script>
      <script language="JavaScript">
      if (document.all) {
document.write('<OBJECT ID="DAControl_Wipe" ')
document.write('STYLE="width:'+picturewidth+';height:'+pictureheight+'"')
document.write('CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D">')
document.write('</OBJECT>')
m = DAControl_Wipe.MeterLibrary;

whatTransformation = new ActiveXObject("DXImageTransform.Microsoft.Wipe");

whatPictures = new Array();      
whatPictures[0] = m.ImportImage(picture1);
whatPictures[1] = m.ImportImage(picture2);

forward = m.Interpolate(0, 1, 3);
back = m.Interpolate(1, 0, 2);
whatMovement = m.Sequence(forward, back).RepeatForever();

whatTransformation.GradientSize = 1.0;
whatTransformation.WipeStyle = 1;

theResult = m.ApplyDXTransform( whatTransformation, whatPictures, whatMovement );

DAControl_Wipe.Image = theResult.OutputBvr;
DAControl_Wipe.Start();

}
</script>