<html><head><title>Demo</title></head>
<body text="#FFFFF" bgcolor="#000000">
<div align="center">
<h2>Demo</h2>
<!--- Create AspImage Object --->
<cfobject type="COM"
name="Image"
class="AspImage.Image"
action="CREATE">
<cfscript>
vbRed="255"; vbBlue="16711680"; vbBlack="0"; vbWhite="16777215";
vbGreen="65280"; vbYellow="65535"; vbCyan="16776960"; vbMagenta="16711935";
Image.AntiAliasText= True;
Image.FontName = "Arial";
Image.FontSize = 20;
Image.Padsize = "0";
Image.BackgroundColor = vbBlack;
Image.ClearImage();
strText = "ServerObjects Inc.";
Image.MaxX = Image.TextWidth(strText) + 5;
Image.MaxY = Image.TextHeight(strText) + 5;
Image.X = 3;
Image.Y = 3;
Image.StartAnimation(true);
intDelay = 20;
AddTextToAnimation=ArrayNew(1);
AddTextToAnimation[1]="S,#vbRed#,#intDelay#";
AddTextToAnimation[2]="e,#vbWhite#,#intDelay#";
AddTextToAnimation[3]="r,#vbGreen#,#intDelay#";
AddTextToAnimation[4]="v,#vbBlue#,#intDelay#";
AddTextToAnimation[5]="e,#vbWhite#,#intDelay#";
AddTextToAnimation[6]="r,#vbGreen#,#intDelay#";
AddTextToAnimation[7]="O,#vbBlue#,#intDelay#";
AddTextToAnimation[8]="b,#vbGreen#,#intDelay#";
AddTextToAnimation[9]="j,#vbRed#,#intDelay#";
AddTextToAnimation[10]="e,#vbWhite#,#intDelay#";
AddTextToAnimation[11]="c,#vbGreen#,#intDelay#";
AddTextToAnimation[12]="t,#vbBlue#,#intDelay#";
AddTextToAnimation[13]="s,#vbRed#,#intDelay#";
AddTextToAnimation[14]=" ,#vbBlack#,#intDelay#";
AddTextToAnimation[15]="I,#vbBlue#,#intDelay#";
AddTextToAnimation[16]="n,#vbWhite#,#intDelay#";
AddTextToAnimation[17]="c,#vbGreen#,#intDelay#";
AddTextToAnimation[18]=".,#vbRed#,90";
for (AnimLoop=1;
AnimLoop LT 19;
AnimLoop = AnimLoop + 1)
{Image.FontColor = listgetat(AddTextToAnimation[Animloop],2);
Image.TextOut(listgetat(AddTextToAnimation[Animloop],1), Image.X, Image.Y, false);
Image.AddImageToAnimation();
Image.AddAnimationControl(listgetat(AddTextToAnimation[Animloop],3), false, 0);};
Image.FileName = "#expandpath(".")#\soianim.gif";
Image.SaveAnimation();
WriteOutput("<img src=""soianim.gif""><br>");
// rem **********************************************************************
// rem * These properties give eval/registration information for the component
// rem **********************************************************************
// rem WriteOutput("<p>Expires: " & Image.Expires);
// rem WriteOutput("<br>Version: " & Image.Version);
// rem WriteOutput("<br>Registered To: " & Image.RegisteredTo);
</cfscript>
</div>
</body>
</html>