Зертханалық жұмыс №1 «Қойма» деректер қорын басқару жүйесін құру


Экрандық формада әртүрлі кестелер мәліметтерін бейнелеу үшін SQL-сұраныстарды қолдану



бет18/100
Дата06.02.2022
өлшемі1,89 Mb.
#53051
1   ...   14   15   16   17   18   19   20   21   ...   100
Байланысты:
БД-зертханалық жұмыс
БД-зертханалық жұмыс
Экрандық формада әртүрлі кестелер мәліметтерін бейнелеу үшін SQL-сұраныстарды қолдану.
Бірнеше кестелерді бейнелеуіне арналған бір форманы құрайық. Ол үшін, TDataModule5 контейнерінде TQuery компонентін (компоненттер палитрасының Data Access парағы) орналастырамыз. Өз бетінше оның аты Query1. Оның DatabaseName қасиетін PRIMER мәніне орнатамыз. TDataSource (атауы TDataSource4) компонентін орналастырамыз. Оның DataSet қасиетін Query1 мәніне орнатамыз.
№4 формада TDBGrid компонентін орналастырамыз. Оның DataSource қасиетін DataSource4 деп белгілейміз.
Query1 компоненті үшін, объектілер инспекторында SQL қасиетін табамыз да, батырмасын шертеміз. Пайда болған редактор терезесінде SQL-сұранысының мәтінін енгіземіз:
SELECT P.DatPrih, P.Material, P.Kolvo,Т.Zena,
(P.Kolvo * T.Zena) As Stoim
FROM Materialy T, Prihod P
WHERE T.Material = P.Material
ORDER BY P.DatPrih, P.Material
ОК батырмасын шертеміз.
Осыдан кейін, Query1.Active қасиетін True мәніне орнатамыз. Query1 мәліметтер жиыны қоймаға келіп түсетін материалдар жөнінде мәліметтер құралған. Осы жиынның жазбасының құрамында DatPrih (келу мерзімі), Material (Материал аты), Kolvo (келіп түскен мөлшер), Zena (бір материал үшін орнатылған бағасы), Stoim (келіп түскен материалдың бағасы) өрістері бар. SQL қасиетіндегі сұраныс мәтінінен көрінгендей, PRIMER МҚ мәліметтер жиыны екі кестеден «жиналады», олар Materialy.DB және Prihod.DB. Осыдан осы МҚ кестелерінің жазулары, бірдей мәнді Material өрісінен жиналады (33-сурет).



33-сурет – Әртүрлі кестелерден мәліметтерді бір кестеге біріктіру


№1 формадағы Отчет пунктінде келесі кодты енгіземіз:


Form1.Visible := False;
Form4.Visible := True;
Query1 мәліметтер жиынында жаңа жазуларды қосуға, жазуларды өзгертуге және жоюға болмайды. Ол бірнеше кестелерден жиналған жазбалар тек оқуға ғана арналғанг болып табылатындақтын, өзгертуге рұқсаты жоқ.


Достарыңызбен бөлісу:
1   ...   14   15   16   17   18   19   20   21   ...   100




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет