+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : طلب كود (/showthread.php?tid=16276)
الصفحات:
1
2
RE: طلب كود - سعود - 28-06-16
(28-06-16, 04:59 AM)bidaya كتب : اخي انا ابحث عن البديل
طيب اخي الكريم اليوتيوب مليء بالشروح لكيفية عمل متصفح انترنت بسيط ابحث باللغة الانجليزية make advanced webbrowser
ولا تحتاج تفهم الشرح (اقصد اللغة الانجليزية فقط انظر للخطوات وطبقها)
RE: طلب كود - bidaya - 28-06-16
شكرا اخي الكريم سعود
صدقني قد اهدرت من الوقت الكثير في البحث لم اجد هته الطريقة
RE: طلب كود - الوادي - 28-06-16
يا بدايا،
حاولت أحمل المرفق من المنتدى
http://vb4arb.com/vb/attachment.php?aid=10954
هذه الرسالة تظهر لي (المرفق الذي حددته غير موجود .)
وبعدين طلع موضوعك مختلف تماماً..
RE: طلب كود - bidaya - 28-06-16
اخي الكريم الوادي لم افهم اين الاختلاف
(28-06-16, 05:45 AM)bidaya كتب : اخي الكريم الوادي لم افهم اين الاختلاف
اول سؤال قلت اريد ربط شريط التقدم بالحدث وقلت وكمثال تحميل ملف .........الخ
RE: طلب كود - bidaya - 28-06-16
(28-06-16, 06:01 AM)الكاتب كتب : الاخوة الكرام ارجو تحميل المثال وتجريبه
الاخ بدايه ما المشكله لديك هل تريد تحميل ملف او استخدام ويب براوزر ؟
اخي الكاتب اولا اعذرن على الازعاج كما اني اشكرك اخ على مساعدتك لي
اما عن مذا اريد اريد شريط التقدم يتقدم مع نسبة العرض لادات الويب براوزر ( اي يعرض نسبة التحميل ) مثل برنامج التحميل
اريد تطبيق الطريقة على المثال المرفق
سامحوني اخواني ان كنت قد بالغت في طرح الأسئلة
RE: طلب كود - سعود - 28-06-16
اخي الكريم ظنيتك عرفت الطريق من خلال ردك لي
يوجد حدث بالويب براوزر
https://www.youtube.com/watch?v=pgoLmxTyxek
انظر للشرح وهو فقط لجزئية الـ شريط التقدم
ملاحظة(لا تشغل السماعات لوجود موسيقى)
RE: طلب كود - ابو ليلى - 28-06-16
السلام عليكم
ان كنت تقصد شريط التحميل اسفل الصفحة و الذي يدل على اكتمال تحميل الصفحة
يتوجب عليك استخدام الحدث WebBrowser1_ProgressChanged
و من ثم باضافة StatusStrip الى واجهة النموذج لديك و اضف بداخله ToolStripProgressBar1
و استخدم الكود التالي
PHP كود :
Private Sub WebBrowser1_ProgressChanged(sender As Object, e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
Try
Dim CurProg As Double
Dim MaxProg As Double
CurProg = e.CurrentProgress
MaxProg = e.MaximumProgress
ToolStripProgressBar1.Value = (CurProg / MaxProg) * 100
Catch ex As Exception
'
End Try
End Sub
RE: طلب كود - الوادي - 28-06-16
يا الكاتب،
إذا كنت تقصد مثال IDM فقد جربته ويعمل بشكل صحيح وشغله مرتب، وما ردي المرفق بصورة الخطأ إلا حركة لفت نظر
RE: طلب كود - bidaya - 28-06-16
الكاتب
الوادي
سعود
ابو ليلى
شكرا لكم على هذه المساعدة القيمة
رمضانكم كريم