گذاشتن دکمه های کنترل برای پخش موزیک

[misagh.slm 1]

چطور میتونم برای موزیک هم دکمه های کنترل مثل  video view بزارم؟

[مهدی ایزدی 9,201]

درود

خب شما MediaPlayer که تعریف کنید بر فرض مثال به اسم mp

خودش کنترل هاشو داره مثل pause و play و ... که راحت میتونید ازشون استفاده کنید

[misagh.slm 1]

این رو میدونم ولی مثل video view میخام بشه جلو و عقب هم برد 

[مهدی ایزدی 9,201]

خب میتونید از Seekbar استفاده کنید   مشکل کجاست ؟ 

[misagh.slm 1]

خب چطور مدیا پلیر رو به seek bar متصل کنم؟

[مهدی ایزدی 9,201]

جست و جو کردم MediaPlayer این امکان رو نداره

اما فکر کنم با MediaPlayer Steam بشه یه کارهایی کرد

اولین فرصت روش کار میکنم 

Dim jo As JavaObject = mps
Log(jo.RunMethod("getPosition", null))

و

Dim jo As JavaObject = mps
jo.RunMethod("setPosition", Array(3000))

[misagh.slm 1]

من یه کار مهم دارم برای همین امروز ، فقط بگید MediaPlayer Steam چجوری کار میکنه؟ چون کد های مدیا پلیر رو که میزنم کار نمیکنه

[مهدی ایزدی 9,201]

اینو ببینید :

http://answercenter.ir/topic/8975-%D8%A7%D9%85%D9%88%D8%B2%D8%B4-%D8%AA%D8%B5%D9%88%DB%8C%D8%B1%DB%8C-%D8%AF%D8%A7%D9%86%D9%84%D9%88%D8%AF-%D8%A7%D9%87%D9%86%DA%AF-%D9%88-%D9%BE%D8%AE%D8%B4-%D8%A7%D9%86-%D8%AF%D8%B1%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87-mediaplayer-streamer/

[shahab.es 5,429]

سلام

کد زیر رو ببین

Sub barPosition_ValueChanged (Value As Int, UserChanged As Boolean)
    If UserChanged = False Then Return 'the value was changed programmatically
    MediaPlayer1.Position = Value / 100 * MediaPlayer1.Duration
    If MediaPlayer1.IsPlaying = False Then 'this can happen when the playback reached the end and the user changes the position
        MediaPlayer1.Play
    End If
    timer1_Tick 'immediately update the progress label
End Sub

اگه متوجه نشدی بهت سورس بدم...

[misagh.slm 1]

اگر میشه سورس بدید

[shahab.es 5,429]

اگر میشه سورس بدید

منظورم از سورس همون کدای اموزش متنیه دلاور

پیام خصوصیت رو چک کن