+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : الأقسام التعليمية - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=90)
+--- قسم : مكتبة أكواد المنتدى (http://vb4arb.com/vb/forumdisplay.php?fid=111)
+---- قسم : مكتبة أكواد .net (http://vb4arb.com/vb/forumdisplay.php?fid=117)
+---- الموضوع : مثال بسيط لتغيير طريقة استخدام اداة العنان Label مع الشرح (/showthread.php?tid=6563)
مثال بسيط لتغيير طريقة استخدام اداة العنان Label مع الشرح - RaggiTech - 20-10-12
كاتب الموضوع : زيـــد
السلام عليكم
السلام عليكم
هذا مثال بسيط جدا ويمكن لاي مبتدئ ان يفهمه بسهولة تامة :
كود :
[color=#000000][COLOR=#0000bb] [/color][color=#007700]private [/color][color=#0000bb]void Form1_Load[/color][color=#007700]([/color][color=#0000bb]object sender[/color][color=#007700], [/color][color=#0000bb]EventArgs e[/color][COLOR=#007700])
{
[/COLOR][COLOR=#ff8000]//بالاول انا سميت الاداة بالتسمية العالمية
//الان نقوم بتغير شكل مؤشر الماوس الى شكل "اليد" هكذا
[/COLOR][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]Cursor [/color][color=#007700]= [/color][color=#0000bb]Cursors[/color][color=#007700].[/color][color=#0000bb]Hand[/color][COLOR=#007700];
}
[/COLOR][color=#0000bb][/color][/COLOR]كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]private [/color][color=#0000bb]void lbl_MouseEnter[/color][color=#007700]([/color][color=#0000bb]object sender[/color][color=#007700], [/color][color=#0000bb]EventArgs e[/color][COLOR=#007700])
{
[/COLOR][COLOR=#ff8000]/*يطلق هذا الحدث عند مرور الماوس على الاداة*/
//الباراميتر الاول يطلب متغير من نوع Font
// الباراميتر الثاني يطلب متغير Enum
[/COLOR][color=#0000bb]Font font [/color][color=#007700]= new [/color][color=#0000bb]Font[/color][color=#007700]([/color][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]Font[/color][color=#007700], [/color][color=#0000bb]FontStyle[/color][color=#007700].[/color][color=#0000bb]Underline[/color][COLOR=#007700]);
[/COLOR][COLOR=#ff8000]//اسناد خاصية Font
//الى الليبل
[/COLOR][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]Font [/color][color=#007700]= [/color][color=#0000bb]font[/color][COLOR=#007700];
[/COLOR][COLOR=#ff8000]//الان تغير لون الخط الحالي للأداة
[/COLOR][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]ForeColor [/color][color=#007700]= [/color][color=#0000bb]Color[/color][color=#007700].[/color][color=#0000bb]Crimson[/color][COLOR=#007700];
}
[/COLOR][color=#0000bb][/color][/COLOR]كود :
[color=#000000][COLOR=#0000bb] [/color][color=#007700]private [/color][color=#0000bb]void lbl_MouseLeave[/color][color=#007700]([/color][color=#0000bb]object sender[/color][color=#007700], [/color][color=#0000bb]EventArgs e[/color][COLOR=#007700])
{
[/COLOR][COLOR=#ff8000]/* يرتبط هذا الحدث مع الحدث السابق ويطلق عند خروج الماوس من محيط الاداة */
// الان نستعيد "الفونت" الابتدائي
[/COLOR][color=#0000bb]Font font [/color][color=#007700]= new [/color][color=#0000bb]Font[/color][color=#007700]([/color][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]Font[/color][color=#007700], [/color][color=#0000bb]FontStyle[/color][color=#007700].[/color][color=#0000bb]Regular[/color][COLOR=#007700]);
[/COLOR][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]Font [/color][color=#007700]= [/color][color=#0000bb]font[/color][COLOR=#007700];
[/COLOR][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]ForeColor [/color][color=#007700]= [/color][color=#0000bb]Color[/color][color=#007700].[/color][color=#0000bb]Black[/color][COLOR=#007700];
}
[/COLOR][color=#0000bb][/color][/COLOR]كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]private [/color][color=#0000bb]void lbl_Click[/color][color=#007700]([/color][color=#0000bb]object sender[/color][color=#007700], [/color][color=#0000bb]EventArgs e[/color][COLOR=#007700])
{
[/COLOR][COLOR=#ff8000]//بحالة ان نص الاداة هو موقع وتريد الذهاب اليه عن طريق المتسفح الافتراضي
[/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Diagnostics[/color][color=#007700].[/color][color=#0000bb]Process[/color][color=#007700].[/color][color=#0000bb]Start[/color][color=#007700]([/color][color=#0000bb]lbl[/color][color=#007700].[/color][color=#0000bb]Text[/color][COLOR=#007700]);
[/COLOR][COLOR=#ff8000]//يقوم هذا السطر بتشغيل URL
//سواء كان موقع انترنت او ملف من الهارددرايف
[/COLOR][COLOR=#007700]}
[/COLOR][color=#0000bb][/color][/COLOR]تحياتي للجميع وبالتوفيق
اخوكم زيد