Shockwave预载技术(4)

将第一部分曾经使用过的“PreloaderInterface”行为作如下修改：

property myURL, myProgressBarObj

on beginSprite (me)
　　if the runMode = "Author" then clearCache()
　　script("Preloader").new(myURL,me, #mHandlePreloadCompletion,#mShowProgess)
end

on exitframe (me)
　　go to the frame
end

-- 来自接口对象（例如进度条）的消息
on mRegisterWidget (me, obj, id)
　　if id = #ProgressBarthen myProgressBarObj = obj
end

-- 来自“Preloader”对象的消息
on mHandlePreloadCompletion (me, errorMsg)
　　if errorMsg <> EMPTYthen alert "Network Error!" & return & errorMsg
　　else alert "All Done"
end

on mShowProgess (me, statusList)
　　if myProgressBarObj.ilk =#Instance then
　　　　if statusList.state ="InProgress" then myProgressBarObj.mShowProgress(statusList.fractionDone)
　　　　else myProgressBarObj.mShowWorking()
　　end if
end

-- 构造行为
on getPropertyDescriptionList (me)
　　pdList = [:]
　　pdList[#myURL] = [#Comment:"URL", #format: #String, #Default: "http://www.lingoworkshop.com/Tutorials/Preloader/Main.dcr"]
　　return pdList
end

　　现在，让我们看看所有代码的运行过程：

　　（1）当“PreloaderInterface”行为被实例化并接收到了beginSprite事件时，会创建一个新的“Preloader”对象并指定预载完成或正在进行时需要调用的处理程序。

　　（2）当“ProgressBar”行为被实例化之后，会发送一个带有其本身引用的mRegisterWidget消息，此外还有可能包括一个ID以便别的对象能够识别其组件类型。当“PreloaderInterface”对象收到此消息时，会将“ProgressBar”对象的引用存储在一个名为“myProgressBarObj”的变量中。

　　（3）预载一旦进行，“Preloader”对象则开始给“PreloaderInterface”对象发送mShowProgress消息。然后，“PreloaderInterface”对象将会给“ProgressBar”对象发送mShowWorking和mShowProgress消息，不过这取决于预载是否已经真正开始。

下面的影片演示了预载过程中各部分之间是如何协同工作的。