|
Microsoft Jet 4.0 OLE DB Provider
|
| bet | 16/18 | | Sana | 22.12.2023 | | Hajmi | 0,81 Mb. | | #126729 |
Bog'liq KURS ISHILARMicrosoft Jet 4.0 OLE DB Provider tanlanadi
Jadvallarga уо I ko'rsatiladi
7.Data Source=Baza_nomi.mdb; Data Source bo'limida faqat fayl nomi qolishi kerak.
Shunda programma faylni o'zi turgan katalogdan izlaydi
8.Ok tugmasi bosiladi
9.ADOTablel komponentasining Connection hususiyatiga ADOConnection 1 tanlanadi
10.TableName tanlanadi. User Name va Password so'ralsa Ok tanlanadi
11.O'zimizga kerak bo'lgan jadvalni tanlashimiz mumkin
12.Formaga DATA ACCESS bo'limidan DataSourcel qo'yiladi va DATASET ga ADOTablel
tanlanadi
13. Data Controls bo'limidan formaga DBGridl qo'yiladi va DataSource hususiyatiga DataSourcel tanlanadi
14.ADOTablel komponentasining Active hususiyati true qilinadi
15.Dasturni har ish tushurganda parol so'ramsligi ushun ADOConnectionl komponentasining LoginPrompt hususiyati false qilinadi
Jadvalning biror maydoni qiymatlarini ComboBox komponentasiga qo'shish
Jadvalning biror maydoni qiymatlarini ComboBox komponentasiga qo'shishda, shu maydon qiymatiga mos ID qiymatlarini ham qo'shish kerak. Bu ishni ma'lumotlarni OBJECT shakldida qo'shish orqali amalga oshiramiz.
Yuqorida keltirilgan dasturni davom etamiz.
1.Formaga Button va ComboBox komponentalarini qo'ying.
2.Button komponentasi ustida sichqonchani 2 marta bosing va quyidagilarni kiriting:
void fastcall TForml::ButtonlClick(TObject *Sender)
{
ADOTablel->First(); ComboBoxl->Clear(); while( !ADOTablel->Eof )
{
ComboBoxl->Items->
AddObject(ADOTablel->FieldByName("g_nomi")->AsString, (TObject*)ADOTablel-
>FieldByName("id")->AsInteger); ADOTablel->Next();
} }
3.Formaga Label komponentasini qo'ying.
4.ComboBoxdayi Object shaklida qo'shishgan ma'lumotlarni o'qib olish quyidagicha.
ComboBox komponentasi ustida sichqonchani 2 marta bosing va quyidagilarni kiriting:
|
| |
