14. DBGrid1 компонентининг Columns хусусиятини тахрирлаш ойнасига ўтинг ва жадвалга бешта устун кўшинг. Сўнгра устунларнинг сарлавҳалари номини Title/Caption хусусияти ёрдамида ўзгартиринг. майдонидаги мос келувчи устунларни ўчиринг (27-расмга каранг).
27 - расм. Устунларнинг сарлавҳаларини ўрнатиш.
15. Form1 формасига TDBMemo компонентини жойлаштиринг. Унинг Data Source хусусиятига Data Module2.Data Source1 ва Data Fields хусусиятига Comment кийматларини ўрнатинг.
16. Data Sourse1 маълумотлар модулининг таркибига кирувчи Fields элиментида сичкончанинг ўнг тугмачасини босинг ва хосил бўлган контекстли менюдан Add all Fields пунктини танланг (28-расм каранг).
28 - расм. Fields элементини созлаш.
17. FromTime ва ToTime майдонлари (устунлари) учун DisplayFormat хусусиятига hh.pp (соат:дакика) кийматини кўйинг.
18. Form1 формасига бош меню ва унинг куйидаги пунктларини тузинг: Файл (Чикиш), Кидириш (Сана бўйича, Телефон бўйича, Фильтрдан озод килиш), Ходисалар (Кўшиш, Ўчириш, Тахрирлаш).
19. Form1 формаси учун дастурдан чикишни тасдиклаш процедурасини ва форманинг ўлчамини ўзгартира олмайдиган хусусиятларини ўрнатинг.
20. Проектни сакланг ва уни ишга туширинг. Натижани ўкитувчига кўрсатинг. Натижа 29-расмдагидек кўринишга эга бўлади.
29-расм. Form1 формаси кўриниши.
30-расм. Ходисаларни (маълумотларни) киритиш ва тахрирлаш формаси.
21. 30-расмда кўрсатилган намунадагидек ёзувларни киритиш ва тахрирлаш учун фойдаланиладиган формани тузинг. Тахрирлаш ойнасининг Uses кисмига Unit2 (маълумотлар модули) модулини ёзинг. Маълумотларни киритиш каторлари сифатида тўртта TDBEdit (Data Controls компонентлар панелидаги) компонентларини формага жойлаштиринг. Унинг DataFiled хусусиятига маълумотлар базасидаги керакли майдонларни (устунларни) кўйинг.
Do'stlaringiz bilan baham: |
