程序實現思路:程序運行后首先從磁盤中找出存放相片的各個相冊名(文件夾),用戶選擇(單擊)其一后,接著給出不同的瀏覽方式(隨機、按序循環、手動控制),如果你選擇前兩項,程序將按要求不停地播放圖片,直至你想停止或重新選擇相冊為止。另外,如果你有新相片,只須加入相應的相冊即可,不用更改源程序。
相冊位置:為敘述方便,本例中將各個相冊放在與該程序同位置的文件夾“我的相冊”中(圖一)
構成程序的模塊如下(限于篇幅,只介紹自動瀏覽部分):(圖二)
各模塊的說明:
一.“選擇相冊”交互項:
1.附加在交互項上的運算圖標內容:
initialize(t,pic_num,pic_name)
--初始化自定義變量,t用來決定各按鈕的顯示狀態;pic_num為相片的號碼;pic_name為相片的名稱。
pic_dir:=catalog(filelocation^"我的相冊","d")
--pic_dir代表相冊名。
2.雙擊交互圖標,選擇文字工具,分別輸入“請選擇相冊”和{pic_dir},調整好文字框大小,一定要注意使熱區“記錄相冊名稱”的區域與此相同。(圖三)
3.“記錄相冊名稱”熱區交互項上的屬性設置:[branch]域中選擇exit interaction項,其余默認。其中的運算圖標中的內容為:
pic_dir:=wordclicked
--取得用戶單擊的相冊名
二.“觀看方式”交互項:.
1.附加在交互上的運算圖標內容:
pics:=catalog(filelocation^"我的相冊/"^pic_dir,"f")
--變量pics為用戶單擊的相冊中所有的相片名。
total_pic:=linecount(pics)
--該變量代表相片的總數。
2.該交互中共有四個按鈕交互項,其中屬性設置為:
“隨機”和“循環按序”按鈕:[active if]域中輸入t=0,[branch]域中選擇try again項。
“重選相冊”按鈕:[active if]域中輸入t=1,[scope]域中選擇perpetual。
“退出”按鈕按鈕:[scope]域中選擇perpetual。
3.“重選相冊”交互中的運算圖標內容為:goto(iconid@"選擇相冊")
4.“退出”交互中的運算圖標內容為:quit()
三.打開“隨機”交互中的組圖標(圖四)
1.“定義按鈕狀態”運算圖標中內容為:
t:=1
--使“隨機”按鈕不可用
2.在“隨機瀏覽”交互中只有一個時間交互項,該時間交互中的屬性設置為:[interruption]域中選擇continue timing項;[option]域中選中restart for each try;[branch]域中設為try again;[time limit]設為3(可自己調整)。
3.打開“圖片”組圖標(圖五):
[1] [2] 下一頁
新聞熱點
疑難解答