السلام عليكم ورحمة الله
مرحبا بكم مع درس جديد من دروس مدونة عالم البرمجة
عندك مشكلة في الإتصال بقعادة البيانات من الدلفي أو بعبارة أخرى عندك مشكلة في ربط قاعدة بيانات أكسس مع الدلفي
هذا الشرح سيبسط لك العملية ويشرح كل الخطوات بالتفصيل الممل .. بالصور والفيديو أيضا .. وسيتم إضافة شرح بالصوت لاحقا
كما سيتم إضافة ملحقات الشرح لاحقا .. من صور الشرح والفيديو والمشروع على الدلفي جاهزا وكذلك ملف قاعدة البيانات
عندك مشكلة في الإتصال بقعادة البيانات من الدلفي أو بعبارة أخرى عندك مشكلة في ربط قاعدة بيانات أكسس مع الدلفي
هذا الشرح سيبسط لك العملية ويشرح كل الخطوات بالتفصيل الممل .. بالصور والفيديو أيضا .. وسيتم إضافة شرح بالصوت لاحقا
كما سيتم إضافة ملحقات الشرح لاحقا .. من صور الشرح والفيديو والمشروع على الدلفي جاهزا وكذلك ملف قاعدة البيانات
حول الدرس
شرح ربط قاعدة بيانات Access مع Embarcadero Delphi 2011 XE
تم إعداد هذا الدرس الشامل حول كيفية الربط .. لأنه يعتبر أحد ركائز دخول عالم دلفي
لأن أغلب البرامج تحتاج الربط مع قواعد البيانات
كما أنني لم أجد أي شروحات في العالم العربي أجمع واضحة ومفهومة للمتعلمين
فإما تجد شرح مصور وغير كامل وغير مفهوم أو تجد شرح بالفيديو فقط دون صوت ودون الإرفاق بصور وهكذا
الشرح بالصور وبالتفصيل
نقوم بفتح برنامج ( Microsoft Access ) الذي سنستعمله في إنشاء قاعدة بيانات
يمكنك تحميل البرنامج أسفل الصفحة
1- إختر مكان حفظ ملف قاعدة البيانات
2- إسم ملف القاعدة
3- صيغة الملف ( إختر كما في الصورة 2002-2003 )
4- إضغط OK
7- عرض الجدول لكن حسب أسماء الحقول وخصائص كل حقل فقط دون إضافة أو تعديل البيانات التي بداخل كل حقل
أضف مثلا حقلين ( Name / Phone ) يعني حقل لكتابة الأسماء والآخر لأرقام الهواتف
كل ما عليك هو الضغط على Cliquer pour ajouter ثم اختيار النوع Texte ثم كتابة Name
بعدها في الحقل الموالي إختر النوع Nombre واكتب إسم الحقل الثاني Phone
لتظهر النتيجة كما في الصورة
الآن بعد الانتهاء من إضافة الحقول وأنواعها إضغط على ( Affichage )
للقيام بتعديل بيانات الحقول
يمكننا تغيير أسماء الحقول مجددا وإسم الجدول والتحكم في إعدادات كل حقل
الآن نقوم بحفظ قاعدة البيانات
أو ( Alt ثم F ثم N ثم V ) كما في الصورة الموالية
الآن مباشرة يتم حفظ ملفات المشروع والفورمات الموجودة بالمشروع (هنا فورم واحد) كما في الصورة
في المستندات المجلد (RAD Studio/Projects) كما يمكنك الحفظ في أي مكان تشاء وداخل أي مجلد تشاء
الآن هذا ما سنحاول الوصول إليه
شرح المكونات التي تم إضافتها
3- (DataSource1) للربط بين القاعدة والجدول
4- إضافة DBGrid وهو الجدول الذي بالأبيض والذي سيعرض لنا الجدول بحقوله ومعلوماته
5- إضافة إلى DBNavigator لنتحكم به في الجدول .. إضافة معلومات تعديل حذف .. وهكذا
من قائمة المكونات الظاهرة في الصورة
الموجودة في الأعلى
أو الموجودة على اليسار
( إن لم تكن تظهر القائمة إضغط بيمين الماوس في الأعلى على يمين أزرار التحكم واختر Components أو إضغط حرف N من لوحة المفاتيح .. كما في الصورة
الآن قم باختيار (dbGo)
فتظهر هاته القائمة
الآن إختر
كما في الصورة
الآن نذهب إلى DataControls
لتظهر القائمة التالية
من مجوعة المكونات التالية
والمكون DBNavigator (للتحكم في الجدول)
والنتيجة إلى الآن كالتالي
إضغط على المكون (ADOConnection) لاختيار قاعدة بيانات
إختر Microsoft Jet 4.0 OLE DB Provider الموافقة لقواعد بيانات أكسس
واضغط عليها مرتين
الآن إضغط الزر الموجود أمام خانة ( Select or enter a database name )
الموضح في الصورة
وإلا فإن الإتصال لم يتم بنجاح .. حاول حينها اختيار قاعدة بيانات صحيحة
ليتم الربط مع ADOTable كما في الصورة
وهنا تم الربط مع ADOTable1 الخاص بالجدول الأول في قاعدة البيانات
وفي حالة كان هناك أكثر من جدول سنستخدم المكونين (DataSource/ADOTable)
أكثر من مرة كالتالي :
إذهب الآن للمكون ADOTable1
وتابع الخطوات كما في الصورة
1- إضغط مرتين داخل خانة (Connection) ليتم الربط مع (ADOConnection1)
2- إختر من خانة (TableName) الجدول المراد استعماله
3- غير خانة Active من False إلى True
وفي حالة لم ينجح الأمر تأكد من المعلومات مجددا أو كرر العملية من الأول
ليتم الربط مع DataSource1
الآن يتبقى ربط المكون DBNavigator
إضغط عليه
ثم إضغط مرتين متتاليتين داخل الخانة DataSource
إضغط الآن على زر التنفيذ للتجريب
من الأعلى
أو إضغط على F9
1- تحديث
ويصير الجدول فارغا كالآتي
الآن يمكننا إضافة أي معلومات مثلا (www.progwd.net) ورقم (554151254)
أم رقم الصف فيضاف تلقائيا .. لأن خاصية الحقل N° كما ذكرت في الأعلى هي ترقيم تلقائي والرقم هنا 3
لأنه تم حذف صفين قبله (1 و 2)
وأي استفسار يمكنكم طرحه هنا
أو مراسلتي على بريدي
progwd@gmail.com
يمكنك تحميل البرنامج أسفل الصفحة
تظهر الواجهة الرئيسية للبرنامج
1- لاختيار مكان حفظ ملف قاعدة البيانات
2- لإنشاء القاعدة ثم فتحها لإنشاء الجداول وإدخال المعلومات
2- إسم ملف القاعدة
3- صيغة الملف ( إختر كما في الصورة 2002-2003 )
4- إضغط OK
ضع أي إسم تشاء .. مثلا ضع (db1)
وقم بحفظه في سطح المكتب
بعد الضغط على OK .. تكون النتيجة كالتالي
بعدها إضغط على Créer ( بالإنجليزية : Create ) ليتم إنشاء القاعدة
الآن تم إنشاء قاعدة البيانات وتظهر لنا إعداداتها وخصائصها والجداول الموجودة بها
يمكننا الآن إضافة جداول , حقول , معلومات .. إلخ
1- إسم الجدول الأول Table1 ( إذا أضفت جداول أخرى فإنها ستظهر مباشرة تحت الجدول الأول في نفس القائمة )
2- مكان آخر لظهور الجداول يسهل عملية التبديل بين الجداول والتحكم في خصائص الجدول كإعادة التسمية أو الحذف وغيرها
3- أعمدة الجدول ( Rows )
4- حقول الجدول ( Columns )
5- الخانات التي تضاف داخلها البيانات ( كلمات/أرقام/تاريخ .. إلخ )
6- أنواع الحقول ( نصية/عددية/تاريخ ووقت .. إلخ )7- عرض الجدول لكن حسب أسماء الحقول وخصائص كل حقل فقط دون إضافة أو تعديل البيانات التي بداخل كل حقل
أنواع الحقول الممكن إضافتها وكما ترى في الصورة هناك حوالي 10 أنواع
الأول مثلا حقل نصي يضم الحروف والأرقام والثاني مثلا للأعداد وهكذا
أضف مثلا حقلين ( Name / Phone ) يعني حقل لكتابة الأسماء والآخر لأرقام الهواتف
كل ما عليك هو الضغط على Cliquer pour ajouter ثم اختيار النوع Texte ثم كتابة Name
بعدها في الحقل الموالي إختر النوع Nombre واكتب إسم الحقل الثاني Phone
لتظهر النتيجة كما في الصورة
الآن بعد الانتهاء من إضافة الحقول وأنواعها إضغط على ( Affichage )
للقيام بتعديل بيانات الحقول
بعد الضغط تظهر النافذة الموالية ( Enregistrer Sous )
لاختيار إسم للجدول
1- إختر إسم الجدول
2- إضغط OK
وليكن الإسم مثلا Students ( طلبة )
يمكننا تغيير أسماء الحقول مجددا وإسم الجدول والتحكم في إعدادات كل حقل
1- إسم الجدول
2- مكان عرض الجداول
3- إسم الحقول الأول الخاص برقم كل طالب
4- إسم الطالب
5- رقم هاتفه
7- نوع الحقل الأول ( حقل ذي ترقيم تلقائي )
8- حقل من نوع نصي يقبل حروف وأرقام ورموز ولا يتجاوز 255 حرفا
9- حقل من نوع رقمي يقبل أرقام
هنا مثلا يمكننا تغيير إعدادات الحقل الثاني Name طول الحقل نوعه هل يمكن أن يكون فارغا أم لا .. وهكذا
الآن نقوم بحفظ قاعدة البيانات
ونقوم بالخروج من البرنامج ( مستحسن ) حتى يمكننا استعمال القاعدة داخل Delphi
وهذا هو ملف قاعدة البيانات قد تم إنشاءه وبصيغة ( 2002-2003 )
الآن نفتح برنامج الدلفي ( Embarcadero Rad Studio ) أو Delphi
ننتظر تحميل وفتح البرنامج
وهاته الواجهة الرئيسية للبرنامج
نضغط على File / Fichier / ملف
أو ( Alt ثم F ثم N ثم V ) كما في الصورة الموالية
ثم نضغط الزر الموالي لحفظ المشروع والفورم
الآن يظهر الملف الأول Unit1 وهو ملف الفورم الأول ويمكنك تسميته ما تشاء , بعدها إضغط Save
الآن قم بحفظ المشروع (Project1) أو ضع إسما آخر لا مشكلة .. مثلا ( TecDZ ) ثم إضغط Save للحفظ
الآن مباشرة يتم حفظ ملفات المشروع والفورمات الموجودة بالمشروع (هنا فورم واحد) كما في الصورة
في المستندات المجلد (RAD Studio/Projects) كما يمكنك الحفظ في أي مكان تشاء وداخل أي مجلد تشاء
الآن هذا ما سنحاول الوصول إليه
شرح المكونات التي تم إضافتها
1- الإتصال بقاعدة البيانات بالمكون (ADOConnection1)
2- اختيار الجدول المراد بالمكون (ADOTable1)3- (DataSource1) للربط بين القاعدة والجدول
4- إضافة DBGrid وهو الجدول الذي بالأبيض والذي سيعرض لنا الجدول بحقوله ومعلوماته
5- إضافة إلى DBNavigator لنتحكم به في الجدول .. إضافة معلومات تعديل حذف .. وهكذا
من قائمة المكونات الظاهرة في الصورة
الموجودة في الأعلى
أو الموجودة على اليسار
( إن لم تكن تظهر القائمة إضغط بيمين الماوس في الأعلى على يمين أزرار التحكم واختر Components أو إضغط حرف N من لوحة المفاتيح .. كما في الصورة
الآن قم باختيار (dbGo)
فتظهر هاته القائمة
إختر منها ADOConnection
و ADOTable
الآن إختر
كما في الصورة
لتظهر لك هاته القائمة
إختر منها المكون (DataSource)
والنتيجة حاليا كالتالي
(أضفنا مكونات الإتصال ADOConnection/ADOTable/DataSource)
الآن نذهب إلى DataControls
لتظهر القائمة التالية
من مجوعة المكونات التالية
نختار
DBGrid (الخاص بعرض جدول بحقوله وبياناته)
والمكون DBNavigator (للتحكم في الجدول)
والنتيجة إلى الآن كالتالي
إضغط على المكون (ADOConnection) لاختيار قاعدة بيانات
إضغط مباشرة على Build
إختر Microsoft Jet 4.0 OLE DB Provider الموافقة لقواعد بيانات أكسس
واضغط عليها مرتين
أو إضغط مرة واحدة ثم إضغط على Connection من الأعلى أو (CTRL+Tab)
الآن إضغط الزر الموجود أمام خانة ( Select or enter a database name )
الموضح في الصورة
إبحث عن قاعدة البيانات (أنا وضعتها في سطح المكتب)
ثم إضغط مرتين عليها أو مرة واحدة ثم Open
الآن كما في الصورة يظهر مكان القاعدة
1- Test Connection لاختبار الإتصال بالقاعدة التي تم اختيارها
عند الضغط تظهر النافذة التالية المكتوب فيها (Test Connection Succeeded)
أي أن الإتصال تم بنجاح
2- إضغط OK لإتمام الإتصال
الآن إختر المكون (DataSource1) بالضغط مرة واحدة
إذهب للقائمة على اليسار واضغط مرتين داخل خانة DataSet
ليتم الربط مع ADOTable كما في الصورة
وهنا تم الربط مع ADOTable1 الخاص بالجدول الأول في قاعدة البيانات
وفي حالة كان هناك أكثر من جدول سنستخدم المكونين (DataSource/ADOTable)
أكثر من مرة كالتالي :
ADOTable1/DataSource1
ADOTable2/DataSource2
.
.
.
ADOTable10/DataSource10
إذهب الآن للمكون ADOTable1
وتابع الخطوات كما في الصورة
1- إضغط مرتين داخل خانة (Connection) ليتم الربط مع (ADOConnection1)
2- إختر من خانة (TableName) الجدول المراد استعماله
3- غير خانة Active من False إلى True
وفي حالة لم ينجح الأمر تأكد من المعلومات مجددا أو كرر العملية من الأول
الآن نذهب للمكون DBGrid
ونضغط مرتين في خانة DataSource
ليتم الربط مع DataSource1
والنتيجة كالتالي .. بعد أن تم الربط
ستظهر المعلومات الموجودة داخل الجدول من أرقام المسجلين وأسمائهم وهواتفهم
ويمكنك الضغط في أي خانة والتعديل باستثناء خانات الحقل N° الخاص بأرقام الطلبة
لأنه تم تحديده كحل ذي ترقيم تلقائي
الآن يتبقى ربط المكون DBNavigator
إضغط عليه
ثم إضغط مرتين متتاليتين داخل الخانة DataSource
ليتم ربط DataSource1 أيضا هنا
والنتيجة مجددا كالتالي .. أنظر أسفل الصورة كيف تغيرت إعدادات النافيجاتور
الآن يعمل ويمكنك بواسطته التحكم في الجدول
إضغط الآن على زر التنفيذ للتجريب
من الأعلى
أو إضغط على F9
وهذه هي النتيجة .. تظهر لك نافذة البرنامج المصغر
يمكنك التعديل على البيانات مباشرة بالضغط داخل أي خانة
أو باستعمال DBNavigator
وهذا شرح لوظائف كل أزراره العشرة
1- تحديث
2- إلغاء التعديل
3- الموافقة على التعديل
4- التعديل على الخانة
5- حذف الصف كاملا يعني إذا حذفت الآن فسيحذف رقمه (1) والإسم (Mohammed Fellak) ورقم الهاتف (0554151254)
6- إضافة صف جديد
7- الإنتقال لأول صف في الجدول
8- الإنتقال خطوة للأعلى
9- الإنتقال خطوة للأسفل
10- الإنتقال لآخر صف في الجدول
في حالة الحذف مثلا وبالضغط على الزر رقم 5 ( - ) مرتين يتم حذف الصف الأول والثاني للطالبين المسجلين
ويصير الجدول فارغا كالآتي
الآن يمكننا إضافة أي معلومات مثلا (www.progwd.net) ورقم (554151254)
أم رقم الصف فيضاف تلقائيا .. لأن خاصية الحقل N° كما ذكرت في الأعلى هي ترقيم تلقائي والرقم هنا 3
لأنه تم حذف صفين قبله (1 و 2)
إلى هنا ينتهي الشرح
وأي استفسار يمكنكم طرحه هنا
أو مراسلتي على بريدي
progwd@gmail.com
الدرس بالفيديو
على مدونة عالم البرمجة
على مدونة عالم البرمجة
الشرح الذي قمت به كان على Delphi 2011 XE .. لكن ما قمت شرحته ينطبق تماما على Delphi 7
فقط ألفت انتباهك إلى أنه هناك اختلاف فقط في أسماء المكونات والأدوات ( إنجليزي / فرنسي )
لكن ليس بالاختلاف الكبير إطلاقا .. وأهم شيء رمز المكون
إضافات
Microsoft Access
برنامج إنشاء قواعد بيانات
التحميل من الموقع الرسمي (إضغط على Try it now) لتحميل حزمة MS Office 2010 كاملة معها Access
بيئة تطوير على الدلفي لبرمجة وتصميم برامج بقواعد بيانات أو بدونها