بسم الله الرحمن الرحيم
ازيكم يا جماعة
كيفية تصميم أداة تصفح مواقع الانترنت خاصة بيك
طبعا الكل يعرف برامج تصفح الانترنت
مثل Internet Ixplorer لشركة مايكروسوفت Microsoft
و Netscape Ixplorer لشركة نيت سكيب Netscape
و FireFox لشركة Firefox
و المتصفح الأخير يعتبر أفضل متصفح من جهة الحماية
طبعا انتم عارفين ان كل متصفح من دول له compiler خاص بالانترنت خاص بيه
يعني ايه
يعني عندكم مثلا موقع انترنت مثلا : www.YourSite.Com/Page.html
المتصفح بيعمل ايه
1 - بيقوم بفتح الصفحة اللي هي page.html أو اي صفحة انت عايز تفتحها بالمتصفح في ملف txt أو باي طريقة
لان انتم عارفين ان صفحات الاتي تي ام ال مفتوحة المصدر
و بعد كده بيعملها عملية Compiling
فبيحول أوامر الاتش تي ام ال الي كائنات Objects
مثلا بيحول وسم أمر Msgbox="أهلا و مرحبا بك " الي صندوق نص يحتوي علي الرسالة " أهلا و مرحبا بك "
و بيحول مثلا الكود
<input type ="Button" name="B1" value="ذر أمر">
فيقوم المتصفح بتوليد ذر أمر علي المتصفح يحمل عنوان "ذر أمر" و الخاصية Name الخاصة بالذر = "B1"
أي كأنك تقوم بتوليد أدوات جديدة عيل الفورم في وقت التشغيل RunTime تبقا لما هو مكتوب في الكود
2 - بعد كده ييجي ايه بأه
عندك في اي متصفح لما تيجي تضغط بالذر الأيمن للفأرة علي الصفحة ( اللي هي في الأصل نعتبرها Usercontrol ) بيعمل عملية كومبايلينج لكود الاتش تي ام ال و يقوم باظهار الكائنات ( اللي هي أدوات ادخال نص - أذرار أمر الخ - صور ) علي الUserControl نفسها ) بتظهر قائمة بها مثلا ( Refresh - View Source - Properties الخ
مثلا احنا صممنا أداة المستخدم UserControl
نعمل فورم جديدة و نسميها مثلا frmMenu و نحط فيها قائمة أول حاجة في القائمة نجليها بعنوان و ليكن File و ال Name = rFile
نيجي في حدث ال MouseDown
نكتب الكود ده
if Button = 2 then
popupmenu frmMenu.rFile
end if
يعني لو ذر الفأرة = 2 ( يعني الذر الأيمن للفأرة)
popupmenu هذا أمر يستخدم لاظهار نافذة منبثقة
و ناخد مسار النافذة المنبثقة من أي فورم و احنا خدناها هنا من frmMenu.rFile
خدناها من النموذج اللي اسمه frmMenu و خدنا القائمة اللي باسم rFile
- و بعد كده الاتيان بكود اي صفحة اتش تي ام ال أو php أو حتي asp يبقي عن طريق
الأداة اللي بتيجي مع الفيجوال بيسيك ستوديو و هو Microsoft Internet Transfer Control
عن طريق الكود ده
txtCode.text = Int1.OpenUrl (www.YourPage.Com/Page.html )
اعذروني اني كتبتلكم بسرعة , بس علشان أديكم فكرة في الأول و بعد كده ابدأ أوريلكم بالتفصيل الممل
علشان نعمل في النهاية أداة تصفح انترنت غير أداة Microsoft Internet Control
أداة تصفح خاصة ببرامجنا نصممها زي ما نحب و نحولها في النهاية لأداة ActiveX Control
نقدر نستخدمها في برامجنا
بس الشرح المرة الجاية هيكون بسيط و سهل و من البداية خالص
شريف
