منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : تشغيل ملفات الصوتية متتالية
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
ممكن كود تشغيل ملفات الصوتية متتالية
يعني انا صنعت برنامج قران كريم صوت
ولكن كل ماينتهي مقطع يوقف 
المطلوب كود جعل المقاطع تشتغل بعد
انتهاء المقطع الاول
وجزاكم الله كل خير
عليك ان تضيف الملفات الي مصفوفة و تتعامل مع كل ملف موجود بالمصفوفة كأنه ملف عادي
بالنسبة لي أقوم بالتالي :
  أضع السور في ComboBox  من الفاتحة الى البقرة و لتشغيل أي سورة أختارها من ComboBox ليتم تشغيلها 
 أما بالنسبة للتشغيل المتواصل للسور أقوم بالتالي :
  أضيف Timer وظيفته  تشغيل  السورة الموالية في حال تم قراة السورة الحالية ، كما في الكود :

كود :
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       If AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsStopped Then
           AxWindowsMediaPlayer1.Ctlcontrols.play()
           ComboBox1.SelectedIndex += 1
       End If
   End Sub
  
  و أضيف CheckBox و اسميه قراءة متواصلة للسور  وأكتب في حدث Click الخاص به الكود :
كود :
Private Sub CheckBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.Click
       If CheckBox2.Checked = True Then
           Timer1.Start()
       Else
           Timer1.Stop()
       End If
   End Sub

  و الأمر اشتغل معي بشكل جيد ، أرجو أن تكون قد وصلت الفكرة
PHP كود :
Private Sub AxWindowsMediaPlayer1_PlayStateChange(sender As ObjectAs AxWMPLib._WMPOCXEvents_PlayStateChangeEventHandles AxWindowsMediaPlayer1.PlayStateChange

    
If AxWindowsMediaPlayer1.playState WMPLib.WMPPlayState.wmppsStopped Then

        AxWindowsMediaPlayer1
.URL "next.mp3"

    
End If

End Sub 
الله يجزيك الخيررررررر
اللهم امين نحن وجميع اخواننا
الافضل عمل Listbox و عندما ينتهي من المقطع الاول ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1