استعمال SQLite في تطبيق دلفي متعدد الأجهزة- تحرير كود البحث عن البيانات

البحث عن باينات:

يمكن البحث عن بيانات داخل جدول ، حسب اسم حقل  أو أكثر من الحقول المتوفرة ، وللبحث في جدول نستعمل العبارة "select" في استعلام متبوعة باسماء الحقول التي نريد أن تظهر في النتائج وبعدها اسم الجدول الذي نريد البحث فيه، ثم أدات الشرط  where متبوعة بعبارة الشرط،وهذه مراحل تصميم وكتابة النص البرمجي الخاص بالبحث عن سجلات في جدول :

للبحث عن البيانات داخل جدول بقاعدة البيانات ، نضيف عنصر  TEdit إلى الفورم Form1 و نعدل الخاصية Name إلى "EditSearchName"

-نعين العنصر "EditSearchName" ، ننقر نقرا مزدوجا على الحدث OnChange ونكتب الكود التالي : 

procedure TForm1.EditSearchNameChange(Sender: TObject);
begin

  with FDQuery2 do
  begin
    Active := false;
    sql.clear;
    sql.Add('select * from etudiants where nom like' +
      quotedstr('%' + EditSearchName.Text + '%'));
    Active := true;
  end;

- نحفظ التطبيق باستعمال المفتاحين "CTRL+S" ثم المفتاح "F9"   لتنفيذ التطبيق، نضيف القليل البيانات، ونكتب في الخانة "بحث" حرف أو حروف حتى نرى نتائج تنفيذ أمر البحث ، ولإظهار كافة السجلات، نمسح محتوى هته الخانة :

 

الموضوع التالي : كيفية استعمال البرنامج