استعمال SQLite في تطبيق دلفي متعدد الأجهزة- تصميم إطار لإدخال البيانات

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

 تصميم إطار لإدخال البيانات:

نواصل تصميم التطبيق ونضيف إطار جديد لإدخال البيانات كما يلي :

1- في قائمة ملف، نختار "جديد" ثم ننقر على الخيار "إطار متعدد الأجهزة-دلفي" كما في الشكل :

سيظهر إطار جديد له الخاصية "Name"  القيمة "  Form2"
2- وضع شريط أدوات TToolBar على الإطار .

3- وضع عنصر TButton على شريط الأدوات ToolBar مع تعيين الخصائص التالية في شريط"خصائص العناصر" كما يلي :

- تعيين الخاصية Name على ButtonSave.

- تعيين الخاصية StyleLookup على organizetoolbuttonbordered.

-تعيين الخاصية Align على Right .

4- وضع عنصر TPanel على الفورم مع تيين الخاصية Align على "Client"
5- وضع عنصر TButton على اللوح TPanel 

-تعيين الخاصية Name على ButtonPhoto.

- تعيين الخاصية StyleLookup على cameratoolbutton.

-تعيين الخاصية Visible على False .

6-وضع عنصر TImageعلى اللوح TPanel
7--وضع عنصر  TOpenDialog على الفورم ونعين له الخاصية "Filter" كما في الشكل :

والخاصية "Title" على القيمة "فتح صورة"
8-على الإطار "Form2"  ، ننقر ننقر نقرا مزدوجا ونكتب الكود التالي بعد العبارة  :implementation

uses Unit1;

كما في الشكل :

9- نستعين بالخبير LiveBindings لإنشاء خانات الإدخال وربطها بأعمدة العنصر FDQuery2 للفورم Form1
- نربط العمود Nom بعنصر TEdit كما  يلي :
- النقر بالزر اليمن للماوس في أي مكان على الفورم لإظهار "مصمم LiveBindings" ثم ننقر على "الخبير LiveBindings " كما في الشكل :

- نعين الخيار ربط عنصر بحقل ثم ننقر على التالي كما في الشكل :

- نعين العنصر TEdit ، بعدها ننقر "التالي" :

-نختار FDQuery2 ثم ننقر "التالي" :

- نعيين الحقل Nom ثم ننقر التالي :

- نعين الاختيار "إضافة عنوان للعنصر " ثم ننقر "إنهاء"

- نكرر نفس العملية مع الحقل Prenom.
- نربط العنصر Image1 بالعمود "PHOTO" ، حيث نقوم بالعملية يدويا وذلك بالنقر(مع الحفاظ على الزر مضغوط)  على  الخاصية "Bitmap" في العنصر "Image1"  وتمرير الماوس إلى الخاصية "PHOTO"  بالعنصر "FDQuery2"  :

10-وضع عنصر TStyleBook على الإطار وتعديل الخاصية Ressource كما يلي:

-النقر على الزر الذي يحتوي على  النقاط الثلاث يسار الخاصية Ressource-

- في الإطار الذي يظهر ننقر على الزر "تحميل".

- الانتقال إلى المجلد الذي يحتوي على الأنماط. في حالتنا هذه ، هو :

"C:\Program Files\Embarcadero\Studio\16.0\Redist\styles\Fmx"

- اختيار النمط المراد، في حالتنا هذه ، هو :  "Transparent.Style" ، ننقر على الزر فتح ، ثم على الزر "تطبيق وإغلاق"

- بعدها ، الذهاب إلى خصائص الإطار، وتعيين الخاصية StyleBook ونعين لها القيمة StyleBook1 

9- بعدها ننتقل إلى تحرير الكود الخاص بإدخال وتحرير البيانات باستعمال منصة البرمجة السريعة  Delphi