Movebook.DB Кестеге басыңыз және Move МТ-ні ашыңыз: обьектілер инспекторында оның Active қасиетіне True мәнін қойыңыз. Солай Nakls кестесің ашыңыз.
File ► Use Unit Командасы арқылы негізгі терезесінің модулін мәліметтер мулімен байланыстырыңыз. DBGrid1 үстіңгі сеткасы үшін DataSource қасиеттер тізімін ашыңыз және онда DataSource1 пункті тандаңыз – сетка бірден Nakls МТ-ден мәліметтермен толтырылады. Солай астыңғы сеткасын DataSource2 мәліметтер негізімен байланыстырыңыз. DBNavigator1 МҚ DataSource1 навигаторымен источнигімен байланыстырыңыз.
Обьект өрістерін жасау.
Сеткаларында парнерлардың және кітаптар аттарын көрсету үшін басқа кестелерден қосымша өрістерін МТ-ға қосып, МТ-ді кеңейту керек. Ол үшін бағдарламарың прогонын аяқтап, мәліметтер модуліне оралыңыз. Мәліметтер модулі терезесін бейнелеунуі үшін F12 пернесін басыңыз, және терезенің ортасында бір орынға жиналған компоненттер бірін-бірі басып орналастырмауы үшін оларды терезенің жан жағына таратыңыз. Nakls компонентіне екі рет шертіп, өрістерін редактілейтін тересін ашыңыз, контекстік мәзірінде Add all fields командасын тандаңыз – редактор терезесі Nakls кестенің барлық өрістер тізімімен толтырылады. Бұл тізім Nakls МТ-дің әр бір өрісі үшін арнайы өзінің қасиеттерімен, әдістерімен,және оқиғаларымен обьект жасалғандақтың белгісі. Егер сіз өрістерді редактілеу терезесінде кез келген өрісіне шертсеңіз, онда обьектілер инспектрі терезесінде өрістер-обьектісінің қасиеттері мен оқиғалары шығады. Үнсіз келісім бойынша Delphi өріс-обьектісіне атын береді, ол МТ аты мен өріс атының қосындысынан тұрады, енді бағдарламада NaklsNaklID, NaklsNFirm, NaklsNDate және т.б. аттары бар компоненттір пайда болады.
Move МТ үшін өрістер-обьектісін жасаңыз.
МТ-ріне басқа кестелердің өрістерін қосу үшін осы кестлері үшін сәйкесінше МТ-ді істеуіміз қажет: обьект ағаштарының терезесінде DB компонентіне тағы 3 TTable компонетті «салыңыз» ; оның біріншісін FIRMS кестемен байланыстырыңыз, екінші BOOKS атын беріп МТ-ні BOOKS кестесімен, үшіншісін TYPENAKL атын беріп TYPENAKL кестесімен байланыстырыңыз(бүл кесте салым типті кодының разшифрофкасы бар). Тағы да Nakls компонетінде екі рет шерту арқылы өрістері редактілеу терезесін ашыңыз, контекстік мәзірі шақырып, онда New Field командасын таңдаңыз, ол жаңа өрісті жасаушысын шақытту үшін істелінеді.
16 сурет. жаңа өрісті құрастырушы терезесі.
Жаңа өрістері құрастырушы арқылы МТ-де жаңа өрістерді 3 типтіңбіреуіне жасалуы мүмкін(тип Field type тізіміндегі ауыстырылымдарда анықталады).
Data —өрістер арнайы мәліметтерді сақтайды ; Calculated —есептеленетін мәліметтерді сақтайды; Lookup — өрістер подстановка кестесінің мәліметтерін сақтайды;
Бірінші типті өріс бұл өрістің OnGetText оқиғаны қорытушыда толтырылатын бос бағананың сеткасында бейнеленеді. Есептеленетін өріс OnCalcFields МТ-ің оқиға қорытушыда толтырылады. Подстанвка өрісін толтыру шін мәлімттер басқа МТ-нің керекті өрісінен алнады.
өрісті құрастырушы терезесінің Name жолында жаңа Firm Name өрістің атын енгізіңіз, Туре тізімін ашып , өріс үшін String типті тан даңыз, оның Size өлшемін 40 тең етіп қойып, Lookup переключатель орнатыңыз, Key Fields өрістер тізімін ашып, МТ-де NFirm өрісін таңдаңыз, Dataset тізімінде Firms МТ-ні тандаңыз, Lookup Fields тізімінде – FirmID кілттік өрісті тандаңыз, Result Field тізімінде - FName өрісті тандаңыз. ОК басыңыз.
Nakls МТ-не мәтіндік типті атты өрісті құрастырыңыз, 23 символды ұзындығымен , ол үшін NType кілтік өрісті тандап, оны TypeNakl мәліметтер теруінің TypeID өріспен байланыстырыңыз және қорытынды өріс ретіне осы МТ-ның TName өрісті тандаңыз.
Move МТ үшін 3 атты ауыстыру Name, Author және Publish өрістерін құрастырыңыз, оларды МВоок өрісі арқылы Books МТ-мен байланыстырып, BName, BAuthor, BPublish қорытынды өрістер ретіне сәйкесінше алыңыз. Бұл өрістер кітаптар тізімінде құрамды өрісті форматтау үшін керек болады. өрістердің өлшемдері сәйкесінше – 75, 30 ,40 .
2 бөлім. Кестелер. Сұраныстар. Мәліметтерді визуациялау.
SQL - сұраныстарын құрастыру.
SQL -сұраныстарын жасау үшін Delphi ортасынан Database ► Explore командасын немесе негізгі мәзірден Пуск ► Программы ► Borland Delphi 7 ► SQL Explorer командасын орындаңыз. Одан кейін брандмаузер терезесінде BIBLDATA псевдонимін тауып, оның сол жақтағы байланыс батырмасына басыңыз, ол «кітапхана» МҚ-ға шығу үшін жасалады. Бұл МҚ файл-серверік болғандықтан онда тек кестелер сақталады. BIBLDATA байланысты ашып, кез-келген кестенің атыа басыңыз, одан кейін Enter SQL вклакасына өтіңіз.(17 сурет)
17 сурет. SQL –сұранысты форматтау және оны орындалуы.
Достарыңызбен бөлісу: |