البرمجة غرضية التوجيه بالدلفي
Orienté Objet يسمح للمبرمج بصنع برامج و تطبيقات ذات واجهة غرضية التوجيه
التي ستنفصل فيها لاحقا ان سمح لنا الأخ راغب أمين بالنشر ، و معناها باختصار صنع برامج بأزار و أشكال كما نريد و ليس في سطور أوامر مثل الباسكال .
قد يسأل البعض لماذا بالخصوص سنبرمج بالدلفي ؟ سؤال وجيه و الاجابة عنه هي أن الدلفي يجمع بين القوة و السهولة ... القوة من ناحية عظمة البرامج المبرمجة به و السهولة كون أنه يستعمل لغة الباسكال أساسا التي هي اسهل لغة للمبتدئين. و لكي تتوضح الأمور أكثر نقارن بين السكايب المبرمج بدلفي و الامسن بـ سي بلس بلس فالسكايب سريع جدا و الأخطاء فيه نادرة أما الأم اس ان فتعرفون كثرة الثغرات و البطئ وهذا راجع لانسيابية و لزاجة تعامل الدلفي مع أنظمة قواعد البيانات . و للذين فاتهم القطار يمكنهم مسايرة الركب بتعلم الباسكال باللغة الفرنسية على الرابط الآتي :
دلفي موجود في عدة نسخ و أفضل استعمالنا للنسخة 6 أو 7 الموجودتان في إصدارين
يحتوي على Entreprise و الفرق أن إصدار المؤسسات Personnel أو Entreprise
مكونات لاستغلال أنظمة قواعد البيانات و غيرها المفقودة في الاصدار الآخر، و للتعلم يكفي استخدام الإصدار الشخصي المتوفر في الرابط الآتي
الأساس في الدلفي أن نضع عنصر ما و نقوم ببرمجته إما لاستغلال خواصه او خواص الفورم او مراقبة احداث او استغلال احدى موارد
نظام التشغيل و غيرها. و قبل أن نعطي مقالا علينا أن نعي أن هناك خاصة مميزة لكل عنصر على حدى و هي الإسم.
مثال ناخذ زر Button من شريط Standart و نضعه على الفورم ثم نذهب للخصائص نبحث عن
Th3pro نسميه مثلا Caption و نغير من خاصية TH3pro و نغير قيمتها مثلا Name
نلاحظ ان نص الزر تغير
هذا كفكرة أولية و للتمعق يجب أن نعرف ان لكل عنصر خصائصه فمثلا الفورم الرئيسي لديه قيمةو هي التي تظهر كعنوان للنافذة بينما caption :=form1
captionالزر تغير من نصه . يمكن تغيير هذه الخصائص برمجيا و هذا ما سنراهمثلا نضع زر ثاني و نسميه zirثم نغير السورس للزر الاول بالضغط مرتين عليه و نكتب بين
Begin و;end الكود الآتي :
Begin
Zir.caption :=’changement’ ;
end ;
Execution-executer أو من شريط F9 للتجريب نقوم بالتنفيذ بالضغط على
و نلاحظ تغير نص الزر الثاني Th3pro سنلاحظ ظهور نافذة محسنة نوعا ما نضغط على
Caption إذا لاحظتم الكود و ضعت نقطة بعد اسم الزر ثم ذكرت خاصية
و قمت بتغيير قيمتها بوضع القيمة التي بين ‘ ‘ و هذا لان الكابشن تتقبل فقط المتغيرات النصية
String أي Variables Chaines de caractères
NomObjet.propriété :=Valeur; و هذه هي صيغة استغلال اغلب الخواص في الدلفي
Ctrl+F9 لصنع الملف التنفيذي نقوم بتسجيل المشروع في مجلد معين ثم نضغط على
EDIT نختم بمثال : تغيير لون الفورم و عنوانه نفتح مشروع جديد . نحتاج لزر و
Exemples من شريط ColorGrid ثم
نترك الاسماء كما هيفي كود سورس الزر نكتب الكود الآتي
Caption إذا لاحظتم الكود و ضعت نقطة بعد اسم الزر ثم ذكرت خاصية
و قمت بتغيير قيمتها بوضع القيمة التي بين ‘ ‘ و هذا لان الكابشن تتقبل فقط المتغيرات النصية
String أي Variables Chaines de caractères
NomObjet.propriété :=Valeur; و هذه هي صيغة استغلال اغلب الخواص في الدلفي
Ctrl+F9 لصنع الملف التنفيذي نقوم بتسجيل المشروع في مجلد معين ثم نضغط على
EDIT نختم بمثال : تغيير لون الفورم و عنوانه نفتح مشروع جديد . نحتاج لزر و
Exemples من شريط ColorGrid ثم
نترك الاسماء كما هيفي كود سورس الزر نكتب الكود الآتي
Begin
form1.caption :=edit1.text ;
form1.color := Colorgrid. ForegroundColor ;
end ;