[ابو روضة]

(05-01-20, 11:50 AM)جميل كتب : يبدو أنني فهمت خطأ من الصورة التي وضعتموها حضرتكم، بسبب وجود زر تشغيل ◄ وبروجرسبار،
فاعتقدت أن البرنامج خاص بتشغيل مقاطع على شكل قائمة، ولكن نافذة عرض المقطع غير ظاهرة في الصورة،

طوال يوم أمس وأنا أحاول على فهمي الخاطئ، وكيف أربط ProgressBar بمدة عرض المقطع حتى يأست من شدة التعب،

وقبل قليل عندما دخلت المنتدى وجدت الأخ الحبيب trakktour وضع صورة تبين أن الزر للتحميل وليس للتشغيل،
فرجعت بقراءة الموضوع من أوله فلم أجد إلا كلمة تحميل واحدة (لم أركز فيها على ما يبدو)،
فقمت بعدها بمراجعة مشروعك المرفق فلم أجد ما يوضح أن الموضوع يتعلق بالتحميل،

عموما كان هذا ما توصلت إليه (بمفهومي الخاطئ) بعد التعديل ولكن اتضح الآن أنه ليس الهدف النهائي لما تريد.

ولكن لمن يرغب في معرفة التعديل حسب هذه الصورة فهذه هي الطريقة:
حذف الأكواد التي في MyUserControl مع إضافة Button على الصورة
وفي الفورم إضافة WebBrowser
اضافة هذا الكود في الفورم

PHP كود :

   Private Sub Play_Click(sender As Button, e As EventArgs)
        WebBrowser1.ScriptErrorsSuppressed = True
        WebBrowser1.Navigate(sender.Parent.Tag)
    End Sub 


إضافة هذه الأسطر قبل سطر ((FlowLayoutPanel1.Invoke(Sub() FlowLayoutPanel1.Controls.Add(uc

PHP كود :

                   Dim vid As String = Regex.Match(src(i), "http://i.ytimg.com/vi/(.+?)/hqdefault.jpg").Groups(1).Value
                    uc.Tag = "https://www.youtube.com/embed/" & vid & "/?autoplay=1&rel=0"
                    AddHandler uc.Button1.Click, AddressOf Play_Click 


أتمنى أن يتم التوصل لطريقة تحميل المقاطع ليستفيد منه الجميع.

الحقيقة يا أخى لقد تعلمت منك ومن الأخوة أشياء بهذا الموضوع جميلة حقيقة....

حضرتك لو كنت حملت المشروع المرفق فى أول رد لى فوق ستجد أن الموقع الموجود فى المشروع

هو موقع تحميل لقائمة تشغيل يوتيوب وانا بفضل الله جلبت منه الصور والاسماء ماعدا الرابط المباشر للتحميل..

جلب الرابط سهل بأمر الله لكن المشكل هو أنى ازاى اضيفه مع مشروعك لآقوم بالتحميل كل فيديو على حدا؟

هذا هو مربط الفرس.