+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=16570)
الصفحات:
1
2
كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - soper - 24-07-16
السلام عليكم انتم منتدي رائع بس انا عندي سوال ممكن يفيد الكل
هو انا عملت مثلا كود المفضلة وخلصتها وظبتها سيفت المشروع ماشي جيت اشتغلت علي سيفت صفحة في المفضلة ماشي ومش لازم انا مستخدم المشروع مثلا
سيف صفحة وطلع من البرنامج وداخل تاني ما لقي الصفحة الي هو سيفها
ياريت حد يفدني بس بشؤح مبسط
والسلام عليكم
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - LoveVb - 24-07-16
ياليت توضح اكثر ^^
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - soper - 24-07-16
(24-07-16, 11:08 AM)LoveVb كتب : ياليت توضح اكثر ^^
شرح مبسط خالص انت قبل كدة ادتني كود انا استغليت الكود وعملت ان يكون Favorite في متصفح ماشي
هاديك صورة
add هيعمل اضافة لزر فوق ماشي خلصت البرنامج عملت اضافة لصفحة ويب بس في مشروع تاني نفس الاكواد وكل حاجة زي ما هي خرجت من البرنامج بعد حفظ صفحة الويب دخلت في البرنامج تاني ما لقيتها خالص ياريت تحللي المشكلة دي
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - LoveVb - 24-07-16
هل يمكنك ارسال كود الحفظ
او وضح عنه كيف ستتم طريقة الحفظ
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - soper - 24-07-16
(24-07-16, 11:25 AM)LoveVb كتب : هل يمكنك ارسال كود الحفظ
او وضح عنه كيف ستتم طريقة الحفظ
دي كود الحفظ انت الي ادتهولي هو هيحفظها في اداة ToolStrip1 علي شكل بتون ماشي
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim btn As New ToolStripButton
'خصائص الزر
btn.Text = "vb4arb"
btn.Image = Image.FromFile("مسار الصورة")
'
ToolStrip1.Items.Add(btn) ' إضافته لعناصر الاداة
AddHandler btn.Click, AddressOf OnClickSBtn1 'إنشاء حدث عن الضغط على الزر
End Sub
Sub OnClickSBtn1()
MsgBox("LoveVb")
End Sub
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - LoveVb - 24-07-16
الان فهمت قصدك انتضرني
ملاحظة : نسيت ان اخبرك ان btn.Image = Image.FromFile("مسار الصورة") ليس مهم اذا كنت لا تريد صورة ايضا حتى وان تريد صورة لا تضع مسارها لانه فقط سيشتغل في جهازك ضعها في الResource ثم الكود سيصبح من الريسورس
كود :
اسم الصورة.btn.Image = My.ResourcesRE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - soper - 24-07-16
(24-07-16, 11:46 AM)LoveVb كتب : الان فهمت قصدك انتضرني
ملاحظة : نسيت ان اخبرك ان btn.Image = Image.FromFile("مسار الصورة") ليس مهم اذا كنت لا تريد صورة ايضا حتى وان تريد صورة لا تضع مسارها لانه فقط سيشتغل في جهازك ضعها في الResource ثم الكود سيصبح من الريسورس
كود :
اسم الصورة.btn.Image = My.Resources
الحقيقة مش دي قصدي انت ادتني الكود سليم 100%
انا الي عايزو انو لم يغلق مشروعي الصفحة الي هو حفظها تكون موجود حتي بعد غلق البرنامج جرب المشروع دي وانت هتفهم قصدي
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - LoveVb - 24-07-16
الامر معقد
كنت ساقوم بحفظ عدد الازرار المضافة في ملف نصي مع اسمائها
وعمل حلقة تكرارية للعدد الازرار الموجودة في الملف النصي ووضع اسمائها
لكن المشكلة الاحداث معقده
ان شاء الله يفيدوك الاخوه
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - soper - 24-07-16
(24-07-16, 11:57 AM)LoveVb كتب : الامر معقد
كنت ساقوم بحفظ عدد الازرار المضافة في ملف نصي مع اسمائها
وعمل حلقة تكرارية للعدد الازرار الموجودة في الملف النصي ووضع اسمائها
لكن المشكلة الاحداث معقده
ان شاء الله يفيدوك الاخوه
ما فيش الي غير الطريقة دي انا عيز متصفحي زي كروم لم تحط حاجة في المفضلة وتخرج من المتصفح برضو بتبا موجودة
RE: كيفية عمل اداة المفضلة للمتصفحات المصنوعة علي الفيجوال بيسك - LoveVb - 25-07-16
الحمدلله انتهيت من المشروع
اي استفسار او تعديل في الخدمة
