برامج وتقنيات: استعمال SQLite في تطبيق دلفي متعدد الأجهزة- إنشاء قاعدة بيانات

في هذا الموضوع سنعرض كيفية إنشاء قاعدة بياناتdataBase من نوع SQlite ونضيف إليها جدول (Table) باستعمال منصة البرمجة Delphi النسخة Embarcadero XE8.

- تستعمل هذه القاعدة في تطبيق لمتابعة الطلبة داخل وخارج أقسام الدراسة .

- في الجدول الأول نقوم بتخزين اسماء وألقاب الطلبة مع صورة شخصية للطالب .

- نبدأ أولا بعرض طريقة تخزين البيانات وتعديلها وعرضها في نظام ويندوز ثم في نظام اندرويد .

تصميم البرنامج:

- في هذا الجزء نقوم بإشاء تطبيق جديد ، نضيف إليه العناصر الأساسية لعمل البرنامج والاتصال بقاعدة البيانات من نوع SQlite

1. اختيار نوع التطبيق : سنختار تطبيق من نوع "تطبيق متعدد الأجهزة- دلفي " من خلال القائمة : "ملف /جديد" كما في الشكل :

2- لربط الاتصال بقاعدة البيانات SQlite نختار عناصر من قائمة الأدوات، هذه العناصر هي :

- العنصر TFDConnection:

- العنصر TFDPhysSQliteDriverLink :

والعنصر TFDGUIxWaitCursor :

هذه العناصر نضيفها إلى الإطار form1 الذي تم إنشاؤه مع إنشاء التطبيق كما في الشكل:

إنشاء قاعدة البيانات

3- الآن نقوم بتغيير إعدادات العنصر TFDConnection:

- نقوم بالنقر المزدوج على العنصر FDConnection1 في الإطار فيظهر شكل مماثل لما يلي :

- نغير الإعدادات كما هو موضح في الجدول التالي :


Drive id SQlite
Database D:\gestutidiants\gestetud.slh
LockingMode Normal

- يمكن النقر على الزر "اختبار" للتأكد من ان الأمور على ما برام :

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

4- بعده نقوم بحفظ المشروع باسم "getud" والوحدة باسم "Unit1"

-إنشاء جدول :

1- نضيف عنصر TFDQuery من قائمة الأدوات :

2- ننقر نقرا مزدوجا على العنصر FDQuery1 ونكتب الكود التالي :

CREATE TABLE ETUDIANTS (
  ID      INTEGER NOT NULL,
  NOM     VARCHAR(100) NOT NULL,
  PRENOM  VARCHAR(100) NOT NULL,
  PHOTO   BLOB SUB_TYPE BINARY ,/* Keys */
  PRIMARY KEY (ID)
);