Целта на работата. научите как да се свърже с проекта на базата данни, създадени в Microsoft Access; да ги използват в програмата.
Прогрес. създават в база данни на Access "Clinic" данни, състоящи се от три таблици (в областта имената не могат да съдържат интервали.):
1) Посещения (Nomer_meditsinskogo_polisa, data_posescheniya диагностика)
Независимо определят видовете полета, ключови области, ако те са необходими за свързване на таблици в схемата на базата данни. Напълнете записите в таблиците (най-малко 10 записа във всяка маса). Дръжте основата на една бъдеща папка проект.
Започване на нов проект в Делфи. Запазване на него.
Добави в оформянето компоненти с ADO раздела: ADOConnection, ADOTable, с раздели DataAccess компоненти DataSource, раздел DBControl компонент DBGrid.
Персонализирайте ADOConnection1: ConnectionString имот - изберете Използване ConnectionString - Изграждане: Доставчици OLE DB - изберете Microsoft Jet 4.0 OLE DB доставчик, в раздела Connection, изберете вашата база данни, уточни относителен път; (. \ Nazvanie_ bazy_dannyh.mdb) върху раздела Разширени, задаване на предишната отметка в квадратчето за премахване на четене / писане, както и.
LoginPrompt собственост (искане на парола за отваряне на основата), създадена фалшива.
Персонализирайте DataSource1: DataSet имот - ADOTable1.
Персонализирайте ADOTable1: Връзката имот - ADOConnection1, TableName - пациент.
Персонализирайте DBGrid1: DataSource имот - DataSource1.
Активен имот в ADOTable1 излагайте вярно.
Ако всичко е направено правилно, то ще бъде показано в DBGrid'e досиета на пациентите от масата.
Добави към DB Navigator форма. Прикрепете го към DBGrid'u. Скриване на всички бутони за промени в базата данни. DBGrid направи си сам само за четене.
Създаване на още една форма. Съдържание й като "Въвеждане на данни на пациента."
Вместо DBGrid използват и други компоненти с разделите DataControl за полета и Пол район Брой DBComboBox'y употреба. В DBEdit компоненти са определени две свойства: DataSource и DataField.
По същия начин за издаване на формата за въвеждане на информация за лекарите, формата за въвеждане на данни за посещенията на болния лекар.
За да организира прехода от формата, за да образуват.
Създаване на нова форма на "търсене на данни от пациенти."
Прибавете към това и формата на елементите на източник на данни ADOConnection, ADOQuery, персонализирате тях.
Добави формата на компонентите за показване на информация за пациента при поискване (може да използвате DBCtrlGrid, го поставете върху останалите компоненти).
Организирайте запитвания :. фамилия, дата на раждане, номер на здравна политика, и така нататък.
ADOQuery1.Close; // близо поискване
ADOQuery1.SQL.Clear; // изчистване на SQL заявка за новите условия
ADOQuery1.SQL.Text: = 'Selectfromwhere желаната област =: p1; // образуват заявка текст, Р1 - вход заявката параметър
ADOQuery1.Parameters [0] .Value: = edit1.text; // искане специфична стойност определен параметър
ADOQuery1.Open; // отворена запитване
Друг пример на заявката:
ADOQuery1.Close; // близо поискване
ADOQuery1.SQL.Clear; // изчистване на SQL заявка за новите условия
ADOQuery1.SQL.Text: = 'Selectfromwhere желаната област като' '' + Edi1.text + '%' ''; // образуват текста на заявката, съответното поле започва със знаците, въведени в Edit1.text
ADOQuery1.Open; // отворена запитване
Направете отделна форма за търсене на информация за лекари (заявки условия, за да излезе от себе си).
Организирайте запитвания от множество таблици:
- Всички пациенти, които са посетили клиниката в определен ден; (Добавено към края на реда заявка, като можете да зададете група за дадена област)
- Всички пациенти с диагноза ...
- Всички пациенти, които са родени по-късно ....
3 измисли тяхната сложна заявка (за заявки и работа условия, или) и да ги изпълни.
Свързани статии