01-09-22, 08:30 AM
السلام عليكم ورحمة الله وبركاته
أيضاً لم يعمل عندي البرنامج
ولكن ملاحظتي من مراجعتي للأكواد أنك قد عرفت مشغل في كل من النافذة الثانية والثالثة
يعني عندك مشغلين وليس مشغل واحد
لحل هذه المشكلة قم بتعريف المشغل فقط في كود النافذة الأولى فقط ك متغير عام تحت كلاس الفورم 1 كما في التالي..
وأمسح سطر التعريف من النافذتين الثانية والثالثة
أما باقي الكود يصبح كـ مثل هذا الكود ..
وكذلك افعل في كود النافذة الثانية
أيضاً لم يعمل عندي البرنامج
ولكن ملاحظتي من مراجعتي للأكواد أنك قد عرفت مشغل في كل من النافذة الثانية والثالثة
يعني عندك مشغلين وليس مشغل واحد
لحل هذه المشكلة قم بتعريف المشغل فقط في كود النافذة الأولى فقط ك متغير عام تحت كلاس الفورم 1 كما في التالي..
كود :
Public Class Form1
Public player As MpvPlayerوأمسح سطر التعريف من النافذتين الثانية والثالثة
أما باقي الكود يصبح كـ مثل هذا الكود ..
كود :
Public Class Form3
' Private player As MpvPlayer
Public Sub New()
InitializeComponent()
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
On Error Resume Next
Form1.player.PlaylistRemove()
Form1.player = New MpvPlayer(Form1.Panel4.Handle) With {
.[Loop] = True,
.Volume = 50
}
Form1.player.Load("http://iptv.ipslow.com/tv34_www.elahmad.com_almajd_quran/tracks-v1a1/mono.m3u8?token=a6d37ac9b10b6e4a6d6d73e114c978c98e7a4214-29e40e57a45c89c7767082677cc6e6bd-1661981790-1661970990", "disney")
Form1.player.[Resume]()
End Sub
End Classوكذلك افعل في كود النافذة الثانية