АРМ реєстратора лікарні

2.Пояснювальна частина роботи.

Проектування бази даних здійснюється за допомогою BDE Administrator в меню Пуск-Програми-Delphi- BDE Administrator.

Загальна характеристика предметної області.

Основна робота менеджера лікарні — облік пацієнтів, запис у потрібні книги, направлення у відділи, лікарів.

Узагальнена схема алгоритму функціонування

При прийомі нового хворого, необхідно записати його прізвище, ім’я, по батькові, дату народження, дату прийому, скарги, направлення у відділ тощо.

При запуску програми відображається головне вікно програми, на якому відображається інформація про всіх хворих.

Інформація про поступленого хворого вводиться у діалоговому вікні „Новий пацієнт”, яке відкривається з головного меню Пацієнт → Новий

procedure TForm1.N6Click(Sender: TObject);

begin

form1.Table1.Append;

form3.showmodal;

end;

Після заповнення потрібних полів для занесення пацієнта в базу даних натискаємо Прийняти.

Якщо потрібно знайти певного пацієнта, всіх пацієнтів за певний день, відділу, необхідно скористатись діалоговим вікном Пошук. (Пацієнт → Пошук).

Запрограмувати це можна таким чином:

procedure TForm1.N7Click(Sender: TObject);

begin

form4.ShowModal

end;

Вибираємо потрібний критерій, задаємо значення і натискаємо кнопку Пошук. Щоб відобразити всі записи, вибираємо пункт головного меню Пацієнт → Показати всі.

procedure TForm1.N8Click(Sender: TObject);

begin