資源描述：
《學會用按鍵精靈制作腳本之界面教程：制作音樂播放器》由會員上傳分享，免費在線閱讀，更多相關內容在教育資源-天天文庫。
1、學會用按鍵精靈制作腳本之QUI界面教程：制作音樂播放器???????????????????????????????????來源：按鍵學院【按鍵精靈】配上炫酷的Gif圖片，簡單的音樂播放器就算完成了。樓主忍不住陶醉許久，QUI界面原來也是可以如此美膩的，哦吼吼~~最終效果圖：我們肉眼看到的，這個播放器上只有按鈕，進度條，列表框，標簽，其實還有一個瀏覽框和按鈕是隱藏的。我們先來了解下，listbox列表控件、BrowseBox1瀏覽框控件、ProgressBar1進度條控件。上表格~今天會用到的屬性會
2、用紅色字體標注出來。ListBox列表框●基本●位置：●其他：●方法：屬性1，名稱（Name）屬性1，左邊（Left）屬性1，文字顏色（TextColor）方法1，返回列表行數(shù)數(shù)量（ListCount）屬性2，顯示（Visible）屬性2，上邊（Top）屬性2，背景顏色（BackColor）方法2，新增列表項目（AddItem）屬性3，有效（Enabled）屬性3，寬度（Width）屬性3，字體（Font）方法3，插入列表項目（InsertItem）屬性4，列表內容（List）屬性4，高度（Heig
3、ht）方法4，刪除列表項目（RemoveItem）屬性5，顯示順序（ZOrder）方法5，返回列表當前選中的行號（ListIndex）BrowseBox瀏覽框●基本：●位置：●其他：屬性1，名稱（Name）屬性1，左邊（Left）屬性1，文字顏色（TextColor）屬性2，顯示（Visible）屬性2，上邊（Top）屬性2，背景顏色（BackColor）屬性3，有效（Enabled）屬性3，寬度（Width）屬性3，字體（Font）屬性4，路徑（Path）屬性4，高度（Height）屬性4，瀏覽樣
4、式（Style）屬性5，顯示順序（ZOrder）屬性5，過濾條件（Filter）ProgressBar進度條●基本：●位置：其他：屬性1，名稱（Name）屬性1，左邊（Left）屬性1，方向（Orientation）屬性2，顯示（Visible）屬性2，上邊（Top）隱藏屬性：進度（Value）屬性3，有效（Enabled）屬性3，寬度（Width）屬性4，高度（Height）屬性5，顯示順序（ZOrder）音樂播放器的實現(xiàn)步驟是十分簡單的，來，咱們手牽手一起去看看是怎么實現(xiàn)的。步驟：1、把瀏覽框里
5、的路徑進行分割，把分割得到的歌曲名稱添加到播放列表框。??2014-9-2214:54上傳下載附件(12.4KB)2014-9-2214:54上傳下載附件(6.49KB)代碼：IfForm1.瀏覽框.Path<>""Then??//判斷打開的路徑是否為空??????SearchString=Form1.瀏覽框.Path??//設置要搜索的字符串??????SearchChar=""??//搜索??????MyPos=InstrRev(SearchString,SearchChar)??//搜索字
6、符""在SearchString里面出現(xiàn)的從結尾計起的位置??????l=Len(SearchString)??//SearchString的長度??????歌曲名字=Right(SearchString,l-MyPos)??//從字符串SearchString右邊返回指定數(shù)目的字符，現(xiàn)在返回愛你一萬年.mp3??????Form1.播放列表.AddItem歌曲名字??//添加歌曲名字到列表框EndIf1、播放按鈕的默認背景圖片設置為播放.jpg2014-9-2214:59上傳下載附件(1.27K
7、B)定義一個全局變量來記錄播放按鈕的點擊次數(shù)，點擊次數(shù)為奇數(shù)時，播放按鈕的背景圖片設置為暫停.jpg,并且播放音樂，點擊次數(shù)為偶數(shù)時，播放按鈕的背景圖片設置為播放.jpg,并且暫停音樂。代碼：Ifjsmod2??Then??????Form1.播放.Picture=".播放.jpg"??????CallPlugin.Media.Stop()??????Form1.顯示播放狀態(tài).Caption="停止"??Else??????Form1.播放.Picture=".暫停.jpg"??????Call
8、Plugin.Media.Play(myarray(hanghao))??//播放列表文件，使用相對路徑??????Form1.顯示播放狀態(tài).Caption="播放"??EndIfjs=js+11、上一首按鈕（下一首按鈕）2014-9-2215:01上傳下載附件(1.66KB)先停止當前播放的音樂，將播放列表框的listIndex（列表當前選中的行號）加一（下一首是減一），然后播放音樂。代碼：IfForm1.播放列表.listIndex=0Then??????//如果
