Ahmed Gamal Technical

مقدمة إلى بايثون

2009-12-22T16:15:00.001-08:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

خضت في الفترة الماضية تجربة بسيطة مع python على ububto 11 ، وكانت تجربة جيدة ، لذا أحببت أن أشارككم بها هنا ، لمستخدمي لينكس الموضوع بسيط لكن بالنسبة لمستخدمي ويندوز هناك ironpython ولكن لم أجرب العمل عليه .

بداية :

تصنف البايثون تحت تصنيف لغات البرمجة ال Dynamic ، حيث لا تشترط تعريف للمتغيرات ولا تحديد أنواع البيانات وخلافه ، مناسبة جداً لتطوير أي سكربتات سريعة ، سهلة جداً وستجد ملايين المصادر لها عبر الإنترنت لعمل كل شيء تقريباً .

كيف أحمل البايثون :

في اوبنتو ستجد أغلب البرامج التي تطلبها موجودة في System->Administration->Synaptic Package Manager :

الآن تحتاج لاضافة مكتبات البايثون ، يمكنك اختيارها من البرنامج أو يمكنك تحميلها من خلال ال Terminal بالأمر التالي :

sudo apt-get install python

الآن بامكانك البدء مباشرة ، أو يمكنك تحميل برمجيات اضافية مثل netbeans المخصص أصلاً للجافا ، لكنه سيوفر لك عدة خصائص مثل الإكمال التلقائي وغيره ، يمكنك تحميل برامج أخرى لتصميم الواجهات بالبايثون وخلافه ولكنها أمور متقدمة .

برنامجي الأول :

بعد أن تكون قد قمت بتحميل مكتبات البايثون ، ومن خلال Terminal قم بكتابة الأمر التالي :

python

ثم جرب كتابة كودك الأول بالشكل التالي ثم اضغط انتر :

s='Welcome Ahmed';
print s

والنتيجة :

وللخروج اطبع exit().

احفظ ملفاتك :

يمكنك فتح ملف نصي جديد وكتابة نفس الأوامر فيه ، ومن ثم حفظه بامتداد .py .

في هذه الحالة ومن التيرمنال يمكنك الوصول للملف

cd /home/ahmed/Desktop

ومن ثم :

python a.py

وستؤدي نفس النتيجة ، فقط ستحصل على الأكواد ملونة

اللغة :

الآن وبعد أن قمت بكتابة برنامجك الأول لزمك التعرف على عالم لغة البايثون ، البايثون لغة متقدمة جداً وتحتوي على كل ما تعرفه في اللغات الأخرى بدءاً من الشروط وحلقات التكرار وانتهاء بالبرمجة كائنية التوجه OOP بالاضافة لاحتوائها على عدد ضخم من الدوال الجاهزة ، لذا لن أستطيع أن أشرح لك كل هذا ، في هذه العجالة فقط سأذكر لك عناصر اللغة الأساسية ، فقط قبل البدء علي تنبيهك أن عدد المسافات في بداية كل سطر ستحدد بداية ونهاية الشروط وخلافه ، ستتعرف على هذا الأمر بصورة أوضح في طريقة كتابة الشروط :

الشروط :

x = int(raw_input('Enter Number : '))
if x == 100:
     print '100%'
elif x < 50:
     print 'So bad :('
else:
     print 'it is ok.'

حلقات التكرار :

# exit from loop if x=10
while running:
    x = int(raw_input('Enter Number : '))
    if x == 10:
             print 'it is exit now'
             running = False
else:
    print 'The while loop is over.'

تعريف الدوال

   def funcHello():
       ‫‪print 'Hello'
‬‬
   ‫‪funcHello()

ماذا عن تصميم الواجهات :

يمكنك استخدام برامج خارجية لتصميم الواجهات ، هذا الرابط مفيد جداً :

http://arabicfoss.blogspot.com/2009/01/pyqt4.html

لكن لو احببت البدء بالموضوع من البداية ، فأول ما ستحتاج إليه هو استخدام مكتبة رسوميات مناسبة ، هذه المكتبة مثال pygtk .

الآن لنجرب هذا الكود مثلاً - منقول من كتاب لتصميم الواجهات - :

import pygtk;
pygtk.require('2.0');
import gtk;
def delete_event(widget,data):
     False;
def destroy(widget,data=None):
     gtk.main_quit();
window = gtk.Window(gtk.WINDOW_TOPLEVEL);
window.set_title("Hello");
window.connect('delete_event',delete_event);
window.connect('destroy',destroy);
hello_world_button = gtk.Button("Hello");
hello_world_button.show();
window.add(hello_world_button);
window.show();
gtk.main();

الآن جرب وطالع النتيجة .

يمكنك البدء لاحقاً ببرمجة الأحداث وربطها ، ربما نشرحها في مرات قادمة بالتفصل .

والويب :

تحتاج لاستخدام framework خاص بالويب ، أشهرها هو django ، يمكنك البدء من هنا :

http://wiki.python.org/moin/WebFrameworks

مصادر :

وجدت عدة مواقع باللغة الإنجليزية وكتب تشرح البايثون ، لكن باللغة العربية لم أعثر على أفضل من هذا الكتاب :

http://www.maastaar.com/books/pygtk/Building-Applications-With-PyGTK-and-SQLite.pdf

شكراً لكاتبه وجعل الله جهده في ميزان حسناته .

ختام :
كل الشكر لمحمد نبيل على تعبه معي الفترة الماضية

والسلام عليكم ورحمة الله وبركاته .

كتاب .net 2008 بصورة ورقية – تجربة النشر الحر

2009-12-04T02:37:00.001-08:00

منذ بضعة أسابيع ، قرأت كتاباً نشره الأستاذ رؤوف شبايك بعنوان ( انشر كتابك بنفسك ) والموجود على هذا الرابط ( انشر كتابك بنفسك )

يشرح مؤلف الكتاب طريقة استخدام موقع Lulu.com للنشر الحر لمؤلفاتك وكتبك ، حيث يتيح لك الموقع امكانية نشر كتابك ووضع الدعاية من أجله ، وعرضه للشراء حيث سيتولى عنك عملية الطباعة والتوصيل إلى المشتري ، كل هذا بخطوات سلسلة وميسرة جعلت فكرة النشر الإلكتروني فكرة ميسرة جداً وأفضل - خصوصاً لأي مبتدئ - من مجرد التفكير في الركض وراء دور النشر .

واجهتني في بداية العمل مشكلة ، وهي أننا فقدت النسخة التي تم تحويلها إلى ملف pdf ، ولم يكن لدي سوى نسخة قديمة دون أي إخراج ، لذا بدأت من البداية في تقليد الاخراج الذي قام به الأخ وليد ، وبالرغم من ذلك لم أستطع الوصول لنفس المستوى ، الأكواد غير ملونة كما في الإصدار الأول ، ولكني أضفت بعض التعديلات والتنقيحات إلى الكتاب .

وبالفعل بدأت في الإجراءات التي نصح الكاتب بالسير عليها ، والمحصلة النهائية ، ها هو كتابي جاهز للطبع :
http://www.lulu.com/content/hardcove...y-step/8016570

الخلاصة ، تجربة مميزة جداً لتحصل على كتابك مطبوعاً بين يديك أكثر منها تجربة لتحقيق الربح من الكتابة ، فالاستاذ رؤوف شبايك نفسه يدرك أن تجربة النشر الالكتروني للكتب العربية ما زالت في مراحلها الأولى ، ولهذا السبب لم يتم طلب سوى عدد يسير جداً من كتبه ، لكن تجربة أن تمسك بكتابك بين يديك تعطيك دفعة معنوية جيدة ، بالاضافة لشعورك بأنك تساهم ولو بنزر يسير في تعميق هذه التجربة في العالم العربي والتي بدورها ستساهم في زيادة عدد الكتاب العرب الذين أرهقتهم مطالب دور النشر المختلفة .

الكتاب مجاني أيضاً حتى في نسخته المطبوعة ، حيث أن التكاليف المعلن عنها ضمن موقع لولو هي تكاليف الطباعة التي سيتحصل عليها الموقع جراء الطباعة ، بالاضافة لتكاليف الشحن والتي سيخبرك بها عند بدءك في عملية الشراء .

لذا لو كنت تود الحصول على نسخة الكترونية فهذا رابط النسخة القديمة من الكتاب ذات الإخراج المتميز :
http://vb4arab.com/dotNet_2008.zip
أما لو كنت مصر على الحصول على النسخة بعد التعديلات فإليك هذه النسخة للتحميل :
http://www.4shared.com/file/164058191/5beddfb0/net_2008_2nd.html
وأخيراً ، هذا هو رابط الكتاب على موقع Lulu :
http://www.lulu.com/content/hardcove...y-step/8016570

كيف أشتري من موقع لولو ؟

باستخدام الرابط السابق ، أو من القائمة العلوية Buy والتي تتيح لك البحث بين الكتب واختيار الكتاب الأنسب لك .
http://www.lulu.com/content/hardcove...y-step/8016570

إذا قمت بالضغط على الرابط السابق ، ستجد في الأعلى Add To Cart ، سعر الكتاب 30.10 دولار وهو تكلفة طباعة 604 ورقة مع غلاف من النوع الفاخر يتحصل عليها موقع لولو مقابل عملية الطباعة ، ستتم اضافتها لسلة التسوق ، بعد انتهائك من التسوق ستجد زر باسم Check out >>> ، سيطلب منك تسجيل ايميلك وكلمة مرور خاصة بك ليتم طلبك كعضو جديد أو سجل دخولك بعضويتك الحالية .

بعد ذلك سيخيرك بين نوعين من الشحن ، من حسابي في جدة - المملكة العربية السعودية يكلفني الشحن حوالي 11 دولار ، ومن المفترض أن يتم الشحن خلال 5-7 ايام ، إلا أن الأستاذ رؤوف ذكر في كتابة أن الأمر قد يطول بالشحن لاسبوعين أو ثلاث بالاضافة لأسبوع للطباعة ، عموماً انا ما زلت اجرب الطلب للمرة الأولى ولا أعرف كم سيستغرق الكتاب للوصول فعلياً .

بعد الضغط على save & continue سينقلك إلى شاشة الدفع الالكتروني ، ادخل بياناتك وسيتم التأكيد وانهاء العملية ، والآن عليك انتظار النسخة

في النهاية ، أنا ما زلت حتى الآن في انتظار نسختي من هذا الكتاب ، سأوافيكم بتقرير عن وقت الوصول وجودة الطباعة فور وصول أول نسخة إن شاء الله .

عن الكتاب :

يقدم الكتاب للنسخة الجديدة من فيجوال ستوديو من خلال C# و Vb.net عبر 22 باباً تتحدث عن الفيجوال ستوديو ابتداء باصدارته وطرق تحميله ، مروراً بعرض مفاهيم بيئة .net الرئيسية ، أساسيات كتابة الكود ولغة البرمجة ، Classes And Interfaces ، الأخطاء Debuginig ، المجموعات COLLECTIONS ، وسائل الادخال والاخرج IO ، واجهات Windows Forms ، عالم GDI+ و WPF ، قواعد البيانات من خلال ADO.net ، ثم LINQ و WWF و WCF وبرمجة ال Pocket PC ثم الانتهاء بالاطلاع على برمجة المواقع من خلال ASP.net .

تعقيب بعد استلام الكتاب :

للأسف بعد الانتهاء من كافة الخطوات واجهت مشكلة في دعم اللغة العربية عندهم ، حيث قاموا بطباعة الكتاب بالمقلوب برغم أني التزمت بارساله لهم معكوساً لكي تتم الطباعة بصورة صحيحة ، لكن برغم ذلك يبدو انهم اجتهدوا واعادوا ترتيب الكتاب حسب ارقام الصفحات ، وبعد عدة مراسلات توقف الدعم نسبياً منهم برغم اقرارهم بإن الخطأ من جهتهم . لذا وجب التنويه .

مدونة جديدة باللغة الإنجليزية

2009-10-31T17:51:00.001-07:00

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

تم بحمد الله افتتاح مدونة أخرى تقنية باللغة الإنجليزية على هذا الرابط

http://ahmedgamal-net.blogspot.com/

الهدف من المدونة هو نوع من تحقيق الاستفادة لعدد أكبر من المبرمجين ، أو هي محاولة لدخول هذا العالم والتحدث إليه بلغته التي يفهمها ، شجعني على هذا القرار الأستاذ تركي العسيري والذي اتخذ قراراً مماثلاً منذ فترة ربما كنت من المعارضين له حتى أقتنعت بوجهة نظره بالكامل

ستظل هذه المدونة تعمل بالتوازي مع المدونة الإنجليزية

وبالله التوفيق

عمل تطبيق Asp.net من البداية وحتى رفع الموقع - ملف فيديو

2009-09-17T17:31:00.000-07:00

بسم الله الرحمن الرحيم .

بالاشارة إلى الإعلان السابق ، وضمن فعاليات اليوم المميز الذي اختتم في المنتدى على هذا الرابط :http://vb4arab.com/vb/forumdisplay.php?f=122

تم تجهيز خطوة بخطوة عمل تطبيق Asp.net ، التطبيق لموقع قديم على شكل مستعرض منتجات بسيط .

لغة الموقع : Asp.net من خلال .net 2008 .

إذا كانت هذه المرة الأولى التي تجرب فيها تصميم الويب ، فمن المفضل الإطلاع على بعض الدروس المبدئية قبل مشاهدة الفيديو :

http://vb4arab.com/vb/showthread.php?t=18391 - http://vb4arab.com/vb/showthread.php?t=18397 - http://vb4arab.com/vb/showthread.php?t=18454 - http://vb4arab.com/vb/showthread.php?t=18528 - http://vb4arab.com/vb/showthread.php?t=18573 - http://vb4arab.com/vb/showthread.php?t=18586

النقاط التي تم شرحها في الفيديو :

1- انشاء قواعد البيانات والعلاقات .

2- انشاء Stored Procedure.

3- انشاء طبقات البيانات .

4- انشاء الماستر بيدج .

5- البدء بانشاء الصفحات .

6- انشاء Custom Control.

7- التعامل مع بعض الادوات .

8- نشر الموقع على مستضيف مجاني .

الفيديو التعليمي هنا :

http://vb4arab.com/vb/popup/Final.html

وذلك على مدار ساعة كاملة ، من المفترض بعدها أن تكون قادراً على تصميم تطبيق Asp.net متكامل .

التطبيق النهائي هنا :

http://aspspider.info/ahmedgamal2/

لتحميل المشروع النهائي - سورس كود - :

http://www.vb4arab.com/vb/uploaded/3/01250221571.rar

ملف قاعدة البيانات :

http://www.vb4arab.com/vb/uploaded/3/01250583424.rar

** هناك بعض المشاكل في التسجيل الصوتي لذا هذا التسجيل الصوتي مؤقت ، وسيتم اعادة التسجيل قريباً إن شاء الله .

خطوات رفع الموقع على مستضيف مجاني Aspspider بعد الإنتهاء :

- ادخل إلى موقع Aspspider.net .

- قم بانشاء حساب جديد .

- سيتم تفعيل اشتراكك بعدها بحدود الساعة أو الساعتين .

- عند تسجيل الدخول بعد هذه الفترة ، ستجد لديك الصورة التالية :

- اختر مركز لوحة التحكم ، رفع الملفات ، ثم webroot ، وقم برفع ملفاتك واحد تلو الآخر .

- بعد الإنتهاء ، عد مرة أخرى إلى مركز رفع الملفات ، ثم Database ، ومن ثم قم برفع ملف قاعدة البيانات mdf فقط لو سكول أو mdb لو أكسيس .

- بعد الانتهاء عد مرة أخرى إلى لوحة التحكم ، واختر Database Manager .- ستجد قاعدة بياناتك التي قمت برفعها موجودة ، اضغط Attach Database ، واتبع الخطوات .

- بعد الانتهاء ، ادخل على الرابط التالي ، قم بتعديل ال Connection String الخاصة بك في web.config للطريقة الموضحة في هذه الصفحة :

- مبروك ، جرب الدخول إلى موقعك :)

بالتوفيق للجميع ...

الجديد في C# 4.0

2009-09-17T17:10:00.000-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

ما الجديد في C# 4.0 ؟

في الوقت الذي لا زلنا نحارب من أجل انتقال البعض إلى تقنية الدوت نت ، ما زالت عجلة التطور مستمرة ، وكل يوم نجد تقنية جديدة واصدار جديد ، سنحاول في هذه المقالة السريعة التعرف على بعض النقاط التي سنجدها مع C# 4.0 .
الخصائص الاضافية مقسمة لاربع اقسام رئيسية هي :

1- البارميترات الاختيارية Optional Parameters.
2- استخدام Dynamic - Dynamic Support
3- التعامل مع COM - COM interop.
4- Variance.

1- البارميترات الاختيارية Optional Parameters :

أخيراً في سي شارب ، أصبح بامكانك وضع قيم افتراضية للبارميترات بعد أن كانت هذه الخاصية متاحة فقط في vb.net :

public void functionname( string param1="Ahmed", bool param2 = false, int param3 = 24 ){

}

*** تسمية المتغيرات عند الإرسال Named Parameters :
في المثال السابق ، لنفترض اننا نريد الاستفادة من الخاصية الافتراضية للمتغير المنطقي param2 ولكننا نريد ارسال قيمة رقمية ل param3 بالشكل التالي

functionname("Ali",25);

الجملة السابقة للاسف خاطئة ، لإنها سترسل 25 في البارميتر الثاني وتفترض أن البارميتر الثالث هو من لم يتم تمريره .
لحل هذه المشكلة ، يمكننا كتابة اسم البارميتر حالة الإرسال بالشكل التالي :

functionname("Ali",param3: 25);

2- استخدام Dynamic - Dynamic Support

لنفترض أن لدينا دالة نرسل لها متغير معين فتعين لنا إما كائن من نوع طالب ، أو كائن من نوع مدرس ، بالشكل التالي مثلاً :

public object functionname(param a){if(a==0) return new Student();else return new teacher();}

الآن ، لو كان لهما خاصية مشتركة FirstName ونريد تعديلها بناء على الدالة التي تمت اعادتها ، فلدينا الحل التالي :

if(condition==0){Student s=functionname(condition) as Student;s.FirstName="Ahmed";}else{Teacher s=functionname(condition) as Teacher s.FirstName="Ahmed";}

الحل البديل الآن مع dynamic ، يمكنك كتابة الكود السابق بالشكل التالي :

dynamic s=functionname(condition) s.FirstName="Ahmed";

وفي حالة عدم وجود الخاصية بصورة مشتركة ، فسيتم رمي الاستثناء RuntimeBinderException
كما يمكنك لاحقاً اعادة تعيينها إلى Class معين بالشكل التالي :

Student newone=s;

*** أي قيمة byref عائدة من dynamic سيكون نوعها dynamic أيضاً .

3- التعامل مع COM - COM interop.

باستخدام نفس الميزة الجديدة dynamic ، اصبح التعامل مع ال COM Components أسهل وأسرع .
ابسط مثال على ال Com Components هي ادوات التعامل مع مجموعة برامج الاوفيس Ofice ، سابقاً كنا نكتب كود كالتالي للقراءة من خلية اكسل :

((Excel.Range)excel.Cells[1, 1]).Value2 = "Hello";

الجديد الآن ، هذا السطر كافي :

excel.Cells[1, 1].Value = "Hello";4- Variance

لو فرضنا أن لدينا الكود التالي :

IList strings = new List();IList<object> objects = strings;

في الواقع وعلى الرغم من ان أي String هو Object ، إلا أن الجملة السابقة ليست صحيحة بسبب أن String لا يحتوي على نفس عناصر ال Objects . مثال ذلك :

objects[0] = 5;string s = strings[0];

هذه الجملة خاطئة ، وادخالنا ل 5 كرقم واعادتها كنص يعد خرقاً لقواعد الأمان ، فقط باستخدامنا الانترفيس Interface التالي في C# 4.0 يمكن أن نمنع المستخدم من ادخال بيانات خاطئة :

IEnumerable<object> objects = strings;

والذي يتم تعريفه في C# 4.0 بالشكل التالي :

public interface IEnumerable : IEnumerable{ IEnumerator GetEnumerator();}public interface IEnumerator : IEnumerator{ bool MoveNext(); T Current { get; }}

أخيراً : العلاقة مع فيجوال بيسك - التحديثات الجديدة - :

1- خاصية القيم الافتراضية للبارميترات موجودة منذ زمن في الفيجوال بيسك .
2- بالنسبة لـ Variance و dynamic فتم تطبيقهم في نفس الوقت للغتين .

للاستزادة :
http://code.msdn.microsoft.com/Proje...ownloadId=3550

والسلام عليكم ورحمة الله وبركاته .

تم تحديث جميع الروابط

2009-09-17T17:09:00.000-07:00

تم تحديث جميع الروابط ، ومعذرة على التأخير .

خطوة بخطوة مع .net 2008

2008-11-19T14:52:00.001-08:00

بسم الله الرحمن الرحيم .

بحمد الله تم الانتهاء من كتاب خطوة بخطوة مع عالم Visual Studio 2008 .

يقدم الكتاب للنسخة الجديدة من فيجوال ستوديو من خلال C# و Vb.net عبر 22 باباً تتحدث عن الفيجوال ستوديو ابتداء باصدارته وطرق تحميله ، مروراً بعرض مفاهيم بيئة .net الرئيسية ، أساسيات كتابة الكود ولغة البرمجة ، Classes And Interfaces ، الأخطاء Debuginig ، المجموعات COLLECTIONS ، وسائل الادخال والاخرج IO ، واجهات Windows Forms ، عالم GDI+ و WPF ، قواعد البيانات من خلال ADO.net ، ثم LINQ و WWF و WCF وبرمجة ال Pocket PC ثم الانتهاء بالاطلاع على برمجة المواقع من خلال ASP.net .

تحميل الكتاب من هنا

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

والله الموفق ...
والسلام عليكم ورحمة الله وبركاته .

باقي من الزمن

2008-11-09T11:44:00.001-08:00

بعد ما لاقيت نفسي قربت اخلص الجيش - إن شاء الله - وبعد ما شفت برنامج كان عامله أحمد عيسوي بيفكر الناس بمواعيد الصلاة عن طريق تغيير ال Personal Message أوقات الأذان ، جاتلي فكرة إني أعمل برنامج صغنون كده يحسب اللي باقي ليا في الجيش باليوم والساعة والدقيقة والثانية ويعرضه عندي في ال Personal Message ثانية بثانية .

تحميل نسخة exe + السورس

مقعد ؟؟؟ ممكن معقد بس أكيد مش لدرجة إني أعد بالثواني أكيد :) ، لكن قلت اهوه اعمل حاجة ليها علاقة بالجيش ، اصلي شفت برنامج حلو برضو اتعمل على شكل Gadgets طبعاً برنامج معقد أكتر ، دي صورة منه :

هو البرنامج التاني حجمه كبير شوية فمقدرتش ارفعه على النت ، بس لما اقدر ارفعه هبقى انزل اللينك بتاعه إن شاء الله ...

*** علشان البرنامج يشتغل لازم تغير خاصية في MSN Options اسمها Show song Information form Windows Media Player as a personal message إلى صح علشان الرسالة تتعرض .

** وطبعاً مننساش ان يكون في .net framwork على الجهاز علشان ال exe يشتغل .

برمجة :

الموضوع بسيط جداً ، في كلاس اسمه Microsoft.Win32 هنضيفه عندنا ، وبعدين نكتب الفنكشن دي :

private void SendMSNMessage(bool enable, string category, string message)
{
try
{

string buffer = "\\0" + category + "\\0" + (enable ? "1" : "0") + "\\0{0}\\0" + message + "\\0\\0\\0\\0\0";
int handle = 0;

data.dwData = 0x0547;
data.lpData = VarPtr(buffer);
data.cbData = buffer.Length * 2;

handle = FindWindowEx(0, handle, "MsnMsgrUIManager", null);
if (handle > 0)
SendMessage(handle, WM_COPYDATA, 0, VarPtr(data));
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}

وبس ، وبعد كده علشان نظهر اي رسالة هنكتب :

SendMSNMessage(true, "Office", myString);

وعلشان نلغيها نكتب :

SendMSNMessage(false, "Office", "");

بعد كده برنامج عادي طرحت الوقت الحالي من الوقت اللي اليوزر بيدخله في DateTimePicker ، وصلى الله وبارك ...

يا ريت تدعولنا الأيام اللي فاضلة لينا تعدي على خير إن شاء الله ...

دورة ASP.net 3.5

2008-10-20T12:09:00.000-07:00

تفاصيل الدورة هنا

http://vb4arab.com/vb/showthread.php?p=136257

مدخل إلى WAP

2008-08-25T06:37:00.001-07:00

مقدمة :
في هذا الدرس ، سوف نتعرف سوية على التقنية المعروفة باسم Wireless Application Protocol والتي تعرف اختصاراً باسم WAP ، كما سنتطرق في الجزء الثاني من هذا الدرس إلى كيفية التعامل مع هذه التقنية من خلال .net .

الجزء الأول من الدرس : تعريف بالتقنية ...

تطبيقات الموبايل Mobile Application :
لم يعد الموبايل وسيلة اتصال بسيطة لاجراء المكالمات الهاتفية مثلما كان الهدف منه وقت ظهوره ، إنما تطور الأمر الآن ليصبح الموبايل وسيلة خدمية وترفيهية وتعليمية أيضاً ، ولم يعد الموبايل يستخدم من أجل المكالمات بل أصبح يستخدم في الدخول على الانترنت واستخدام التطبيقات المتقدمة والملتيميديا وغيرها .
ولهذا السبب وغيره ظهرت مصطلحات جديدة لتدل على تطبيقات الموبايل وبرامجه ونظم التشغيل الخاص به ، وكان من ضمن هذه المصطلحات مصطلح WAP مردافاً لمصطلح WEB على الحاسبات الشخصية والذي يرتبط بعالم الإنترنت وخدماته .

ما هو ال WAP ؟
كما اسلفنا سابقاً فكلمة WAP هي اختصار لكلمة Wireless Application Protocol ، وكما هو واضح من الاسم فإن هذا يعني ان WAP هي معيار أو Standerd عالمي يهدف إلى ربط أجهزة الهواتف النقالة Mobiles بالإرتباط بالإنترنت ، وتم تطويره في النصف الثاني من تسعينات القرن المنصرم .
وقد جاء هذا البروتوكول الموحد ليلم شتات أفكار شركات المحمول الكبرى والتي كانت كل منها تعمل منفردة وفي اتجاه مختلف عن الآخرين .

....

كيف تعمل WAP ؟
تتميز WAP عن WEB بأنها تعمل في اطار امكانيات الهواتف المحمولة ، وهذا ما يستلزم بالضرورة تصغير حجم البيانات والتعامل مع ضعف السرعة وضعف قدرات المعالجات الخاصة بالأجهزة المحمولة مقارنة بالأجهزة الشخصية وصغر حجم الشاشة التي يتم عرض البيانات من خلالها أيضاً .
ومن خلال تقنية ال WAP تم لم شمل شتات شركات المحمول الكبرى والتي كانت كل منها تسير فريدة في اتجاه مختلف سعياً لادخال خدمات الانترنت على أجهزتها المحمولة .

وتبدأ قصة ال WAP من خلال طلب العميل ل URL معين لصفحة ما أو لملف وخلافه ، وفي حالة طلب صفحة فإنه يتم ترجمة HTML إلى WML وهي طريقة عرض مناظرة لل HTML يتم استخدامها ضمن بروتوكول ال WAP وسوف نشرحها في الفقرة التالية ...
والجدير بالذكر أن بعض الهواتف المحمولة أصبحت تدعم HTML أيضاً ...

ما هي WML ؟
هي طريقة لوصف البيانات مشابهة جداً لطريقة عمل HTML ولكنها على معايير XML ، وتختلف عن HTML في عدد من النقاط منها :
- الوسم Tag الرئيسي هو <wml> بدلاً من <html>
- ينقسم المستند إلى بطاقات Cards لتسهيل العرض حيث تبدأ كل بطاقة بـ <card> وتنتهي أيضاً بـ <card/> .

الجزء الثاني من الدرس : تعليم WML باختصار ...

بداية سنعرض مثالاً يوضح كيفية كتابة WML وذلك بالشكل التالي مثلاً - من ويكيبديا - :

<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//PHONE.COM//DTD WML 1.1//EN"
"http://www.phone.com/dtd/wml11.dtd" >
<wml>
<card id="main" title="First Card">
<p mode="wrap">This is a sample WML page.</p>
</card>
</wml>

قراءة القيم المختلفة وتخزينها وعرضها للمستخدم :
بكل بساطة يمكنك تعريف المتغيرات واسناد قيم لها بالشكل التالي :

ولاحقاً يمكنك عرضها بالشكل التالي مثلاً :

<p>First Name: $(First_Name)</p>

ويمكن ايضاً قراءة قيمة مربع نص أو Select بنفس الطريقة تماماً حيث يتم وضع اسم الأداة بدلاً من اسم المتغير ...
مثال لقراءة قيم أداة اختيار وعرضها للمستخدم - المثال منقول من موقع فرعون - :

<card id="card1" title="Tutorial">
<do type="accept" label="Answer">
<go href="#card2"/>
</do>
<p>
<select name="name">
<option value="HTML">HTML Tutorial</option>
<option value="XML">XML Tutorial</option>
<option value="WAP">WAP Tutorial</option>
</select>
</p>
</card>
<card id="card2" title="Answer">
<p>
You selected: $(name)
</p>
</card>
</wml>

الجزء الثالث والأخير من الدرس : أريد برمجة موقع ASP.net يدعم ال WAP ...

إذا قمنا بتحويل التطبيق الذي عرضناه في أول المقالة - المنقول من ويكيبيديا - والذي كان بالشكل التالي :

وقمنا بتحويله إلى .net فسوف يكون بالشكل التالي :

<%@ Page Inherits="System.Mobile.UI.MobilePage" Language="C#" %>
<%@ Register TagPrefix="mobile" Namespace="System.Mobile.UI" %>
<mobile:Form runat="server">
<mobile:Label runat="server">
This is a sample WML page.
</mobile:Label>
</Mobile:Form>

في حالة رغبت في التعامل بواسطة VB.net غير السطر الأول فقط ليصبح بالشكل التالي :

<%@ Page Inherits="System.Mobile.UI.MobilePage" Language="C#" %>

والآن عند طلب الصفحة من قبل العميل ، يتم أولاً تحويل الصفحة إلى wml في حالة كان الطلب من جهاز هاتف محمول ، أو يتم التحويل مباشرة إلى HTML في حالة طلب الموقع من جهاز شخصي أو كومبيوتر كفي .

كان هذا أبسط مثال لتطبيق WAB من خلال .NET ، ولكن ما زال بامكانك عمل الكثير في هذا المجال في موضوع برمجة الموقع عموماً ، وفي التعرف على الأجهزة الزائرة وامكانياتها وغير ذلك من الخيارات المتقدمة خصوصاً .

Expression Blend

2008-08-23T14:52:00.001-07:00

ضمن التقنيات الجديدة التي ظهرت مع .net كانت تقنية WPF ، ومن اجل تطبيق اوسع لهذه التقنية قامت مايكروسوفت بتوفيرمجموعة من البرامج لتساعد في انتاج أكواد WPF ، واحد من هذه المجموعة كان Expression Blend لتصميم واجهات برنامجك المختلفة ، حيث يوفر لك وسائل متعددة للتصميم ، سنحاول معرفة المزيد عنه بتفصيل في هذا الدرس ...

سنحاول الآن عمل تطبيق بسيط من خلال Expression Blend قم بتحميله أولاً من الروابط السابقة ، قم بتشغيله ومن ثم اختيار New Project ومن ثم WPF Application (*.exe) بالشكل التالي :

يمكنك اختيار اللغة التي تريد العمل عليها وال framework اضافة للاسم ومكان التخزين بالطبع .
من View اختر Active Document View ومن ثم اختر الوضع Split لتتمكن من عرض XAML و العرض العادي في نفس الوقت بالشكل التالي :

على جانب الشاشة ، ستجد كل الأدوات التي تحتاج إليها للتصميم سواء القلم والفرشاة وخلافه ، أو أزرار الأوامر ومربعات النصوص وخلافه من الأدوات التي ستستخدمها في برنامجك ، ايضاً يمكنك الضغط على آخر عناصر القائمة ليستعرض لك جميع الأدوات بالشكل التالي مثلاً :

خلال عملياتك في الرسم ، ستجد لأي اداة مجموعة من الخصائص على الجانب ، تستطيع منها التحكم بالمظهر وخلافه :

الآن كتطبيق سريع ، قم باضافة Canvas وقم بتحديد ابعاده ، هذا هو ال Canvas الذي سنضع فيه صورة خاصة بنا ونطبق عليها بعض التأثيرات :

الآن قم باضافة MediaElement ولنضع فيه صورة مثلاً ، سيكون ناتج XAML بالشكل التالي :

<MediaElement x:Name="MainImage" Source="c:/example/futex.jpg" Width="300" Height="300" ></MediaElement>

والآن سنقوم بتطبيق بعض التأثيرات على ال Canvas حيث نطبق عملية الميل من خلال الخصائص ، سيكون ناتج XAML بالشكل التالي :

<Canvas.RenderTransform><TransformGroup>
<SkewTransform x:Name="MainSkewTransform" AngleY="-19" AngleX="0" CenterX="0" CenterY="0"/> <ScaleTransform x:Name="MainScaleTransform" ScaleY="1" ScaleX = "1" CenterX="0" CenterY="0"/></TransformGroup></Canvas.RenderTransform></Canvas>

الآن قم بالضغط على F5 لتجربة العرض والذي سيكون بالشكل التالي :

سنحاول تطبيق نظرية الظل للصورة أيضاً ، لذا سنقوم بعمل Canvas ونضع فيه الصورة أيضاً ولكن مع زوايا ميل مختلفة هذه المرة بحيث تحاذي اطراف الصورة ، سيكون ناتج XAML بالشكل التالي :

<Canvas x:Name="ReflectionImageCanvas" Canvas.Left="260" Canvas.Top="640">

<MediaElement x:Name="ReflImage" Source="c:/example/futex.jpg" Width="300" Height="300" Volume="0">

</MediaElement>

<Canvas.RenderTransform>

<TransformGroup>

<SkewTransform x:Name="ReflectionSkewTransform" AngleY="19" AngleX="-41" CenterX="0" CenterY="0" />

<ScaleTransform x:Name="ReflectionScaleTransform" ScaleY="-1" ScaleX="1" CenterX="0" CenterY="0" />

</TransformGroup>

</Canvas.RenderTransform>

</Canvas>

وسيكون الناتج للصورة بالشكل التالي :

آخر نقطة سنتعامل معها هي اضافة الشفافية لصورة الظل ، من ضمن الخصائص أيضاً ، لذا ستجد ناتج ال XAML في النهاية بالشكل التالي :

<Canvas x:Name="ReflectionImageCanvas" Canvas.Left="260" Canvas.Top="640">

<MediaElement x:Name="ReflImage" Source="c:/example/futex.jpg" Width="300" Height="300" Volume="0">

</MediaElement>

<Canvas.RenderTransform>

<TransformGroup>

<SkewTransform x:Name="ReflectionSkewTransform" AngleY="19" AngleX="-41" CenterX="0" CenterY="0" />

<ScaleTransform x:Name="ReflectionScaleTransform" ScaleY="-1" ScaleX="1" CenterX="0" CenterY="0" />

</TransformGroup>

</Canvas.RenderTransform>

<Canvas.OpacityMask>

<LinearGradientBrush StartPoint="0.5,0.0" EndPoint="0.5,1.0">

<GradientStop Offset="0.345" Color="#00000000" x:Name="ReflGradientStop1" />

<GradientStop Offset="1.0" Color="#CC000000" x:Name="ReflGradientStop2" />

</LinearGradientBrush>

</Canvas.OpacityMask>

</Canvas>

قم بضبط بعض اعدادات ال Left وال Top يدوياً او من الكود لجعل صورة الظل منطبقة على الصورة الاصلية ، سيكون ناتج الصورة :

الكود الكامل XAML :

لا تنس ان MediaElement يمكن ان تكون اي شيء ، لذا جرب مثلاً وضع فيديو وستجد ان نفس التأثير ينطبق عليه تماماً ...
طبعاً يمكنك نقل الكود كما هو إلى الفيجوال ستوديو وسيعمل بنفس الصورة ، انشأ مشروع من نوع WPF وجرب .

بالتوفيق ...

مدخل إلى برمجة ال Pocket PC من خلال .net

2008-08-23T14:15:00.001-07:00

سوف نعتبر هذا الدرس هو نقطة الإنطلاق التي يستطيع المبتدئ من خلالها البدء في برمجة الأجهزة الكفية Pocket PC .

قبل البداية ، ما هي الأجهزة الكفية Pocket PC ؟
هي مجموعة من أجهزة الهواتف المتنقلة تتميز باستخدام نظام تشغيل متقدم اضافة إلى هاردوير يمكنها من تشغيل مهام هذا النظام ، ويشكل نظاما التشغيل Windows Mobile ونظام التشغيل سيمبان اضافة لنظام Windows CE 2003 وما قبله أشهر نظم التشغيل التي تعمل على الأجهزة الكفية .
أما على صعيد الهاردوير فالأجهزة الكفية لا تمتلك هارد ديسك Hard Disk بالمعنى المشهور ، لكن بعضاً منها يستخدم جزء من ال RAM كهارد ديسك لا يتم مسح البيانات من عليه بعد اعادة تشغيل الجهاز ، وهناك أنوع أخرى تستخدم ROM لتخزين البرامج ونظام التشغيل وما شابه .

وماذا يمكنني عمله للأجهزة الكفية Pocket PC من خلال .net ؟
تستطيع من خلال لغة البرمجة اضافة برامج تستخدم أجزاء معينة من الجهاز لتحقيق خدمات للمستخدم سواء أكان استخدام بسيط (استخدام الذاكرة) لتخزين البرامج وتنفيذها وتخزين قواعد البيانات ، أو كان الأمر يختص باستخدام الكاميرا مثلاً والأجهزة الصوتية في الجهاز .
كيف أبدأ ؟
بكل بساطة ، سنقوم بعمل برنامج يظهر رسالة ترحيب عن الضغط على زر أمر .
1- قم بتشغيل الفيجوال ستوديو Visual Studio .net .
2- قم باختيار C# أو VB أو اللغة التي تود البرمجة من خلالها .
3- قم باختيار Smart Device ، ومن ثم قم باختيار Pocket PC 2003 أو Smartphone 2003 أو Windows CE 5.0 حسب الجهاز الذي تود العمل عليه .
4- بعد اختيار القسم المناسب قم باختيار Device Application .
5- قم بسحب Button من الأدوات ، وقم بكتابة هذا الكود في داخله :

MessageBox.Show("Welcome...")

فقط قم باضافة ; في حالة كونك مبرمج C# .

6- قم بالضغط على F5 اختار نوع ال deploy الذي ترغب فيه حسب الجهاز الذي تود العمل عليه ، أو قم باختيار نوع يعمل على الـ PC للتجربة فقط .
7 - مبروك ، لقد قمت بعمل برنامج الأول ، يمكنك أيضاً نقل الملف التنفيذي exe إلى الجهاز وتشغيله مباشرة ، لا بد في هذه الحالة ان يكون .net framework موجوداً على الجهاز الكفي Pocket PC .
كيف اكمل البرمجة من خلال .net ؟
بكل تأكيد فإن البرنامج السابق يعد من أبسط الصيغ الممكنة لبرنامج يعمل على Pocket PC ، فيما ستتضطر لاستخدام التخزين في البرامج الجدية والتعامل مع قواعد البيانات حيث يمكنك استخدام الملفات النصية كقواعد بيانات ، أو ملفات XML وحتى قواعد البيانات من نوع SQL Server CE .
كما يمكن ان تضطر للتعامل مع الملفات ، أو الصوتيات والشاشة ، أو حتى مع الأجهزة الملحقة مثل الكاميرا وخلافه .

بكل بساطة كل ما عليك هو الدخول إلى هذا الموقع : www.msdn.com وستجد فيه كل ما تريد ، يمكنك الدخول أيضاً مباشرة على هذا الرابط : http://msdn2.microsoft.com/en-us/library/aa458721.aspx

هل هناك أدوات مساعدة ؟
بكل تأكيد هناك العديد من الأدوات التي تساعدك على بناء تطبيقاتك وجعلها أفضل بطريقة أسهل - لكن لا تنشغل بالأدوات دون ان تعرف ولو بصورة عابرة كيف يمكنك العمل يدوياً - ، ومن أحدث هذه الأدوات Windows Mobile 6 Developer Resource Kit :
http://msdn.microsoft.com/windowsmob...t/default.aspx

هل هناك طرق أخرى غير .net لبرمجة الأجهزة الكفية ?
بكل تأكيد . نعم ، وبالعكس فإن لغة مثل سيمبان تعد أقدم من لغات مايكروسوفت ، كمان أن لغة مايكروسوفت لا زالت غير قادرة على اقتحام عالم الموبايلات التي لا تزال تسيطر عليه شركتي سيمبان وجافا .
http://www.ce4arab.com/vb7/index.php

أخيراً ، درس بسيط يحتوي على مجموعة أكواد مفيدة في عالم برمجة ال Pocket PC :

http://vb4arab.com/vb/showthread.php?t=2738

Microsoft Ajax Toolkit

2008-08-23T13:47:00.001-07:00

في هذا الدرس سوف نستعرض سريعاً كيفية الاستفادة من خدمات تقنية الإنترنت المعروفة باسم AJAX من خلال .net ولكن قبل البداية دعنا نتعرف على ما هي أجاكس ؟

اجاكس AJAX
هي اختصار لكلمة Asynchronous JavaScript and XML ، وفي الواقع فهي ليست لغة برمجة جديدة أو تقنية جديدة قدر ما هي استخدام للموارد الموجودة بطريقة أخرى ، وببساطة ، تعتمد اجاكس على تجزيء الصفحة إلى عدة اقسام تتم معالجة كل قسم على حدة ، وفي هذه الحالة فإنه عند طلب العميل لجزء ما لن يكون مضطراً لانتظار تحديث الصفحة بالكامل .
ولعل أشهر أمثلة استخدام AJAX هو البريد الإلكتروني Gmail اضافة إلى النسخة الجديدة من البريد الإلكتروني لل Yahoo و Hotmail .
لمعرفة المزيد ربما تستطيع زيارة صفحة ويكيبديا عن هذه التقنية :
http://en.wikipedia.org/wiki/Ajax_%28programming%29

كيف أبدأ من خلال .net ؟

قامت مايكروسوفت باصدار عدة نسخ من الأدوات التي تساعدك وتسهل الحصول على المميزات المتاحة في AJAX ، لكنك على اية حال تستطيع القيام بهذا الأمر في أبسط صوره يدوياً ، أو باستخدام ما يسمى باسم Atlas وهي نسخة من مايكروسوفت خاصة ب AJAX .

وللمزيد من التسهيل قامت مايكروسوفت باصدار Asp.net Ajax ToolKit ، وهي مجموعة من الأدوات المختلفة التي يمكن استعراضها من خلال هذا الرابط :
http://ajax.asp.net/ajaxtoolkit/

تستطيع زيارة الموقع وتحميل هذه الأدوات من خلال الرابط :
http://ajax.asp.net/

كما يوفر الموقع مكتبة ضخمة من المواد التعليمية لهذه الأدوات ول Asp.net عموماً ، يمكن الوصول إليها عبر هذا الرابط :
http://www.asp.net/learn/default.aspx?tabid=63

يمكنك البدء من خلال هذا الفيديو تحديداً :
http://download.microsoft.com/downlo...List-Video.zip
وسيقوم بالشرح منذ البداية عن كيفية استخدام Atlas .

وهناك دروس أخرى لشرح كيفية البدء باستخدام Ajax ToolKit مباشرة منها هذا الفيديو :
http://www.asp.net/learn/videos/view...tabid=63&id=75
http://www.asp.net/learn/videos/view...tabid=63&id=76

FileSystemWatcher

2008-08-15T05:14:00.001-07:00

تعتبر هذه الفئة مفيدة جداً في حالة رغبتنا في مراقبة سلوك ملف معين ومعرفة اي تغيير يطرأ عليها من التغييرات الموجودة في ال System.IO.NotifyFilters enum والذي يراقب اي من التغييرات التالية :

public enum NotifyFilters {
Attributes, CreationTime, DirectoryName, FileName, LastAccess, LastWrite, Security, Size,
}

طبعاً بما اننا نتحدث عن events وتغييرات ، سنحتاج فوراً لتعريف دوال يتم تنفيذها مرتبطة بالاحداث ، اي دالة تستخدم لقراءة احداث مثل التعديل والتغيير وخلافه لا بد ان تكون على شكل delegate التالي :

void MyNotificationHandler(object source, FileSystemEventArgs e)

حدث تغيير الاسم لا بد أن يتبع لل delegate التالي :

void MyNotificationHandler(object source, RenamedEventArgs e)

الآن سنقوم بتعريف برنامج عادي ، يقوم بمراقبة حالة الملفات ، طبعاً ولإننا نرغب في ان نرى نتائج البرنامج فلا بد ان نجعل البرنامج يعمل حتى يضغط المستخدم حرف q مثلاً ، لو كنا في windows Forms كان بامكاننا المراقبة مباشرة طبعاً ، في مثالنا هذا سنراقب كافة الملفات النصية في القرص الصلب c:\ لحدثي الاضافة والحذف :

C#:

FileSystemWatcher watcher = new FileSystemWatcher();

// monitor files at:

watcher.Path = @"c:\";

// monitor files when

watcher.NotifyFilter = NotifyFilters.LastAccess NotifyFilters.LastWrite NotifyFilters.FileName NotifyFilters.DirectoryName;

// watch files of type

watcher.Filter = "*.txt";

// watch events:

watcher.Created += new FileSystemEventHandler(OnChanged);

watcher.Deleted += new FileSystemEventHandler(OnChanged);

watcher.EnableRaisingEventys = true;

Console.WriteLine("Press 'q' to quit app.");

while (Console.Read() != 'q') ;

vb.net:

Dim watcher As New FileSystemWatcher()

' monitor files at:

watcher.Path = "c:\"

' monitor files when

watcher.NotifyFilter = NotifyFilters.LastAccess Or NotifyFilters.LastWrite Or NotifyFilters.FileName Or NotifyFilters.DirectoryName

' watch files of type

watcher.Filter = "*.txt"

' watch events:

AddHandler watcher.Created, AddressOf OnChanged

AddHandler watcher.Deleted, AddressOf OnChanged

watcher.EnableRaisingEvents = True

Console.WriteLine("Press 'q' to quit app.")

While Console.Read() <> "q"C

End While

كما لاحظت ، عندما يحدث أي حدث فإننا نقوم باستدعاء الدالة OnChanged ، يمكن تخصيص دالة لكل حدث أو كما تحب لكن هذا فقط مثال ، يمكننا كتابة الدالة OnChanged بالشكل التالي مثلاً - عرض الملف والتغيير ووقت التغيير - :

C#:

static void OnChanged(object source, FileSystemEventArgs e)

{

Console.WriteLine("File Changed, File Path: {0} , Change: {1}, DateTime: {2}", e.FullPath, e.ChangeType,DateTime.Now.ToString());

}

vb.net:

Private Shared Sub OnChanged(ByVal source As Object, ByVal e As FileSystemEventArgs)

Console.WriteLine("File Changed, File Path: {0} , Change: {1}, DateTime: {2}", e.FullPath, e.ChangeType, DateTime.Now.ToString())

End Sub

والآن جرب البرنامج ...

الصورة التالية نتاج متوقع لحذف ملف من السي واعادته مرة أخرى ( من السي مباشرة ) :

IComparable Interface

2008-08-15T05:12:00.000-07:00

بسم الله الرحمن الرحيم .

كما هو واضح من الاسم ، يستخدم هذا ال interface للمقارنة ، ولذا من الطبيعي ان يكون شكل هذا ال interface بالشكل التالي :

C#:

public interface IComparable
{
int CompareTo(object o);
}

vb.net:

Public Interface IComparable
Function CompareTo(ByVal o As Object) As Integer
End Interface

يمكنك ملاحظة ان الدالة تعيد قيمة رقمية ، فعلياً هي تعيد في المعتاد القيم 0 في حالة التساوي ، القيمة 1 في حالة كون الطرف الأول اكبر ، و -1 في حالة كون الطرف الأول أصغر .

اما النقطة التي لدينا هنا فلسنا بحاجة لمعرفة هل يساوي هذا الكائن ذاك ام لا ، بل نحن في حاجة إلى معرفة ايهما اكبر او اصغر ، لنفترض ان لدينا كلاس للسيارات بالشكل التالي مثلاً :

C#:

class Car
{

string Name;
int year;
}

vb.net:

Class Car
Private Name As String
Private year As Integer
End Class

والآن نرغب في ترتيب السيارات بناء على تاريخ الصنع year ، لذا أول خطوة لدينا هي جعل الفئة الخاصة بنا تطبق الفئة IComparable :

C#:

class Car:IComparable
{

string Name;
int year;
}

vb.net:

class Car:IComparable
{

string Name;
int year;
}

ثم نكتب بعض الاكواد في الدالة CompareTo ، لنفترض الشكل التالي مثلاً :

c#:

int IComparable.CompareTo(object obj)
{
Car temp = (Car)obj;
if(this.year > temp.year)
return 1;
if(this.year < temp.year)
return -1;
else
return 0;
}

vb.net:

Private Function CompareTo(ByVal obj As Object) As
Integer Implements IComparable.CompareTo
Dim temp As Car = DirectCast(obj, Car)
If Me.year > temp.year Then
Return 1
End If
If Me.year < temp.year Then
Return -1
Else
Return 0
End If
End Function

طبعاً لا داعي لتذكيرك بانك تستطيع اعادة -100 و 0 و 94 بدلاً من -1و0و1 ، لكن هذا لتسهيل المفهوم ، الدالة تعمل بدلالة رقم سالب يعني اصغر ، صفر يعني التساوي ورقم موجب يعني اكبر فقط دون ان يعنيها قيمة هذا الرقم الفعلية .

الدالة Sort :

لنفترض ان لدينا مصفوفة array من الارقام باسم myNumbers ، في هذه الحالة لو قمنا بكتابة الأمر التالي لكان الكود مفهوماً :
c#:

Array.Sort(myNumbers);

vb.net:

Array.Sort(myNumbers)

ولكن لو كان لدينا مصفوفة من السيارات ، وكتبنا هذا الكود لترتيبها فإن هذا بالتأكيد سيحدث خطأ .

لكن في حالة كون الفئة car تطبق ال IComparable interface ، ففي هذه الحالة سيمكنك استخدام هذا الدالة ببساطة لإنها سوف تقوم بالمقارنة اعتماداً على دالة CompareTo التي قمت انت ببرمجتها ، ربما يكون هذا سبباً كافياً لتقوم بتطبيق هذا ال interface وكتابة كود الدالة بدلاً من كتابة دالة باسم check مثلاً او اي اسم آخر للقيام بنفس المهمة . هذا طبعاً بالاضافة لتسهيل استخدام الفئة الخاصة بكل لاحقاً ووضوحها لأي مبرمج آخر .

دورة : لنتعلم .net 2008

2008-08-15T04:51:00.000-07:00

بسم الله الرحمن الرحيم .

على منتدى فيجوال بيسك للعرب ، توجد دورة بعنوان

رابط الدورة هنا

http://vb4arab.com/vb/forumdisplay.php?f=101

جدول مواضيع الدورة هنا

http://vb4arab.com/vb/showthread.php?t=9176

الفرق بين const و static readonly

2008-08-15T04:49:00.001-07:00

لو كنت قد جربت التعامل مع الثوابت بكثرة ، فلا بد انك تساءلت ، ما هو الفارق بين تعريف ثابت const او تعريفه باستخدام static readonly ، فكلاهما كما تعلم لا يمكن تغيير قيمتهما .

الفارق بسيط جداً ، هو ان ال const يتم تعريف قيمتها وقت ال compile time ، اما قيمة ال static readonly فيتم تعريفها وقت ال run time .

لهذا سنجد مزية اضافية لل static readonly ، وهو اننا يمكن ان نقوم بتعريفة في ال static constructor بالشكل التالي مثلاً :

class Program
    {
        public static readonly Test test = new Test();
        static void Main(string[] args)
        {
            test.Name = "Program";
}

الفرق بين التعريف باستخدام overridde و new

2008-08-15T04:45:00.000-07:00

من المبادئ العامة في ال OOP استخدام مفهوم ال override ، في برامجك من خلال .net يمكنك تحديد الدالة لتكون قابلة لعمل override لها لاحقاً بالشكل التالي :

C#:

public class Base
{
    public virtual void SomeMethod()
    {
    }
}

vb.net:

Public Class Base
Public Overridable Sub SomeMethod()
End Sub
End Class

ومن ثم لعمل override لهذه الدالة في فئة Class آخر نقوم بكتابة الكود التالي :

C#:

public class Derived : Base
{
    public override void SomeMethod()
    {
    }
}

vb.net:

Public Class Derived
    Inherits Base
    Public Overloads Overrides Sub SomeMethod()
    End Sub
End Class

في هذه الحالة لو قمنا بتعريف نسخة من الفئة الأولى Base وقمنا بعملها من النوع Derived فسيتم تنفيذ الدالة الموجودة في Derived مباشرة :

C#:

Base b = new Derived();
b.SomeMethod();

vb.net:

Dim b As Base = New Derived()
b.SomeMethod()

التعريف باستخدام new أو Shadows :

اما لو قمنا بتعريف ال override باستخدام new أو Shadows في vb.net فكل ما سيحدث هو عملية اخفاء مؤقت hide ، لذا فإن الأمر التالي مثلاً :

C#:

public class Base
{
    public virtual void SomeOtherMethod()
    {
    }
}

public class Derived : Base
{
    public new void SomeOtherMethod()
    {
    }
}

Base b = new Derived();
Derived d = new Derived();
b.SomeOtherMethod();
d.SomeOtherMethod();

vb.net:

Public Class Base
Public Overridable Sub SomeOtherMethod()
End Sub
End Class

Public Class Derived
    Inherits Base
    Public Shadows Sub SomeOtherMethod()
    End Sub
End Class

Dim b As Base = New Derived()
Dim d As New Derived()
b.SomeOtherMethod()
d.SomeOtherMethod()

سوف يقوم باستدعاء الدالة الأولى في السطر الثالث ، فيما يقوم باستدعاء الدالة الثانية فقط في السطر الرابع .

المصدر :
http://blogs.msdn.com/csharpfaq/archive/2004/03/12/88453.aspx

نظام الرواد لادارة شركات الكومبيوتر

2008-08-15T04:31:00.001-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

اسم المشروع : نظام لإدارة شركات الكومبيوتر (هاردوير)
وصف المشروع : مشروع مقدم ضمن مادة تحليل النظم System Anaylsis .
الفرقة الثانية بكلية الحاسبات والمعلومات - جامعة حلوان .
فريق العمل : Futex Group .

1- أحمد جمال خليفة .
2- أحمد سعيد أنور .
4- أحمد محمد عيسوي .
5- حسام الدين محمد صادق .
6- خالد عادل محمد سلامة .

اسم المشرف :
د.سيد عبدالجابر .
م. هالة أبو الحمايل .

مقدمة :

الهدف من المشروع في مادة ال System Anaylsis هو التعرف على كيفية تحليل متطلبات العميل المختلفة مروراً بمراحل التحليل المختلفة بدءاً من ال DFD مروراً بال Sheets المختلفة وصولاً إلى ال ERD وال Entitty Sheet وانتهاء بال Menu وال low level sheet .
وقم تم اختيار شركة (الأوائل - الرواد) والمتخصصة في مجال توريد واستيراد وبيع قطع الكومبيوتر المختلفة اضافة إلى عمليات الصيانة وخلافه لتطيبق هذا النظام حيث يعتبر مجال عمل الشركة متشعباً إلى حد ما اضافة لنظم الحسابات الموجودة ضمن الشركة .
المرحلة الأولى كانت في نزول الشركة والبدء في تجميع البيانات عن نظام ادارة وعمل الشركة ، ومن ثم بدأت مراحل التحليل المختلفة وهنا عرض بسيط لبعض صور هذه المرحلة .

نموذج من التحليل باستخدام DFD :

نموذج من ال DataStore Sheet :

نموذج من ال Process Sheet :

نموذج من ال Data Item Sheet :

نموذج من قاعدة البيانات باستخدام ERD :

نموذج من ال ERD Items :

نموذج من ال Entity Sheet :

نموذج من ال Context Diagram :

نموذج من ال System Diagram .

نموذج لل menu diagram :

نموذج لل low level diagram :

أما النظم الداخلية التي تضمنها نظام شركة الرواد فهي :

- نظام إدارة المحاسبات .
- نظام إدارة المبيعات .
- نظام إدارة الصيانة .
- نظام إدارة المخازن .
- نظام إدارة شؤون الموظفين .
إلى هنا كانت قد انتهت مراحل العمل في المشروع المطلوب في الكلية ، ولكننا قمنا أيضاً اضافة لعمل مهمة تحليل البرنامج بالبدء بالخطوة التالية عن طريق تصميم البرنامج ومن ثم عمل البرنامج أيضاً .

عمل البرنامج :
تم عمل البرنامج من خلال Visual Basic 6 مع قواعد بيانات من نوع Microsoft Access باستخدام تقنية ADO .
المهام الأساسية التي يقوم بها البرنامج .

صور من تنفيذ البرنامج وخصائصه :
1- اختيار العمل على أكثر من قاعدة بيانات والنسخ الإحتياطي والأمان .
2- عمليات تسجيل الدخول ، اضافة مستخدمين ، وموضوع الصلاحيات الخاص بكل مستخدم .

صورة رقم 1

3- رسائل تحذيرية ومؤشرات مستمرة بخصوص كميات البضائع ، الفواتير المستحقة ، الشيكات وايصالات الأمانة والتحصيلات - الشاشة الرئيسية للبرنامج .

صورة رقم 3 .

4- عرض كافة البضائع مع امكانية الطباعة ، التعديل والحذف وخلافه .

صورة رقم 4

5- عمليات اضافة العملاء والموردين والبحث عنهم والتعديل وخلافه .

صورة رقم 5

6- مستكشف المخازن وعمليات الجرد اليومي وكميات البضائع .
7- مستكشف وحدات البضائع بالسيريال الخاص بالقطعة .

صورة رقم 7

8- نظام تحويلات الفروع وادارة الأسعار .
9- نظام كامل لادارة الفواتير الصادرة والواردة آجل ونقداً .

صورة 9

10- نظام لادارة الشيكات وايصالات الأمانة ومواعيد الدفع والاستحقاق .

صورة 10

11- نظام ادارة الجزاءات والمكآفات والحضور والغياب اليومي للموظفين .
12- نظام ادارة مدخلات ومخرجات غير تجارية للشركة .
13- نظام ادارة التحكم بعقود الموظفين ، وتقارير موظفي المبيعات .

صورة 13

14- نظام تسليم الرواتب الشهرية والمكآفات والحوافز الإضافية .
15- نظام تسجيل عقود صيانة سنوية أو دائمة للشركة .
16- نظام ادارة عمليات الصيانة الدورية .

صورة 16

17- نظام ادارة المرتجعات وصيانة المبيعات :

صورة 17

18- العمل على الشبكة باستخدام سيرفر مركزي اضافة إلى Clients مع امكانية التواصل بين الموظفين من خلال البرنامج كبديل عن الاتصالات الهاتفية .

صورة 18

19- خدمات اضافية مثل الآلة الحاسبة ، المفكرة ، المنبه ، التحكم بتنسيق البرنامج والخلفية والألوان ... الخ .

صورة 19

في الختام . البرنامج موجود على هذا الرابط للتحميل بالسورس كود للبرنامج . مع ملف تنفيذي
http://www.4shared.com/file/133226960/37119893/Rowad.html

أتمنى للجميع الاستفادة .

والله الموفق ...
والسلام عليكم ورحمة الله وبركاته .

كتاب استخدام DAO لبناء برنامج خطوة بخطوة

2008-08-14T07:06:00.000-07:00

كيفية بناء برنامج لادراة السوبر ماركت ابتداء بالتحليل وانتهاء بالتوزيع مرورواً بمراحل التصميم والبرمجة المختلفة خطوة بخطوة

يمكن مراجعة الدروس والمراحل هنا

http://vb4arab.com/vb/showthread.php?t=757

ولتحميل الكتاب والملفات المرفقة
الكتاب & ملف المشروع

كتاب تعليم الحاسب الآلي للمبتدئين - أساسيات الهاردوير ونظم التشغيل وأوفيس

2008-08-14T06:57:00.000-07:00

كتاب بسيط في الكومبيوتر للمبتدئين ، شاركت بيه في المسابقة الأولى لتأليف الكتب في منتدى فيجوال بيسك للعرب وفزت بالمركز الأول .

يحتوي الكتاب على مبادئ الحاسب الآلي ، ويشتمل على شقي الحاسب ، العتاد ، والبرمجيات ، وهو موجه أساساً إلى المبتدئين - يشمل تاريخ الحاسب الآلي - تركيب الحاسب الآلي - اساسيات النظم الثنائية - نظم التشغيل وويندوز XP بتفصيل - التطبيقات المكتبية Microsoft Office

للتحميل اضغط هنا

العدد الأول من مجلة منتدى فيجوال بيسك للعرب

2008-08-14T06:50:00.000-07:00

العدد الأول من المجلة الشهرية لمنتدى فيجوال بيسك للعرب

للتنزيل اضغط هنا

العدد الأول كان باشراف : وليد بوالطمين
ولي عدة مشاركات في المجلة

كتاب مقدمة إلى التحكم بالأجهزة الخارجية - Physical Computing

2008-08-13T07:32:00.001-07:00

كتاب تم تقديمه في منتديات فيجوال بيسك للعرب عبر عدة دروس في هذا القسم :

http://vb4arab.com/vb/forumdisplay.php?f=57

المادة العلمية الاساسية قدمت في الاصل من FUTEX Group مشروع مادة Seminar في الفرقة الثالثة - كلية حاسبات ومعلومات حلوان .

محتويات الكتاب :

1- نظم الأرقام
2- المنافذ وتركيبھا وطريقة تعامل النظام معھا
3- منفذ الطباعة Parallel Port وطريقة التعامل معه بالتفصيل
4- برمجة منافذ الكومبيوتر
5- مدخل إلى الھاردوير - مقدمة .
6- مدخل إلى الھاردوير - وسائل الإخراج.
7- مدخل إلى الھاردوير - وسائل الإدخال .
8- مدخل إلى الھاردوير - وسائل المعالجة .
9- تطبيق تشغيل الأجھزة الكھربائية من خلال الكومبيوتر
10- قيادة عربة ريموت كنترول من خلال الكومبيوتر
11- مقدمة إلى عالم الروبوتات

لتحميل نسخة من الكتاب اضغط هنا

Nullable Types

2008-08-13T07:30:00.002-07:00

في عرف المتغيرات التقليدية تعد القيمة Null غير مقبولة اطلاقاً ، فالمتغير من نوع Boolean مثلاً لا بد ان يحتوي على True أو False ، المتغير Short لا بد ان يحتوي على ارقام ما بين الصفر و 32767 مثلاً ... وهكذا ، في حين كانت القيم النصية مثلاً String تستطيع استيعاب القيمة null لإنها من نوع reference .

لكننا في بعض الاحيان نضطر لأن يحمل متغير منطقي Boolean قيمة (لا قيمة - Null ) بمعنى اننا غير قادرين على تحديد فيما إذا كان True أو False ، ابسط امثلة ذلك هي المشكلة التقليدية التي تواجه اغلب مبرمجي قواعد البيانات في حالة عدم ادخال المستخدم لقيمة في حقل ما وليكن حقل (متزوج) ، ولنفرض ان المستخدم لم يحدد كون الشخص متزوجاً من عدمه ، في هذه الحالة سيظل الحقل يحتفظ بقيمة null ، وهو ما كان يستلزم عمل Check على انها ليست Null قبل وضعها في اي متغير من نوع bool مثلاً .

لكن ومع الاصدارة الثانية من .net framework اصبح بالامكان تعريف متغير مخصص ليسمح بتقبل القيمة null اضافة للقيم الاساسية له ، كما في المثال التالي :

bool? ismarried = null;

في هذه الحالة يمكننا اسناده لقراءة قيمة مباشرة من قاعدة البيانات دون القلق من كون القيمة الحالية هي Null .

هناك عدة طرق اخرى لتعريف متغير يقبل Null مثل الطريقة التالية ايضا :

Nullable<bool> nullableBool = null;

حيث ان ? هي فعلياً اختصار لل generic المسمى System.Nullable<T> ، وهو ما سنتعرف على معناه في مراحل قادمة من الدورة .

وبنفس الطريقة فيما لو اردنا تعريف دالة يكون ال return لها Nullable فسيكون ذلك بالشكل التالي :

public bool? functionName()

خصائص ال Nullable :

اهم خصائص ال nullable هي خاصية HasValue والتي تحدد فيما إذا كان المتغير به قيمة ام انه يحتفظ بقيمة Null بالشكل التالي :

if (ismarried.HasValue)

يمكن كتابتها باستخدام وسائل المقارنة ايضاً != أو <> في الفيجوال بيسك بالشكل التالي :

C#:

if (ismarried!=null)

VB.net:

if ismarried<>nothing then

*** حيث ان nothing خاصة بالفيجوال بيسك بدلاً من null في السي شارب .

المعامل ؟؟ :

يمكن استخدام المعامل ؟؟ مع القيم ال nullable لكي نخبره بوضع قيمة ما في حالة وجودها ب null ، لنفترض مثال حالة الزواج السابق ، وسنفترض ان اي شخص لم يقم بادخال بيانات الزواج فهو شخص اعزب بمعنى ان القيمة ستصبح False مباشرة ، سنقوم بكتابة الكود التالي من اجل ذلك :

int? ismarried = returnvaluefromdatabase() ?? False;

كتاب مقدمة إلى Microsoft Access

2008-08-13T07:30:00.001-07:00

كتاب تم نشره سابقاً في منتديات فيجوال بيسك للعرب

محتويات الكتاب

مقدمة عامة لقواعد البيانات .
مقدمة لأكسيس .
النماذج Forms
العلاقات Relationships
بعض عمليات قواعد البيانات .
منوعات في أكسيس .
لغة الاستعلامات الهيكلية TSQL

للتحميل اضغط هنا

أكبر رقم في العالم

2008-08-13T07:24:00.000-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

هذا المقال ترجمة لمقال محمد نبيل ، كان قد وضعه على البلوج الخاص به منذ أكثر من سنتين على هذا الرابط :
http://mohnabil.blogspot.com/2006/02/biggest-number-used-in-mathematics.html

أكبر رقم في الرياضيات .

هو رقم اصغر من ما التعبير الرياضي ما لا نهاية (infinity) ولكنه في نفس الوقت اكبر من أي رقم تخيلته ، يعرف باسم Graham's Number

قبل البدء بالحديث عن هذا الرقم ، سنتحدث عن رقم مشابه ولكنه اصغر منه قليلاً ، هو رقم Googol الذي استمد محرك البحث الشهير Google اسمه منه .

رقم Googol اكبر من عمر الكون بالثواني ست مرات وهو الرقم 10 مرفوع للاس 100 ، اي الرقم واحد وبجانبه 100 صفر فقط .

رقم googol اكبر من عدد الجزيئات الموجودة في الكون والتي تم توقعها بحوالي 10 مرفوعة لأس بين 72 إلى 87 .

إذا قمت برسم شكل مضلع هندسي عدد جوانبه هو رقم googol والذي هو 10 اس 27 ضعف الكون المعروف فسيظل هذا الشكل يظهر كدائرة حتى على مقياس Planck الذي يمثل 10 مرفوعة للاس -39 من المتر - السم جزء من 100 جزء من المتر اما ال Planck فهو جزء من الرقم 1 وبجانبه 39 صفر من المتر - .

هناك رقم آخر وهو Googolplex وهو ما يساوي رقم 1 وبجانبه رقم googol من الاصفار ، هناك ايضاً Googolduplex والذي هو رقم 1 وبجانبه رقم Googolplex من الاصفار ، Googoltriplex هو واحد وبجانبه الرقم Googolduplex من الأصفار ، وأخيراً Googolquadriplex هو الرقم 1 وبجانبه الرقم Googoltriplex من الأصفار .

لو اردنا كتابة اصغر واحد من الارقام السابقة وهو ال googolplex على صفحة تستطيع طباعة 100 صف بكل صف 100 حرف ، بمعنى انها تطبع في الصفحة الواحدة 10 الاف حرف ، في هذه الحالة سوف نحتاج إلى بليون طابعة ، تطبع كل واحدة منها بليون صفحة في الثانية ، بهذه الطريقة وبعد سنة كاملة سنجد ان هذا العدد من الطابعات تمكن فقط من طباعة 10 مرفوعة للاس 29 فقط ، وبعد بليون سنة أخرى سنجد انها استطاعت طباعة 10 مرفوعة للاس Googol-38 فقط من الارقام . بليون سنة اخرى لتصبح 37 وبليوني سنة لتصبح 36 ثم اربع بلايين سنة لتصبح 36 ثم 8 بلايين سنة لتصبح 35 - نتكلم هنا عن الاس لذا فهناك تضاعف - .

لنفكر بطريقة أخرى ، لو افترضنا اننا سنطبع هذه الارقام بخط رقم 1 والذي يحتل حوالي 3 مليمتر لكل حرف ، سنجد ان حجم الصفحة التي تكفي لطباعة كل هذا تساوي 3.5 * 10 مرفوعة للاس 98 متر ، في حين ان كامل مساحة الكون المعروف حتى الآن 7.4 * 10 مرفوعة للاس 26 . ايضاً لا ننسى عامل الوقت في الطباعة حتى لو افترضنا ان نقل البيانات يتم بسرعة الضوء .

كل هذا وما زلنا نتحدث عن googolplex ، فما بالك بما بعده . ثم لا تنسى ان هذا الرقم هو صغير جداً مقارنة برقمنا Graham's Number والذي لا يمكن كتابته في صيغة exponentiation اي رقم مرفوع للاس رقم ، بل لا بد من طريقة خاصة لكتابته لإن لا احد يستطيع كتابته بهذا الشكل ،

يمكنك الاطلاع على المزيد هنا :
http://www-users.cs.york.ac.uk/~susan/cyc/g/graham.htm

ولكن لماذا Graham's Number ؟؟؟
في الواقع جاء هذا الرقم كأكبر رقم في الكون حالياً لحل مشكلة رياضية اسمها Ramsey theory والتي تقول :

Consider an n-dimensional hypercube, and connect each pair of vertices to obtain a complete graph on 2n vertices. Then colour each of the edges of this graph using only the colors red and black. What is the smallest value of n for which every possible such coloring must necessarily contain a single-colored complete sub-graph with 4 vertices that lies in a plane?

بالرغم من ان هذه المشكلة لم تحل إلى الآن ، Graham's Number هو الحد الأعلى الأصغر حالياً .
في الختام ، اكثر اسم مسلي لرقم قرأته في حياتي ، هذا الاسم هو :
Novemnonagintanoncentinonmillinovamyriadecemyrilli on

إلى هنا انتهت الترجمة

في الواقع وجدت هذا الرابط لاسماء الارقام ، ستجدون الكثير من الاسماء الغريبة :
http://www.nationmaster.com/encyclopedia/Xonillion

مقدمة إلى VBScript

2008-08-13T07:23:00.000-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

في هذا الدرس سوف نتعرف على مبادئ استخدام VBScript واستخدامها في تطبيقات بسيطة ، وفي سلسلة دروس قادمة ربما نتوسع في شرح مفاهيم هذه اللغة واستخدامتها بشكل أكثر توسعا ...

أولاً : ما هي ال VBScript ؟

هي لغة نصية Script تشبه في طريقة كتابتها ال Visual Basic ولكنها تقوم بالعمل على الانترنت حيث تعمل مباشرة على المتصفح .

ثانياً : لماذا نستخدم VBScript ؟

نستخدم هذه اللغة لنقوم بتنفيذ بعض الأوامر على جهاز المستخدم مثل التحقق الأولي من المدخلات وعمل بعض الميزات الاضافية للصفحة التي لا تستطيع HTML القيام بها ، أيضاً يمكنك من خلال هذه اللغة تشغيل المكونات الاضافية مثل ActiceX و بعض ال Java Applets ، كما انها تستخدم أيضاً كلغة للبرمجة على السيرفر بجانب ASP مثلاً .
والجدير بالذكر انه يعيب VBScript مقارنة ب JavaScript مثلاً انها أقل تحكماً منها وأقل امكانيات ، كما أن دعمها على المتصفحات الأخرى ( نتسكيب مثلاً قبل توقف اصداره مؤخراً ) أقل ، ولكنها تظل رغم ذلك أحد الحلول السهلة لمبرمجي Visual Basic .

ثالثاً : لكي نبدأ ...

قبل البداية يفترض من قارئ هذه الدروس ان يكون لديه خلفية ولو بسيطة بكيفية استخدام وسوم HTML كما يفترض ايضاً ان يكون مبرمج باستخدام فيجوال بيسك لإننا لن نتطرق لشرح أساسيات اللغة ، أيضاً سنقوم خلال هذه الدروس باستخدام المفكرة لتسهيل المهمة مع العلم أن بامكاننا استخدام برامج مثل FrontPage و Microsft Visual InterDev .

رابعاً : العناصر الأساسية للغة .

- بالنسبة للتصريح عن المتغيرات Variables فيتم باستخدام Dim كما في الفيجوال بيسك تماماً ، ويمكن اسناد القيم لها بنفس الطريقة ولكن لا يمكن تعريف نوع المتغير :

Dim X,Y 'true
Dim R as string 'false
Dim myname="ahmed gamal" ' true

- يمكن العناصر الأساسية للغة مثل الجمل الشرطية If statements ، والمصفوفات Arrays ، وجملة Select Case ، والدوال والإجراءات Sub & Functions بنفس الطريقة كما في الفيجوال بيسك .

- وكذلك الأمر بالنسبة للحلقات التكرارية Loops ما عدا انه في حالة For Next فسوف يكون الأمر بالشكل التالي :

For i=0 To 10

' do something here

Next

- الكائن الأساسي في اللغة هو Document والذي يمكن من خلاله الطباعة مثلاً :

Document.write "ahmed gamal"

- أو تغيير لون الصفحة :

Document.bgColor = "#ff00ff"

- أخيراً لكي تعمل هذه اللغة توضع الأوامر بين هذين العلامتين :

خامساً : لنبدأ بعمل تطبيقات بسيطة ...

سنقوم خلال هذا القسم بوضع بعض الأمثلة البسيطة التي توضح كيفية عمل اللغة :

1- ادخال اسم المستخدم وعرضه في رسالة .

قم بفتح نسخة جديدة من المفكرة ، قم بكتابة الكود التالي :

<Script Language="VBScript">

Dim myname

myname = InputBox("فضلاً قم بادخال الاسم","ادخال الاسم")

Msgbox myname

</script>

ثم قم بحفظ الملف باسم myexample.htm أو .html - قم بتشغيل هذه الصفحة على المتصفح لديك .

وكما هو واضح من الأمر السابق ، قمنا بوضع علامة البرمجة ب Script ، ومن ثم قمنا بتعريف المتغير ، طلب ادخال من المستخدم وأخيراً عرضه في رسالة نصية .

2- ادخال اسم المستخدم وطباعته على الصفحة .

في هذا المثال سأفترض أن لك لديك خلفية عن التعامل مع HTML ، ولذا سنفترض اننا قمنا بعمل صفحة تحتوي على فورم - مربع نص - وزر أمر بالشكل التالي :

<form name="form1">

Enter Your Name:

<br>

<input type=text name=text1 value="">

<br>

<input type=button name=cmd1 value="Print Name">

</form>

والآن سنحاول قراءة الاسم من مربع النص هذا ومن ثم نقوم بطباعته باستخدام أمر Document.write ، ولهذا سنقوم بانشاء اجراء يحدث بعد الضغط على الزر المسمى باسم cmd1 ، بالشكل التالي :

والآن وفي وسط هذا الإجراء سوف نضيف أمر الطباعة بالشكل التالي :

Document.write form1.text1.value

3- تغيير لون الصفحة حسب اختيار المستخدم من بين ثلاثة ألوان في radiobuttons .

مجدداً سأفترض معرفتك ب HTML لتنشأ صفحة بالشكل التالي :

<form name="form1">

Enter Your Color: <br>

<input type=radio name=r1 value="a1"> Blue

<input type=radio name=r1 value="a2"> Red

<input type=radio name=r1 value="a3"> Green

<br>

<input type=button name=cmd1 value="Change Color">

</form>

والآن سنقوم ببرمجة أمر يعتمد على الجمل الشرطية لمعرفة اختيار المستخدم ومن ثم تغيير لون الصفحة بناء على ذلك :

4 - عرض الوقت والتاريخ :

بكل بساطة ما عليك سوى كتابة الأمر التالي :

والآن سنقوم بطباعة كلمة التاريخ وبجانبها التاريخ الحالي ، ومن ثم سطر جديد ومن ثم الوقت بلون آخر وذلك بالشكل التالي ( استخدام HTML في وسط أمر الطباعة ) :

5- عرض الوقت والتاريخ ثانية بثانية من خلال استخدام Timer :

سنستخدم الأمر السابق ، كل ما سنقوم باضافته هو أن سيحصل عملية تحديث Reresh للصفحة كل ثانية مثلاً ، لذا سيكون الأمر بالشكل التالي :

mTimer = window.setInterval( "myTime()", 1000, "VBScript" )

في السطر السابق حددنا اننا كل 1000 ميلي ثانية = ثانية واحدة سوف نستدعي الدالة myTime .

وفي برمجة الدالة myTime :

sub myTime()

window.location.reload()

end sub

هكذا نكون قد وصلنا إلى نهاية الدرس ، وأتمنى من الله أن أكون قد وفقت في ايصال المعلومة .

والسلام عليكم ورحمة الله وبركاته ...

لدي فكرة مجنونة ، من موقع SourceForge

2008-08-13T07:22:00.001-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

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

لنفترض ان لدينا صورة 4*4 بيكسل ، نريد ان نجرب فيها كل الاحتمالات بلونين فقط هما الابيض والاسود ، هل تعرف كم صورة سيكون الناتج ؟
الناتج سيكون 2 مرفوعة للاس 4*4 وهو ما يعني 2 مرفوعة للاس 16 وتساوي 65536 .
حيث ستجد اولاً البكسل الاول اسود والباقي ابيض ، ثم الثاني ، ثم الثالث ، ثم الاول والثاني ، ثم الاول والثالث .... الخ .

الآن سنفترض اننا نريد عمل صورة ملونة 16 مليون لون بحجم 640*480 ، هل تعرف كم الصور الناتجة ؟
طبعاً ، الناتج هو 16000000 مرفوع للاس 307200 ، وهو رقم كبير جداً ، يكفي ان تعلم ان 16 مليون مرفوعة للاس 2 ستحتوي على الاقل على ضعف عدد الاصفار اي 12 صفر ، للاس 3 سيصبح 24 صفر ، الاس الرابع سيصبح 48 اس ، بمعنى انه لن يزيد 6 اصفار في المرة بل ستتضاعف ، لذا لك ان تتخيل الرقم عند الاس الالف ومن ثم الرقم مرفوعاً للاس 307 آلاف ، ان حساب الرقم الناتج هو في حد ذاته مشكلة فما بالك بالحصول على الصور نفسها .
لكن هل تتخيل على ماذا ستحتوي هذه الصور ، بالواقع ستحتوي على كل الاحتمالات التي يمكن لكاميرا ما ان تلتقطها ، وهي بالتالي تحتوي على :

- صور جميع البشر سواء البشر الذين ولدوا او سيولدوا او الموجودين حالياً .
- جميع الكائنات الحية المكتشفة او التي لم تكتشف بعد .
- صور جميع الاختراعات ووسائل المواصلات التي اخترعت او ستخترع .
- صور جميع الكلمات المكتوبة ، هنا ستجد ايضاً افضل قصيدة قيلت او ستقال لإن القصيدة او بيت الشعر هو شيء يمكن تصويره .
- ستجد ايضاً الحل لكل المسائل الفيزيائية والهندسية والكيميائية ، حيث ان هذه الحلول هي صور ايضاً .
- ستجد ايضاً صور لجميع الدوائر الكهربية او الالكترونية الموجودة او تلك التي ستوجد .

باختصار شديد ، ستجد كل ما تريده وما اخترعناه وما سنخترعه ، ولكن المشكلة الاكبر هي العدد المهول من الصور الناتجة ، حيث ان انتاج هذه الصور يستغرق باقوى حاسباتنا الحالية ملايين السنين ، وحتى لو سلمنا جدلا باننا نستطيع انتاجها فمن ذا يستطيع خلال عمره كله استعراضها .

لذا سنختم ببعض النقاط :

- اغلب هذه الصور غير ذا جدى في الواقع ، حيث انك ستجد صورة تحتوي على نقطة واحدة فقط من لون ، وهكذا لمدة 16 مليون صورة ، ثم تحتوي على نقطتين ثم على ثلاث ، ستجد رقماً مهولاً من الصور بهذه الطريقة .
- نحتاج إلى الجوريزم لاستبعاد الصور غير المهمة ، ولكن هذا الالجوريزم لا بد ان يكون ذكياً ، ربما الصورة غير مهمة حالياً ولكنها شيء لم نكتشفه بعد !
- ستجد لنفسك فقط عدة مليارات من الصور إن لم تكن اكثر ، خد صورتك وحول لون احد شعر رأسك للأحمر ثم للاخضر وهكذا لمدة 16 مليون لون ، ثم انتقل للشعرة التالية ، ثم للشعرة الاولى مع الثانية ... وهكذا ، ثم حرك راسك بمقدار بيكسل واعد الحسابات ، هذا لو سلمنا ان الشعرة بيكسل فما بالك لو كانت الشعرة تحتوي على اكثر من بيكسل ، هنا سنجد مقدراً مهولاً من التكرارات ، ثم نفس الامر مع صورة زميلك ثم مع تغيير الخلفية لتحتوي على تلفزيون بدلاً من مكتب ، ثم مكتب ببيكسل احمر في المنتصف ... الخ .

النص التالي منقول من موقع الفريق العربي للبرمجة لشرح فقط فكرة تكوين الصور وعدد الاحتمالات - مهندس أسامة - :

http://www.arabteam2000-forum.com/index.php?showtopic=155674&st=20&p=782920&#entry782920

لو فرضنا أنك تريد أن تحسب الأحتمالات لصورة مكونة من لونين فقط، وحجمها هو 3 × 1 بيكسل، فيكون عدد الاحتمالات = عدد الألوان (2) مرفوع للأس (3) (حجم الصوره)= 2 أس (3×1) = 8 صور

وبالتالى: لو تريد أن تحسب الأحتمالات لصورة مكونة من لونين فقط، وحجمها هو 3 × 2 بيكسل، فيكون عدد الاحتمالات = عدد الألوان (2) مرفوع للأس (6) (حجم الصوره)= 2 أس (3×2) = 64 صور = (2 أس 3) أس 2

إذن: تريد أن تحسب الأحتمالات لصورة مكونة من 256 لون، وحجمها هو 640 × 480 بيكسل، فيكون عدد الاحتمالات = عدد الألوان (256) مرفوع للأس (307200) (حجم الصوره)= 256 أس (640×480) = (256 أس 640) أس 480

أحسب الناتج، ولنفترض أن زمن تكوين الصوره يساوى 1 من مليون من الثانية (جدلاً)، فما الوقت الازم لتكوين جميع الاحتمالات؟؟؟

ولحساب زمن تقريبي لتنفيذ هذه العملية ، هذا ايضاً من موقع الفريق العربي للمهندس اسامة ايضاً :

هل حاولت حساب الوقت المستغرق لهذه العملية ؟ (عدد الأحتمالات تقريباً يساوى (10 أس 737280)، أى واحد وامامه 737280 صفر)

نفترض جدلاً ان لديك نظام يستطيع تكوين ألف مليار صورة فى الثانية، أى: 1.000.000.000.000، وهو تقريباً يساوى

أى عدد الثوانى التى تحتاجها لجميع الاحتمالات = 256 أس 307195، أى تقريباً (10 أس 737268) أى واحد وامامه 737268 صفر من الثوانى

وحيث أن السنه تحتوى تقريباً على 32.000.000 ثانية، أى كل 3 سنين تحتوى تقريباً على 10.000.000 ثانية (10 أس 7)
إذن تحتاج الى زمن قدره = 3 × (10 أس (737268-7)) = 3 × (10 أس 737261) سنة، 3 × (10 أس 737259) قرن
ولنفترض أن تكنولوجيا البرنامج تضاعفت سرعتها 3 مليون مليار مرة، اى اصبح ينتج: ثلاثة مليار مليار مليار صورة فى الثانية (أى واحد وامامه 24 صفر صورة فى الثانية). إذن ستحتاج لوقت يساوى (10 أس 737241) قرن
ولنفترض أنك ستختار صورة واحدة من كل مليار مليار مليار صورة (أى 0.000000000000000000000000000000000001%)، إذن ستحتاج لوقت يساوى (10 أس 737205) قرن أى (10 أس 737193) مليار قرن، أى (واحد وامامه 737207 صفر من السنين)
مع العلم أن عمر الأرض يقدر بحوالى (4.5 × 10 أس 9) سنة = 4.500.000.000 سنة
أى ستحتاج تقريباً إلى أكثر من (10 أس 737195) ضعف عمر الأرض ، ولو افترضنا بأننا (لا أدرى كيف؟) أنتقينا صورة واحدة من كل ((10 أس 30000) إلى (10 أس 40000)) صورة، لكانت المحصلة تساوى تقريباً (10 أس 700000) ضعف عمر الأرض، (واحد وامامه 700.000 صفر )
أى لو بدء البرنامج مع بدء عمر الأرض، وبقوة تصل إلى: ثلاثة مليار مليار مليار صورة فى الثانية، مع اختيار صورة واحدة من كل مليار مليار مليار صورة، وأن زمن اختيار واستبعاد الصور جدلاً يساوى صفر، وكان هناك حوالى (10 أس 700000) نظام بنفس القوه ويعملوا سوياً بالتوازى، لكنا الان نشاهد الرسالة

LEFT TO RIGHT

98% of task completed

ملاحظة: الحسابات بإفتراض الصورة 640 × 480 × 8 بت، وعليه:

640 × 480 × 4 بت، سيكون الناتج النهائى التقريبى = 10 أس (700000/2) = 10 أس 350.000
640 × 480 × 16 بت، سيكون الناتج النهائى التقريبى = 10 أس (700000*2) = 10 أس 1.400.000
640 × 480 × 24 بت، سيكون الناتج النهائى التقريبى = 10 أس (700000*3) = 10 أس 2.100.000
640 × 480 × 32 بت، سيكون الناتج النهائى التقريبى = 10 أس (700000*4) = 10 أس 2.800.000
640 × 480 × 4 بت = 320 × 480 × 8 بت = 640 × 240 × 8 بت = 320 × 240 × 16 بت، الناتج النهائى التقريبى = 10 أس (700000/2) = 10 أس 350.000
... الخ

في الواقع تبدو الفكرة مربكة إلى حد ما ، حيث انه من المستحيلات حالياً ايجاد مثل هذا التطبيق ، ولكني نقلته هنا ربما يستطيع احد تطبيق نفس المبدأ على افكار ومواضيع أخرى - قابلة للتحقيق هذه المرة - .

رابط الموضوع على منتدى الفريق العربي للبرمجة :
http://www.arabteam2000-forum.com/index.php?showtopic=155674

رابط الموضوع على فيجوال بيسك للعرب :

http://vb4arab.com/vb/showthread.php?t=13808

رابط الموضوع على sourceforge هنا :
http://sourceforge.net/community/forum/topic.php?id=451&page

Strategy Design Pattern

2008-08-13T07:21:00.001-07:00

The Strategy Design Pattern
نبدأ أولاً مع التعريف وهو :

The Strategy Design Pattern basically consists of decoupling an algorithm from its host, and encapsulating the algorithm into a separate class. More simply put, an object and its behaviour are separated and put into two different classes. This allows you to switch the algorithm that you are using at any time.

وباختصار ، فإن هذا الباترن مكون من عملية decoupling للالجوريزم و encapsulating في كلاسات Classes مختلفة ، حيث يتم فصل الكائن عن سلوكه في كلاسين منفصلين ، وهو ما سيسمح لك لاحقاً بتغيير الالجوريزم وقت ما تريد .

مميزات هذا الباترن :
- يمكنك بكل بساطة من خلاله تغيير ال behaviour الخاص بك وقت ما تريد عن طريق فصل كل behaviour في كلاس خاص به .
- في حالة رغبتك في اضافة behaviour أو تعديله لن تضطر إلى التعديل في الكلاس الرئيسي .

الاستخدام :
عندما يكون لديك عدد من الكائنات Objects متشابه ومختلفة فقط في ال behaviour فإنه من المفضل دائماً استخدام Strategy حيث يمكنك اختصار جميع هذه الكلاسات في كلاس واحد فقط مع استخدام Strategies مختلفة .
كذلك الأمر أيضاً مع subclassing للكائنات ، حيث يعتمد الحل القديم على كون ال behaviour من نوع static ، وعندما ترغب في تغييره فإنك تقوم بعمل new instance ومن ثم تقوم بعمل تبديل replace للقديم ، ولكن الآن كل ما عليك هو تغيير ال Strategy وهو سيقوم تلقائياً بتعديل ال behaviour .

أيضاً فإن وجود عدد كبير من ال behaviour في كلاس واحد سيجبرك على كثرة استخدام الجمل الشرطية لمعرفة ال behaviour المطلوب ، أما مع Strategy فلن تحتاج إلى ذلك أبداً .
طريقة العمل بكل بساطة في الصورة التالية :

والله الموفق ..
والسلام عليكم ورحمة الله وبركاته .

Traffic Monitoring System

2008-08-13T07:19:00.000-07:00

اسم المشروع : نظام لمراقبة المرور مع نموذج للقيادة الآلية .
Traffic Monitoring System With Automatic Driving Model

المشروع فائز بالمركز الأول على مستوى جمهورية مصر العربية في يوم الهندسة المصري EED فرع IT .

فريق العمل :
1- أحمد جمال خليفة .
2- أحمد سعيد أنور .
3- أحمد عماد أحمد .
4- أحمد محمد عيسوي .
5- حسام الدين محمد صادق .
6- خالد عادل محمد سلامة .

اسم المشرف :
بروفيسور: عراقي خليفة .
م. عمر غنيم .

الكلية والجامعة :
جمهورية مصر العربية - جامعة حلوان - كلية الحاسبات والمعلومات - قسم علوم الحاسب.
السنة : 2007 .

وصف مختصر للمشروع :
المراحل الأساسية للمشروع - باختصار شديد - لمزيد من التفاصيل راجع ال Documentation في آخر الموضوع .

مقدمة :
أصبح لأنظمة الكومبيوتر الآلية تأثير عميق على حياتنا اليومية حيث أصبحنا نرى كل يوم أبحاث ومشاريع جديدة من أجل استخدام الكومبيوتر لتسهيل الحياة وتخفيف الضغوط التي يتحملها البشر .
والمشروع عبارة عن مزيح من آخر التقنيات التي قدمت في هذا الفرع من علوم الكومبيوتر المتعلقة بالرؤية الحاسوبية ونظم دعم اتخاذ القرار المقدمة في مجال تطوير المدن الآلية ، حيث يستخدم النظام للمساعدة في عملية المراقبة ، ازدحام الطرق ومراقبة اشارات المرور وتدفق السير في المدن ، هو عبارة عن نظام لمراقبة السير ودعم قرارت القيادة الآلية حيث أن هذين النظامين لم يتم ربطهما سوية من قبل .
وكل ما نطمح إليه حالياً هو تقديم خطوة في طريق تطبيق نظام مراقبة في الواقع عن طريق دعمه للتكامل مع النموذج المستقبلي لنظام القيادة الآلية من خلال نموذج مصغر لمدينة تحتوي على سيارات يتم التحكم بها عن بعد وتتم ادارته من خلال الكومبيوتر .

المصاعب الأساسية التي واجهت النظام :
تعتبر الاستجابة اللحظية للأوامر الصادرة عن طريق الكومبيوتر للسيارة هي العقبة الأولى في المشروع نظراً للزمن الذي تستغرقه عمليه تحليل الصور على حاسب آلي متوسط السرعة ، والوقت الذي تستغرقة الأوامر للانتقال في ظل حاجتنا إلى أسرع استجابة ممكنة ليمكن تطبيق النظام في الواقع .

السيناريو :
* مخطط لسيناريو المشروع :

* مخطط Collaboration Diagram للمشروع :

وصف المشروع :
باختصار شديد : المشروع يحتوي على كاميرا تقوم بارسال صور فورية إلى الكومبيوتر الذي يقوم بتحليلها وفهمها والخروج ببعض التقارير والإحصائيات عن الطرق ونظام المرور ، وفي الجزء الثاني من المشروع وعند بداية مهمة لتحريك السيارة من نقطة إلى أخرى يتم الرجوع إلى هذه المعلومات لحساب الطريق الامثل للتحرك من خلاله ، وأخيراً يتم اللجوء إلى بعض مبادئ Physical Computing من أجل تحريك السيارة الموديل الموجودة في المدينة المصغرة .
وسنبدأ الآن في الشرح التفصيلي لبعض المراحل باختصار .

معالجة الصور :
المرحلة الأولى في عملية معالجة الصور هي مرحلة Road Extraction حيث يتم معرفة الطرق الموجودة في المدينة عن طريق مراحل متعددة تمر بها عملية استخراج الطرق بعد ذلك يمكن حصرها اجمالاً في المراحل التالية (Generate Road Seed points, Snaxles, Snakes) حيث يتم التعرف في آخر مرحلة بصورة مفصلة على جميع الطرق غير المستقيمة أو المنحنية بانحناءات متعددة .

وباختصار شديد فإن هذه المرحلة تعتمد على ما يسمى باسم Edge Detection كمرحلة أساسية في هذه الخطوة حيث نقوم بقراءة الصورة ومحاولة استخراج الحواف المميزة لها :

في الخطوات التالية نقوم باستبعاد تلك التي تمثل مباني مثلاً أو ناتجة عن تشويش في الصورة ، نقوم بدمج الخطوط سوية ... الخ .
وبما أن الناتج لن يكون بالطبيعي 100% فإننا نسمح للمستخدم بالانتقال إلى شاشة رسم الطرق والتعديل حيث يمكنه اضافة وحذف الطرق الخاطئة كما يمكنه تسمية الشوارع والمباني وغيرها ...
المرحلة الثانية في عملية معالجة الصور هي متابعة تحركات السيارات في المدينة ، ويتم ذلك أيضاً عبر مجموعة من العمليات الخاصة بكيفية استخراج خلفية فارغة من جميع السيارات دون الاضطرار لتصوير المدينة وهي فارغة ، ومن ثم البدء في قراءة الصورة عن طريق الطرح المباشر كخطوة أولى ، وهذه مجموعة من الصور :

الخطوة الثانية تعتمد على البدء الفعلي في قراءة الصور ويتم ذلك عبر تحويلها إلى صور Binary مع تطبيق بعض ال morphological filtering من اجل توضيح الصورة ، وهذه المحصلة النهائية لهذه العمليات :

الخطوة الأخيرة هي البدء بتتبع هذه السيارات فترة عمل النظام ، ويتم ذلك باستخدام LUCAS-KANADE OPTICAL FLOW ALGORITHM على سبيل المثال .
نظام الإحصائيات والتقارير القيادة الآلية :
بعد أن استطعنا في المرحلة السابقة معرفة أماكن السيارات في المدينة وحالة الطرق ، جاء دور المرحلة الثانية من النظام والتي تتلخص في الاستفادة من هذه البيانات ، وتتم الاستفادة من هذه البيانات بطريقتين :

نظام الإحصائيات والتقارير :
حيث يتم عرض تقرير فوري بحالة الطرق ونسب الإزدحام وخلافه .

نظام القيادة الآلية :
وهذا هو الجزء الثاني من المشروع ، حيث يتم كبداية تحديد مهمة للانتقال من نقطة أ إلى نقطة ب .
أول العمليات التي يتم تنفيذها هي حساب ال Best Path عن طريق معادلة لكل طريق يتم من خلالها اختيار الطريق الأنسب وبدء العمل على تحريك السيارة من خلاله

والآن ننتقل إلى الجزء الآخر ، وهو كيفية تحريك السيارة على هذا المسار ، فعلى الجانب الأول هناك بعض الأمور الخاصة بالالكترونيات والتي سنناقشها في النقطة التالية ، أما الجزء الخاص بالمعادلات فهو موضوعنا هنا .
حيث أنه طوال فترة حركة السيارة فإنه يتم عمل العديد من المعادلات الرياضية من أجل ضمان حركة السيارة ضمن الطريق ، الالتفاف في الملفات المحددة لذلك ، التأكد من وجود مساحة كافية للتحرك إلى الأمام ، وضمان عدم الاصطدام بالأجسام المحيطة .

الهاردوير Hardware :
كما أسلفنا في النقطة السابقة ، فإنه تلزمنا بعض التعديلات ليصبح بمقدورنا تحريك السيارة الموديل عن طريق الكومبيوتر .
بداية استعنا بسيارة ريموت كنترول RC Car مع مراعاة وجود أكثر من تردد Frequency في حالة استخدام أكثر من سيارة أو استخدام crystals أو Removable Strips من أجل تجنب تداخل الموجات .
ثم قمنا بعمل موديل لمدينة مصغرة وقمنا برسم بعض الطرق وبناء بعض المباني كما هو موضح في الصور المرفقة .
وقمنا باستخدام كاميرا عادية لالتقاط الصور .
المرحلة الأولى هي ربط الكاميرا بالكومبيوتر ، وتم ذلك عبر منفذ USB حيث يمكن قراءة الكاميرا بأكثر من طريقة وحسب لغة البرمجة المستخدمة .
الخطوة الثانية هي ربط الريموت بالكومبيوتر ليتم التحكم في السيارة ، ويتم ذلك عن طريق استخدام مبادئ ال Relays والتي تسمح للتيار بالمرور في الريموت عند تلقي أمر معين من الكومبيوتر من خلال منفذ الطابعة Parallel Port .
وهاتين الصورتين توضحان الفرق بين الريموت العادي حيث يتم تحريك صفائح على بعضها مقارنة بالريموت الجديد حيث أصبح ال Relay هو المتحكم في توصيل الكهرباء .

التطبيق في العالم الواقعي :
لكي يصبح هذا النظام قابلاً للتطبيق في أرض الواقع وعلى مدينة حقيقة فإنه ما زال بحاجة إلى بعض التعديلات ، نوجزها في الثلاث نقاط التالية :

- من جهة معالجة الصور : سيتم استبدال الكاميرا بصور مباشرة للأقمار الصناعية مثل Googel Earth والتي بدأت تقدم خدمات بث مباشر لبعض المدن حول العالم .
أيضاً لا زلنا بحاجة للمزيد من التسريع والدقة في عمليات معالجة الصور ، أيضا لمزيد من الفلترة للمؤثرات الجوية الخاصة مثل الغيوم ، الأمطار ... الخ .
- من جهة نظام قيادة السيارة : لن يتحمل السيرفر وحده عبء القيادة بل سيكون هناك جهاز على السيارة أو Microcontroller يستقبل المسار ويبدأ في توجيه نفسه بنفسه وذلك منعاً لتثقيل العمل على السيرفر وزيادة في السرعة .
أيضاً سيتم استخدام دوائر كهربائية مثل ultra-sonic حتى في الموديل الصغير لتلافي الاصطدامات التي تنتج عن أجسام مفاجئة حيث تقوم بارسال واستقبال موجات ويتم احتساب زمن ارتدادها لمعرفة ومن خلالها يمكن معرفة المسافة التي تفصلها عن أقرب جسم في الاتجاه والزاوية التي ترسل بها الموجات .
- من جهة نظام التحكم والاتصال : لن يتم الاتصال عبر موجات Radio عادية بل لا بد من وجود Wireless network ، والشرط الأهم هو كونها محمية وهو ما لم تتوصل إليه البحوث حتى الآن حيث لا توجد شبكة لا سلكية محمية بصورة كاملة أبداً .
ومن الجهة الأخرى فنحن بحاجة إلى تطويع هاردوير السيارات لاستقبال أوامر عن طريق الكومبيوتر وهو ما لا يعد مرحلة صعبة من ناحية التطبيق ، ولكنه سيواجه مشاكل عديدة تنتج عن سرعة السيارة مثلاً وسرعة الاستجابة للأوامر في ظل سيرها على سرعات كبيرة والتوقف المفاجئ وتوقع الاعطال وغيره .

المشروع :

تم تسليم المشروع باستخدام C# ولكن بداية العمل في المشروع لم تكن كذلك ، حيث تم استخدام MATLAP نظراً لكونه الأسهل في التعامل مع ال Image Proccessing ، ومن ثم تم ربطه بالنظام الذي قمنا بعمله من خلال C# ولكن وبالرغم من ذلك فلن تجد اللغة المستخدمة تفرق كثيراً حيث أن أغلب البرنامج عبارة عن معادلات وقوانين لن يختلف تطبيقها من لغة إلى أخرى أبداً .
وللتحويل إلى C# تم استخدام SharperCV وهي مكتبة مفتوحة المصدر متخصصة في عمليات ال Image Proccesing وهي عبارة عن Warrper لمكتبة OpenCV التي تم تصميمها للعمل على C++ ، وسبب الاستعانة بهذه المكتبة هو التعقيد الكبير الذي سينتج عن استخدام أكواد سي شارب مباشرة في كل عملية من عمليات معالجة الصور التي نستخدمها نظراً لإنك ستضطر للتعامل مع المؤشرات Pointers وهو ما يضطرك لاستخدام unsafe code ، وبصراحة فهي لا تعطيك كافة المميزات التي تقدمها لك لغة مثل C++ وفي نفس الوقت تحرمك من السهولة التي تجدها في الماتلاب .
ولكن هذا لم يمنع استخدام أكواد مباشرة في كثير من الأحيان ، وإنما تم استخدام SharperCV فقط في العمليات المتكررة أو التي يتم التعامل فيها مع كمية كبيرة من الأكواد حيث تختصر عليك ال SharperCV جزء كبير من المهمة برغم كثرة مشاكلها ، ولكنك ستجد نفسك مضطراً في النهاية للبرمجة اليدوية .
كان بالإمكان اضافة حل آخر وهو استخدام عمليات التحويل من ماتلاب إلى .net ولكن ظهور بعض المشاكل أدى إلى ايقاف هذه العملية ، عموماً ما زالت جميع مراحل العمل على معالجة الصور موجودة من خلال matlap ومن خلال C# أيضاً .
أما الجزء الآخر الخاص بالنظام والشاشات والقيادة الآلية ومعادلات الحركة والربط بالكاميرا من جهة أو الربط بالسيارة من جهة أخرى وعمليات التعديل والتحرير وقواعد البيانات والتقارير وخلافه فقد تمت برمجته باستخدام C# مباشرة .
لقطات وصور من المشروع :

لقطات وصور من البرنامج :

وهذه نسخة من ال Documentation للمشروع يمكن الاطلاع عليها من خلال هذا الرابط :
http://www.4shared.com/file/133227955/d4ea58ba/Final_Documentation.html

مراكز أخرى حققتها جروبات كلية حاسبات ومعلومات حلوان :

http://www.fcih.net/details.asp?id=94

الفروقات بين C# And VB.net - الخلاصة 99% تشابه

2008-08-13T07:18:00.001-07:00

في هذه المقالة أهدف إلى توضيح بعض الفروقات بين C# و VB.net في اشارة إلى أن الفروقات بينها 90% فقط في طريقة الكتابة ، ولن أناقش مبدأ أنهما متشابهان في البنية التحتية فهذا أمر مفروغ منه ، ومن أجمل ما قرأت مقال الأستاذ أيمن المدهون بعنوان : لا تكذبي إني رأيتكما معاً ، على هذا الرابط : http://www.vb4arab.com/vb/showthread.php?t=726

ولكني الآن سأبدأ بالتعرض لأوجه الخلاف ، وستكتشف في نهاية الدرس أن ليس ثمة اختلافات حقيقة بل هي لعبة تسويقية من مايكروسوفت كي لا تخسر مبرمجي فيجوال بيسك ، وفي نفس الوقت لتجذب إليها مبرمجي عائلة C .

وسأضع هنا تنويهاً عن الفروقات الغوية الأبرز وأحيلك في آخر الدروس إلى موسوعة للفروقات بين هاتين اللغتين ، ولنبدأ بالفروقات اللغوية - فروق غير ذات قيمة - :

* أولاً : كونك مبرمج سي شارب لا تنس أن تضع ; في آخر كل سطر

* ثانياً : طريقة تعريف المتغيرات :

VB.net :

Dim X as Integer
Dim X as ClassName=new ClassName()

int x;

ClassName x=new ClassName();

* ثالثاً : في حالة الشروط في VB.net اكتب = أما في C# اكتب == ، كما ستجد العلامة != لعدم المساواة بدلاً من <> .

* رابعاً : تعتمد لغة VB.net على جمل مثل End وتستخدمها في الاجراءات والكلاسات وغيرها مثلاً :

if x=1 Then

End if

بينما تجدها في C# باستخدام الأقواس :

if(x==1)

{

}

وكذلك في الكلاس والاجراءات أيضاً :

VB.net :

Imports System

Namespace MyNameSpace

Class HelloWorld

'Entry point which delegates to C-style main 

Private Function

Public Overloads Shared Sub Main()

Main(System.Environment.GetCommandLineArgs())

End Sub

Overloads Shared Sub Main(args() As String)

System.Console.WriteLine("Hello World")

End Sub 'Main 

End Class 'HelloWorld End Namespace 'MyNameSpace

C# :

using System

Namespace MyNameSpace

{

class HelloWorld

{

static void Main(string[] args)

{

System.Console.WriteLine("Hello

World")

}

}

}

* خامساً ، في فيجوال بيسك .net سوف تستخدم And,Or,Not,OrElse بينما في C# سوف تستخدم && ! .

* سادساً : عند جمع النصوص استخدم & في VB.net ولكن في C# استخدم + .

* سابعاً : else if في C# هي ElseIf في VB.net

* ثامناً : كما اسلفنا في موضوع End ، ففي الحلقات التكرارية تعتمد C# على الأقواس أيضاً :

for (i = 2; i < = 10; i += 2)

{

System.Console.WriteLine(i);

System.Console.WriteLine(i*10);

}

وفي حالة كونها سطر واحد يمكن الاستغناء عن الأقواس :

for (i = 2; i < = 10; i += 2)

System.Console.WriteLine(i);

أما في VB.net فهي تأخذ شكلاً موحداً :

For c = 2 To 10 Step 2

System.Console.WriteLine(c)

Next

ونفس الأمر بالنسبة لباقي الحلقات التكرارية While و for each وخلافه .

* تاسعاً : بالنسبة للمصفوفات وخلافه يستخدم القوس [] بدلاً من () في VB.net .

int[] nums = {1, 2, 3};

for (int i = 0; i < nums.Length; i++)

Console.WriteLine(nums[i]);

Vb.net

Dim nums() As Integer = {1, 2, 3}

For i As Integer = 0 To nums.Length - 1

Console.WriteLine(nums(i))

Next

* لن تجد تعليقاً Comment لأكثر من سطر في VB.net مثل /* */ في C# ، وكذلك XML Comments على الرغم من أنني قرأت انها ستكون مدعومة في الاصدارة القادمة .

* في C# سوف تستخدم العلامة المئوية % بدلاً من Mod في VB.net للحصول على باقي القسمة .

* لن تدعم لك VB.net استخدام Bitwise Operations في حالة Assignment على عكس ال C# حيث تتيح لك ذلك .

الآن نترك عنا الفروقات اللغوية ، فسوف نشير للباقي منها في نهاية المقال ، نتطرق هنا على عجالة للفروقات الفعلية :

* أول تلك الفروقات هي case sensitive ، حيث أنه في VB.net فإن Ahmed هي نفسها ahmed وهو ما لا يوجد في أي لغة في العالم سوى Basic ، ولا أستطيع أن أحدد فيما إذا كان هذا ميزة أم عيب .

مميزات في VB.net - باختصار - :

* دعم ال optional parameters موجود في VB.net وليس موجود في C# .

* with موجود في VB.net وليس موجود في C# .

* Catch ... When موجودة في VB.net وهي تتيح نظاماً أفضل لفلترة الأخطاء .

* يقوم VB.net بعمل Compile للكود في BackGround ، وهذه ميزة في التطبيقات الصغيرة ولكنها عيب في التطبيقات الكبيرة حيث تلاحظ بطء الفيجوال ستوديو .

مميزات في C# - اختصار - :

* يدعم C# ما يعرف باسم unsigned types ، وهو ما يمكنك استخدامه أيضاً في VB.net ولكنه ليس جزءاً اساسياً من اللغة .

* الميزة الأقوى في C# والتي لا تتوفر في VB.net هي السماح باستخدام

unsafe أو unmaneged code ما يتيح لك العمل على Pointers وخلافه ، ما يفتح لك آفاقاً واسعة في عدة مجالات مثل معالجة الصور image processing وخلافه .

ولعل هذه الميزة مما جعل C# قريبة من C++ من ناحية تعاملها مع كود منخفض المستوى Low Level Code وهو ما يجعل سي شارب الاختيار الأمثل للكثيرين .

* لن تجد increment و decrement في VB.net حيث ستتضطر إلى كتابة كود بالشكل التالي :

A=A+1

A-=1

بينما في C# يمكنك القيام بذلك بالشكل التالي :

A++

A--

* يمكنك أن تجد الخاصية sizeof في C# بينما لن تجدها في VB.net .

كان هذا موجزاً لأوضح الاختلافات والتي ستتعامل معها كثيراً ، وكما لاحظت فهي في أغلبها ليست ذات قيمة كبيرة .

في النهاية : ماذا أختار ؟

إذا كنت منتقلاً من VB 6.0 فعليك ب VB.net أما إذا كانت لديك خبرة ب C/C++/Java فعليك ب C# وإذا كنت جديداً في مجال البرمجة فأنت حر في اختيار ما يناسبك .

وفي النهاية ومهما كان اختيارك قم بالاطلاع على اللغة الثانية - علشان تضحك على الناس وتقول انا ببرمج بلغتين مش لغة واحدة - ، ويمكنك ايضاً في هذه الحالة أن تبرمج ب J# ويبقى اسمك ادام الناس بيبرمج ب 3 لغات

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

http://www.codeproject.com/dotnet/vb...difference.asp

أيضاً الملف من موقع مايكروسوفت لتوضيح الفروقات :

http://support.microsoft.com/kb/308470

والسلام عليكم ورحمة الله وبركاته .

Singleton Design Pattern

2008-08-13T07:17:00.001-07:00

المشكلة :

أحياناً ما تحتاج لإن يكون ال Class الذي قمت بانشائه لا يمكن تعريف سوى نسخة أو Object واحد فقط منه ، وتحتاج إلى مثل هذه العملية في حالة كود هذا ال Class لا بد أن يكون موجوداً مرة واحدة في البرنامج وتظل قيمه مقروءة لجميع المستخدمين من أي مكان .

المشكلة ليست في جعل ال Class لا يتم سوى عمل نسخة واحدة منه ، بل إن هذا يتم بكل بساطة باستخدام الكلمة المحجوزة Sealed ، ولكن المشكلة تكمن في أنك عندما تريد أن تستخدم نسخة أخرى فإنك لن تستطيع ، وبذا لن يمكنك الاستفادة منه في كل مكان

في هذه الحالة نلجأ لما يسمى Singleton .

الشرح :

في البداية سوف ننشأ Class وليكن اسمه Singleton .
وفي كلا الأحوال لا بد للمنشىء constructor أن يكون private لكي لا يتمكن أحد من عمل نسخة جديدة منه .
وسنعرف نسخة من ال Class داخل ال Class نفسه بالشكل التالي :

private readonly Singleton instance;

ومن ثم سوف أقوم بعمل فنكشن استخدمها للحصول على هذه النسخة من أي مكان في البرنامج بالشكل التالي :

public Singleton getInstance

{

if (instance ==null) instance = new Singleton();

return instance

}

والآن هناك طريقتين لتطبيق هذه التقنية ، الطريقة السابقة التي ذكرناها وبامكانها العمل على أي لغة برمجة - بغض النظر عن أنني استخدم C# في الشرح - ، أما الطريقة الثانية فهي تتطلب لغة يمكنها قراءة static من أي مكان وهو ما يتوفر مثلاً في الجافا أو ال C# ولا يتوفر في ال C++ .

الطريقة الثانية تعتمد على الغاء الفنكشن getInstance والاعتماد على أن بامكان اللغة تعريف new من المتغير وقت التعريف ، ليصبح أمر التعريف بالشكل التالي :

public static readonly Singleton instance = new Singleton();

وفي هذه الحالة قم دائماً بقراءة instance دون الحاجة إلى التعريف لإنها static .

وهذه صورة توضح التقنيتن المشروحتين :

StringBuilder

2008-08-13T07:16:00.001-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

عندما نقوم بدمج النصوص ، يلجأ الكثيرون منا لاستخدام المعامل + في C# أو المعامل & في VB.net بالشكل التالي - مثال اضافة امتداد البريد الإلكتروني :

//C#:
Label1.Text = Text1.Text + "@hotmail.com";

'VB.net:
Label1.Text = Text1.Text + "@hotmail.com";

إلا أن Visual Studio قدمت لنا طريقة أخرى لدمج النصوص باستخدام الفئة StringBuilder ، في مجال الأسماء System.Text.StringBuilder ، يمكن استخدامها لدمج النصوص بالشكل التالي :

//C#:
System.Text.StringBuilder mail = New System.Text.StringBuilder(Text1.Text);
mail.Append("@hotmail.com");

'VB.net:
Dim mail As New System.Text.StringBuilder(Text1.Text)
mail.Append("@hotmail.com")

الفارق بين الاثنين يكمن في ان stringbuilder يظل كما هو منذ لحظة انشاءه ، اما استخدام المعاملات + أو & فهو يقوم بعمل Object جديد من ال String مع كل عملية دمج .
والآن سنفترض مثال Loop تقوم بدمج عدد من النصوص ، وسنصور المقارنة مباشرة من كتاب .Net Gotachas ، حيث قام بعمل اختبار لعدد عمليات دمج ابتداء من 10 عمليات دمج وحتى 1000000 عملية دمج ، وقام بمقارنة الأداء بين استخدام StringBuilder او استخدام معاملات الدمج التقليدية ، مع ذكر زمن التنفيذ بالثانية لكل منهم .

لا تنسى ان 3562.933 ثانية تعني 59.4 دقيقة تقريباً ...
والآن ... هل ما زلت تستخدم & او + لدمج النصوص ؟؟؟

توفر الفئة stringbuilder ايضاً عمليات استبدال Replace وادراج Insert وحذف Remove وعمليات نصوص أخرى كثيرة ، يمكنك الاطلاع على أوجه كثيرة للمقارنة مدعومة بالرسوم البيانية من خلال هذا الرابط من Code Project :
http://www.codeproject.com/KB/cs/StringBuilder_vs_String.aspx

والله الموفق ...
والسلام عليكم ورحمة الله وبركاته .

موقع MSDN

2008-08-13T07:14:00.001-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

يعد الـ Microsoft Developer Network أو ما يعرف اختصاراً باسم MSDN واحداً من أكبر مراكز الدعم للمبرمجين الذي يستخدمون أدوات Microsoft المختلفة .
http://msdn2.microsoft.com/en-us/default.aspx

في هذا الموقع ، تجد كل ما تريد من الأوامر الأساسية والفرعية وشروح لمختلف التطبيقات على لغات البرمجة من انتاج مايكروسوفت ، ففي الصفحة الأولى انت مخير للاختيار بين واحد من هذه اللغات أو التقنيات :
.NET Framework, ASP.NET, Office, SQL Server, Visual Basic, Visual C++, Visual C#, Visual Studio, Visual Studio Express, Windows Vista And More

يحتوي الموقع أيضاً على آخر الاخبار والنصائح بخصوص هذه التقنيات ، كما تجد مجموعة من الفيديو Videos التي تشرح مختلف التطبيقات والتقنيات ، اضافة إلى روابط وتحديثات للأدوات التي تقدمها Microsft ، كما يمكنك التواصل معهم بعد تسجيل الدخول لارسال آخر الاخبار والتطورات ، ويمكنك أيضاً الاستفادة من خدمة RSS لهذا الموقع لتصفح آخر البيانات .

إلا ان النقطة الأبرز والأكثر أهمية في MSDN تظل هي Developer Centers مركز المبرمجين ، والذي تجد فيه كل ما تحتاجه .
والآن قم باختيار أي قسم تود البحث أو التعلم فيه وليكن .net frame work مثلاً ، في هذا القسم سوف تجد قسم Downlaods لتحميل آخر البرامج والأدوات ، أيضاً تجد القسم التعليمي وهو الأهم على أية حال .

في القسم التعليمي ستجد قسم لأسئلة وأجوبة ، قسم للعروض التقديمية Presentations ، قسم آخر للتدريب وللكتب وغير ذلك .
أما لو قمنا باختيار قسم يهتم بالكود مثل Viusal C# فسوف تجد مجموعة من Tutorial التعليمية تأخذك خطوة بخطوة عبر هذه اللغة أو التقنية ، حيث تستطيع ايجاد كم هائل من الدروس والتطبيقات الجاهزة .
وفي كلا الأحوال تستطيع البحث عن ما تريد لتجد مجموعة من الأجوبة التي تفيدك في هذا الموضوع ، فمثلاً لو اردنا البحث عن SqlConnection والتي تستخدم لربط قاعدة البيانات من نوع Sql فسوف نجد الصفحة التالية :
http://msdn2.microsoft.com/en-us/library/system.data.sqlclient.sqlconnection(VS.71).aspx
والتي تحتوي على شرح كامل لهذا الـ Class بكل التقنيات المتاحة في الغالب ، كما سيحتوي الدرس على روابط لمواضيع متعلقة سوف يهمك أغلبها إذا استمررت في العمل من خلال هذا الـ Class ، كما قد تجد في بعض المواضيع مثالاً للعمل ، أو حتى تطبيقاً جاهزاً يمكنك عمل Download له .

وبعيداً عن الدروس المباشرة ستجد أحياناً مجموعة من التعليمات السريعة Hints لمشاكل ربما تواجه في العادة مستخدمي هذه التقنية ، كما ستجد مقالات تشرح لك ماذا يحدث خلف الكود وكيفية عمل هذه التقنية بالضبط .
بقي أن نشير أيضاً إلى وجود MSDN على أقراص CD's ليتم العمل عليه في حالة عدم الاتصال بالانترنت ، ويمكن تحديثها بالربط بالموقع أيضاً ...
ويمكنك تسجيل نفسك كعضو في MSDN للاستفادة من كامل الخدمات التي يقدمها الموقع من خلال بريدك الالكتروني على Live Hotmail .

مقدمة إلى لغة الذكاء الإصطناعي برولوج 2

2008-08-13T06:21:00.001-07:00

من منا لا يعرف مسألة أو لغز آينشتاين الذي انتشر كثيراً على المنتديات وجروبات الياهو وفي كل مكان ، وهو اللغز الذي يعتقد آينشتاين أن 98% من البشر لا يمكنهم حله ، هذا هو اللغز :

1- توجد خمس منازل لكل منها لون مختلف .

2- يسكن كل منزل شخص من جنسية مختلفه .

3- كل ساكن يفضل ان يشرب مشروبا معين , ويدخن سجائر نوع معين منها,ويحتفظ بحيوان أليف معين .

4- لاأحد من الجيران الخمسة يشرب نفس المشروب أو يدخن نفس النوع من السجائر أو لديه نفس الحيوان الأليف .

معلومات الربط :

* يسكن البريطاني في المنزل الأحمر .

* لدى السويدي كلب. * يحب الدنماركي شرب الشاي .

* البيت الأخضر على الجانب الأيسر من البيت الأبيض.

* مالك البيت الاخضر يشرب القهوة.

* الشخص الذي يشرب سجائر نوع بال مال لديه طائر.

* الرجل الذي يسكن في البيت الأوسط يشرب الحليب.

* مالك المنزل الأصفر يدخن سجائر نوع دانهيل .

* يسكن النرويجي في المنزل الاول .

* يسكن مدخن سجائر نوع مارلبور مجاورا لمن لديه قطه.

* الرجل الذي لديه حصان يسكن مجاورا لمن يدخن سجائر نوع دانهيل

* مدخن سجائر نوع وينفيلد يحب شرب الجعه (شراب الشعير).

* يسكن النرويجي مجاورا للبيت الأزرق .

* يدخن الألماني سجائر نوع روثمانز.

* مدخن سجائر نوع مارلبور لديه جار يحب شرب الماء.

المطلوب -.:

تحدد اللون / الجنسيه / الحيوان / المشروب / نوع السجائر لكل واحد مع توضيح :

من منهم لديه السمكة (أو أن حيوانه الأليف سمكة)؟

لا توجد خدعه في حل هذا اللغز , بل هو منطق صرف من يعرف الإجابة سيكون من ضمن أذكى أذكياء العالم (2% الأذكياء في العالم).

طبعاً كما ترى ، فاللغز عبارة عن مجموعة من البيانات على غرار (يدخن الألماني سجائر نوع روثمانز) ومجموعة من العلاقات على غرار (مدخن سجائر نوع مارلبور لديه جار يحب شرب الماء) ، وعندما تبدأ انت بحل هذه المشكلة ستبدأ في رص البيانات ومن ثم ربط العلاقات بها ، هذا ما يفعله البرلوج تماماً . ستجد نفسك تعطيه بعض المعلومات والقواعد ليقوم هو باستنتاج الحل . وهذا ما سنقوم به الآن .

بداية هذه المسألة بالغة الانجليزية لنستخلص منها بعض المصطلحات

The Brit lives in the red house.
The Swede keeps dogs as pets.
The Dane drinks tea.
The green house is on the left of the white house.
The green house's owner drinks coffee.
The person who smokes Pall Mall rears birds.
The owner of the yellow house smokes Dunhill.
The man living in the center house drinks milk.
The Norwegian lives in the first house.
The man who smokes Blends lives next to the one who keeps cats.
The man who keeps horses lives next to the man who smokes Dunhill.
The owner who smokes Bluemaster drinks beer.
The German smokes Prince.
The Norwegian lives next to the blue house.
The man who smokes Blend has a neighbour who drinks water.

والآن سننقل نفس البيانات السابقة ولكن بنظام كتابة برولوج :

next_to(X, Y, List) :- iright(X, Y, List).
next_to(X, Y, List) :- iright(Y, X, List).
iright(L, R, [L [R _]]).
iright(L, R, [_ Rest]) :- iright(L, R, Rest).
einstein(Houses, Fish_Owner) :-
=(Houses, [[house, norwegian, _, _, _, _], _, [house, _, _, _, milk, _], _, _]),
member([house, brit, _, _, _, red], Houses),
member([house, swede, dog, _, _, _], Houses),
member([house, dane, _, _, tea, _], Houses),
iright([house, _, _, _, _, green], [house, _, _, _, _, white], Houses),
member([house, _, _, _, coffee, green], Houses),
member([house, _, bird, pallmall, _, _], Houses),
member([house, _, _, dunhill, _, yellow], Houses),
next_to([house, _, _, dunhill, _, _], [house, _, horse, _, _, _], Houses),
member([house, _, _, _, milk, _], Houses),
next_to([house, _, _, marlboro, _, _], [house, _, cat, _, _, _], Houses),
next_to([house, _, _, marlboro, _, _], [house, _, _, _, water, _], Houses),
member([house, _, _, winfield, beer, _], Houses),
member([house, german, _, rothmans, _, _], Houses),
next_to([house, norwegian, _, _, _, _], [house, _, _, _, _, blue], Houses),
member([house, Fish_Owner, fish, _, _, _], Houses).

بعد ترجمة هذا المشروع ، تستطيع سؤال البرنامج عن اي منهم وسوف يتتبع البيانات المتاحة له + القواعد ليصل بك إلى الناتج ، هذا هو السؤال الأساسي والخاص بمن يمتلك سمكة :

?- einstein(Houses, Fish_Owner).

بداية ، دعني استغل ذكائك وحاول القيام بالحل بمفردك ، يمكنك التأكد من حلك باستخدام برولوج ، وفي النهاية لا تنس أن تحاول أن تتوسع في برولوج فقد تستفيد الكثير لاحقاً .

وفي الختام هذا هو الحل يمكنك اظهاره بتحديد الكلمة التالية بالماوس (الألماني) ، إذا لم يكن هذا هو حلك فأنت مرشح للانضمام إلى نادي ال 98% ، وهي نسبة ليست بسيطة كما ترى .

مقدمة إلى لغة الذكاء الإصطناعي برولوج 1

2008-08-13T06:19:00.000-07:00

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

لغة البرمجة Prolog والتي اخترعها الين كولمر ايور هي واحدة من أشهر اللغات المتخصصة في مجال الذكاء الإصطناعي ، وتعتمد اللغة على أسلوب المنطق في البرمجة ومن كلمة programmation en logique الفرنسية تم اشتقاق الكلمة الجديدة لترمز للغة .
*** المصدر : ويكيبديا .

وتعتبر اللغة Prolog قديمة نسبياً هناك لغات أخرى أصبحت أحدث مثل LISP ، لكن اللغة القديمة التي ظهرت في سبعينيات القرن المنصرم لا تزال تحتفظ بقدراتها حتى هذه اللحظة .

بداية كونك مبرمج تطبيقات عادية ب .net أو Java أو C++ لا يعني انك ستجد نفس ما تعلمته في برولوج ، أنس الأمر فالموضوع مختلف كلياً ، ولكنه سهل وبسيط ، حيث تعتمد برولوج في الأساس على العلاقات المنطقية بين الأشياء ، ويتم في هذه الحالة انشاء ما يعرف باسم ( قاعدة المعلومات Information Base ) وهي مختلفة عما عهدناه في عالم قواعد البيانات DataBase .

أيضاً ال Prolog متغيرة بالكامل ، فلا يمكن تحديد عدد أكوادها حيث أن البرنامج يتعلم أثناء عمل Run له وبالتالي عدد السطور قد يزيد أو ينقص حسب ما تعلمه البرنامج خلال هذه المراحل .

كيف أبدأ ؟

خطوتك الأولى للبداية تحتاج منك إلى استخدام أداة ما لتنفيذ أكوادك ، ستجد الكثير من الأدوات ، ولكني وجدت نسخة مناسبة اسمها Amzi Development Environment أثناء تصفحي في الموسوعة العربية ، لذا تستطيع أن تجد رابطها هنا :
http://www.c4arab.com/images/lessons/programming/AI/prolog/amzi_6-2-14_winnt.rar

كل ما عليك هو فتح ملف جديد ، وابدأ بكتابة الأكواد ، بعد الانتهاء قم باختيار Listener ثم Start لبدء التنفيذ .
مجدداً قم بالذهاب إلى Listener ومن ثم اختر Consult ومنه قم باختيار الملف الذي كتبت فيه الأكواد .
الخطوة الاخيرة ، هي البدء باستخدام البرنامج لعمل العلاقات ، سنشرح مثالاً تطبيقياً في الفقرة اللاحقة .

كيف ابرمج باستخدام برولوج ؟

كما ذكرنا في أول الدرس فإن Prolog تعتمد على العلاقات المنطقية ، فيمكنني القول مثلاً :

Human(Ahmed)
Car(Toyota)
Human(Khaled)

والمعنى باختصار ، أن أحمد و خالد من نوع انسان فيما تويوتا هي من نوع عربة .
جرب كتابة هذه الأسطر ، ومن ثم قم بتشغيل البرنامج كما أوضحنا في الجزء أعلاه (Listener -> Start ثم Listener -> Consult)

ومن ثم ابدأ بكتابة هذه الأسئلة :

?- Human(V).

هنا أن تقوم بسؤال البرنامج عن جميع من هم من النوع Human لتضعهم في المتغير V حيث سيقوم بعرضهم لك ، لا تنس أن يكون V حرف كابتيل .
طبعاً سيدأ بعرضهم علي واحداً وراء الآخر ، يمكنني ضغط Enter لو لم أرد عرض المزيد أو ; للاستمرار في العرض .

النوع الثاني من الأسئلة هو الذي تتوقع منه اجابة منطقية ، مثل هذا السؤال :

?- Human(Ahmed).

وسيرد عليك (نعم) أما لو ادخلت هذا السؤال :

?- Human(Ali).

فهذا البيان لم نقم بادخاله له في قاعدة المعلومات ، لذا ستكون الاجابة بالنفي .

حتى هذه اللحظة فأنا استخدم البيانات التي قمت بكتابتها ، قد يتساءل شخص ما ، إذن ما هي الجدوى من هذا البرنامج ، هذا ما سنتعرف عليه في الجزئين التاليين .

تركيب العلاقات :

في الأجزاء السابقة كانت الأسئلة اجابات على بيانات مباشرة موجودة في قاعدة المعلومات ، ولكن الجزء الأقوى هو الخاص بالعلاقات المتعددة ، فمثلاً لو بدأنا بعلاقة : أحمد أبو محمد

father(ahmed,mohammed)

نستطيع تعريف أن أحمد أبو علي أيضاً :

father(ahmed,ali)

وهكذا عندما نبدأ بالاستعلام عن أبناء أحمد ، سنضع الجملة التالية في السؤال :

?- father(ahmed,U)

فسيعطينا جميع الأبناء للثابت (أحمد) ، لا تنس ان أي حرف كابتيل يعتبر متغير في البرلوج .

القواعد :

هذه هي النقطة التي نريد الوصول إليها وهي تعريف القواعد ، وهي التي ستحقق لنا الفائدة المرجوة في هذه البرمجة حيث أنه في جميع ما سبق كان البرنامج يجيب من البيانات التي أدخلناها ، أما الآن فسيكون قادراً على الإجابة بناء على مجموعة من المعلومات ومجموعة من القواعد ، وهو ما يفعله العقل البشري في حالة التفكير في الاجابة ، ولنبدأ بأبسط الامثلة مثل ( كل السيارات لديها باب ، وكل الطيارات لها باب ) بالشكل التالي :

car(X) :- gotadoor(X).
cairplane(X) :- gotadoor(X).

والآن لو قمنا بتعريف عدد من السيارات والطائرات ، قم قمنا لاحقاً بسؤال البرنامج عما إذا كان للسيارة mazda مثلاً باب ، ومع أننا لم نذكر صراحة ان gotadoor(mazda) إلا أن البرنامج استنتج أن ال mazda لها باب نظراً لإنها سيارة ، وكل السيارات لها باب .

نهاية :

ما زال في عالم ال Prolog الكثير من الأوامر ، لا تنس الادخال والاخراج وال List ... الخ ، ولكن كانت هذه مقدمة سريعة للبدء في العمل ، ربما لم تتضح لك الفائدة بعد ولكن جرب الإطلاع على الرد التالي مباشرة ، ستجد مثالاً حقيقياً لكيفية الاستفادة من مثل هذه التطبيقات .

والله الموفق ...
والسلام عليكم ورحمة الله وبركاته .

بداية المدونة .. السلام عليكم

2008-08-11T14:00:00.000-07:00

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

مجرد مدونة جديدة ، بس مش شخصية مختصة بالتكنكال والمقالات والدروس اللي بكتبها باللغة العربية

أتمنى أن المدونة تكون مفيدة ، وأتمنى لك زيارة ممتعة

بلوجي الشخصي

AhmedGamal-Space.blogspot.com