aff - SEvEN
Banned
سلام آقا سيلور - سلام بچه ها ... شبتون بخير
به نظر شما مي شه ما فرم (رنگ) Scrooll Bar رو براي Song List تغير بديم ؟ يه مثال مي زنم : فرضا يه MP3 PLAYER داريم که Skin اون رنگش بنفشه يا هر رنگ ديگه اي ... حالا مي خايم که رنگ اسکرول بار رو مثه اون بکنيم يعني از حالت کلاسيک بيادش بيرون...
منظورم از حالت کلاسيک يعني درست مثه اسکرول بار صفحات مجيد آنلاين که آبي رنگه... يا خيلي سايتاي ديگه و يا حتي مديا پلير ويندوز...
مي شه به نظرتون ؟ يه فکر ديگه هم دارم البته ... استفاده از شي اسکريپت و دو تا کليد باسه بالا پائين رفتن اسکرول بار تو mmb باسه song list ... البته بجز اين کد :
به نظر شما مي شه ما فرم (رنگ) Scrooll Bar رو براي Song List تغير بديم ؟ يه مثال مي زنم : فرضا يه MP3 PLAYER داريم که Skin اون رنگش بنفشه يا هر رنگ ديگه اي ... حالا مي خايم که رنگ اسکرول بار رو مثه اون بکنيم يعني از حالت کلاسيک بيادش بيرون...
منظورم از حالت کلاسيک يعني درست مثه اسکرول بار صفحات مجيد آنلاين که آبي رنگه... يا خيلي سايتاي ديگه و يا حتي مديا پلير ويندوز...
مي شه به نظرتون ؟ يه فکر ديگه هم دارم البته ... استفاده از شي اسکريپت و دو تا کليد باسه بالا پائين رفتن اسکرول بار تو mmb باسه song list ... البته بجز اين کد :
ListBoxGetSelectedItems("SongList","SelItems$,SelItemsNum$,#,AllNumItems")
ListBoxGetItems("SongList","ItemsArray$,NumItemsArray$,#,NumOfAllItems")
For j=1 To AllNumItems
SelItem$ = GetArrayItem(SelItems$,#,j)
SelNum$ = GetArrayItem(SelItemsNum$,#,j)
SelNum = VAL(SelNum$)
Next j
**************************************************************************
If (SelNum>1) Then
ListBoxMoveItem("SongList","SelNum-1")
SongListReset()
ListBoxGetItems("SongList","<List>")
End
البته اين کد باسه UP هستش که موزيک در حال اجرا رو بالا ميره...و يکي ديگه هم هست که جفتشون مربوط به سمپل mp3tags هستش... ؟ ؟ ؟ListBoxGetItems("SongList","ItemsArray$,NumItemsArray$,#,NumOfAllItems")
For j=1 To AllNumItems
SelItem$ = GetArrayItem(SelItems$,#,j)
SelNum$ = GetArrayItem(SelItemsNum$,#,j)
SelNum = VAL(SelNum$)
Next j
**************************************************************************
If (SelNum>1) Then
ListBoxMoveItem("SongList","SelNum-1")
SongListReset()
ListBoxGetItems("SongList","<List>")
End









