■アニメーションイベントコードの解説
|
{curl 6.0 applet}
{curl-file-attributes character-encoding = "shift-jis"}
{let f:Frame = {Frame width =120pt, height =120pt}}
{let cur-frame:int=1}
{value
{f.animate
interval=1s,
{on TimerEvent do
{f.add
replace?=true,
{image source =
{url "img/" & cur-frame & ".jpg"}
}
}
{inc cur-frame}
{if cur-frame > 2 then set cur-frame=1}
}
}
f
} |
各コードについて説明します。
{curl 6.0 applet}
{curl-file-attributes character-encoding = "shift-jis"} |
最初の2行のコードはCurl IDE が自動的に生成したコードです。
Chapter 2のPart.1で詳しく解説しましたね。
| {let f:Frame = {Frame width =120pt, height =120pt}} |
この部分はアニメーションを表示する枠、サイズを指定しています。
この部分は最初に表示する画像のファイル名を指定しています。
animateメソッドを用いてアニメーションを定義します
画像ファイルを表示する時間（１ｓ,＝1秒）
{on TimerEvent do
{f.add
replace?=true, |
この部分は画像ファイルの置き換えを指定しています。
{image source =
{url "img/" & cur-frame & ".jpg"}
}> |
画像ファイル指定しています。
cur-frameに１を増分して次のファイル名を指定
| {if cur-frame > 2 then set cur-frame=1} |
cur-frameが2を超えたら１に戻ると指定しています。
|
