База данных "Студия загара солярия Мулаточка" - Отчет по практике

Актуальность данного проекта по дисциплине Технология разработки программного обеспечения основано на разработке программного проекта, на приобретенных знаниях о базе данных и языках программирования. Разрабатываемый программный комплекс Студия загара солярия Мулаточка предназначен для осуществления автоматизации обслуживания в салонных студиях. В разрабатываемом техническом задании на разработку автоматизированной системы обработки информации и управления Студия загара солярия Мулаточка, представлен краткий анализ работы заведения, спектр требований, выдвигаемых к персоналу, техническим средствам, функциональным характеристикам и условиям эксплуатации. В настоящее время для учета данных в салонных заведениях используются такие программные средства, как пакет прикладных программ Microsoft Office, не учитывающие специфику предметной области. Для проведения определенных сервисных работ по обслуживанию комплекса требуется программист по сопровождению, удовлетворяющий следующим требованиям: - знание аппаратного состава компьютера; - навыки администрирования ОС Microsoft Windows 98/ XP; - знание пакета Microsoft Office; - знание Microsoft Access; - знание Delphi. Таблица Klient Наименование реквизитов Тип реквизитов Размерность Имя в программе kodKl Счетчик Длинное целое Счетчик fio Текстовый 50 Ф.И.О. adres Числовой 50 Адрес konTel Текстовый 50 Телефон dataReg Дата/время 30 Дата регистрации udost Текстовый 50 Удостоверение skidka Числовой Длинное целое Скидка Таблица Obsluga Наименование реквизитовТип реквизитовРазмерностьИмя в программе nomerPor Счетчик Длинное целое Счетчик data Дата/время 30 Дата kodKl Числовой Длинное целое Код Клиента kodSotr Числовой Длинное целое Код kodUslugi Числовой Длинное целое Код услуги cena Числовой Длинное целое Цена услуги kolVoOo Числовой Длинное целое Кол-во услуг itogSum Числовой Длинное целое сумма skidka Числовой Длинное целое Скидка koplate Числовой Длинное целое К оплате Таблица Sotrudniki Наименование реквизитовТип реквизитовРазмерностьИмя в программе kodSotr Счетчик Длинное целое Счетчик fio Текстовый 50 Ф.И.О. ПРИЛОЖЕНИЕ ФОРМА Добро пожаловать! unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Buttons, jpeg, sSkinManager; type TForm1 = class(TForm) BitBtn1: TBitBtn; BitBtn2: TBitBtn; BitBtn3: TBitBtn; BitBtn4: TBitBtn; Panel1: TPanel; Label1: TLabel; Image1: TImage; Label2: TLabel; Label3: TLabel; Image2: TImage; BitBtn6: TBitBtn; procedure BitBtn1Click(Sender: TObject); procedure BitBtn2Click(Sender: TObject); procedure BitBtn3Click(Sender: TObject); procedure BitBtn4Click(Sender: TObject); procedure BitBtn6Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation uses Unit3, Unit2, Unit5, Unit7, Unit9; {$R *.dfm} procedure TForm1.BitBtn1Click(Sender: TObject); begin DM.tbSotrudniki.Append; Form2.ShowModal; end; procedure TForm1.BitBtn2Click(Sender: TObject); begin DM.tbKlient.Append; Form5.ShowModal; end; procedure TForm1.BitBtn3Click(Sender: TObject); begin DM.tbObsluga.Append; Form7.ShowModal; end; procedure TForm1.BitBtn4Click(Sender: TObject); begin DM.tbUslugi.Append; Form9.ShowModal; end; procedure TForm1.BitBtn6Click(Sender: TObject); begin if Application.MessageBox(Вы действительно хотите выйти?.