Mirsaid Aripov, Nurillo Otaxanov

TForm1.Button1Click protsedurasi So`rovnoma tugmasi chertil-ganda ishga tushadi. U foydalanuvchidan familiyani qabul qilib oladi va SQL-hususiyatiga yangi satr-so`rovnoma qo`shadi. So`ngra Open metodi yordamida so`rovnomani faollashtiradi.

E`tibor bering, SQL-so`rovnoma hususiyatini o`zgartirishdan avval, uni Close metodi bilan yopilyapti.

TForm1.Button2Click protsedurasi Jadval to`laligicha tugmasi chertilganda ishga tushadi hamda DataSource1 komponentasi uchun ma`lumotlar manbai sifatida Table1 komponentasini o`rnatadi, shu bilan jadvalni to`la ko`rish rejimiga o`tishni ta`minlaydi.

Agar forma yaratish vaqtida SQL hususiyatiga qidirish kriteriyasi yozib qo`yilgan bo`lsa, bu kriteriyani boshqasi bilan almashtirish uchun o`zgartirish talab qilingan kriteriyaga so`rovnoma matnida mos keladigan satrni almashtirish yetarli. Masalan, quyidagi

Select DISTINCT Fam, Ism, sinf

From ":maktab:uquvchi.db"

Where (Sinf '10a')

Order by Fam, ism

so`rovnomasi uchun so`rovnoma shartini almashtirish buyrug’ini mana bunday yozish mumkin:

forml.Query1.SQL[3] : '(Fam"'  fam '")'

Eslatma: SQL hususiyati Tstrings tipidagi struktura bo`lgani uchun, satrlar noldan boshlab nomerlanadi.