Загрузка...
Учебная работа. Курсовая работа: База данных предприятия
Сибирский межрегиональный институт строительства и предпринимательства.
Курсовой проект
По дисциплине:
«Разработка разработки программных товаров»
Студента заочного отделения
Группы ПОВТ 63-02
Ахматова Константина Ивановича
г. Иркутск
2008 г.
Содержание
Введение.
1. ТЕХНИЧЕСКОЕ ЗАДАНИЕ. ГОСТ 19.201-78
2. ПОЯСНИТЕЛЬНАЯ ЗАПИСКА. ГОСТ 19.404-79
3. текст ПРОГРАММЫ. ГОСТ 19.401-78
4. ОПИСАНИЕ ПРОГРАММЫ. ГОСТ 19.402-78
5. программка И методика ИСПЫТАНИЙ. ГОСТ 19.301-79
6. ОПИСАНИЕ ПРИМЕНЕНИЯ. ГОСТ 19.502-78
7. РУКОВОДСТВА СИСТЕМНОГО ПРОГРАММИСТА ГОСТ 19.503-79.
8. РУКОВОДСТВО ОПЕРАТОРА. ГОСТ 19.505-79
Перечень использованной литературы
Введение
Целью курсового проекта является:
· Разработка системы управления базами данных и комфортного резвого доступа к инфы.
· Разработка программного продукта с внедрением объектно-ориентированной методологии;
· Разработка программной и эксплуатационной документации в согласовании с ГОСТ-19 ЕСПД.
· Для заслуги цели нужно было изучить главные понятия баз данных.
· Наименования программы-база данных компаний.
1.
ТЕХНИЧЕСКОЕ ЗАДАНИЕ.
ГОСТ 19.201-78
1.1 Наименование программки
база данных для службы быта (справочник пользователя). Программный продукт сотворен с применением языка программирования Delphi в среде компилятора Borland Delphi 7.0.
база данных дозволяет:
получить информацию о предприятиях городка;
приготовить отчет о предприятиях городка.
1.2 Цель разработки
Создать базу данных для службы быта.
Эта база обязана содержать последующую информацию:
· заглавие компании;
· разряд;
· адресок;
· телефоны;
· специализацию;
· список оказываемых услуг;
· часы и деньки работы.
Тема разработки: база данных для службы быта.
1.3 Предназначение разработки
Данная программка применима в деятель Службы быта, справочного бюро.
получить информацию о предприятиях городка;
приготовить отчет о предприятиях городка.
1.4 порядок контроля и приемки
Программный продукт тестировался на работоспособность на компе с нужным, установленным программным обеспечением (Borland Delphi 7.0.).
Для настоящей работы базы данных нужно наличие всех компонент данного программного продукта: модули и таблицы с данными.
2. ПОЯСНИТЕЛЬНАЯ ЗАПИСКА.
ГОСТ 19.404-79
Реальный эталон устанавливает требования к содержанию и оформлению программного документа «Объяснительная записка», определённого ГОСТ 19.101-77, входящего в состав документации на стадиях разработки эскизного и технического проекта программки.
2.1 Введение
Программное обеспечение – «База данных для службы быта»
2.2Основание разработки для разработки:
программка разрабатывается для курсового проекта по предмету «Разработка Разработки Программного Продукта» Сибирский Муниципальный Межрегиональный институт строительства и предпринимательства, начало разработки 07.10.2008
Тема разработки база данных для службы быта
2.3 Предназначения и область внедрения
Данная программка применима в деятель Службы быта, справочного бюро.
получить информацию о предприятиях городка;
приготовить отчет о предприятиях городка.
2.4 Технические свойства
Программка написана на языке программирования Delphi в среде компилятора Borland Delphi 7.0. Не считая того нужно наличие Microsoft ActiveX Data Objects (ADO) – машинка баз данных Borland. Представляет собой набор DLL –библиотек, обеспечивающих низкоуровневый доступ к локальным и клиент-северным БД. Обязана устанавливаться на любом компе, который употребляет приложения для работы с БД, написанные для Delphi.
3. ТЕКСТ ПРОГРАММЫ.
ГОСТ 19.401-78
3.1 Код основного модуля программки
Unit
1
unitUnit1; форма «справочник пользователя»
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, StdCtrls, Menus, ToolWin, ComCtrls, comobj,
Buttons, ExtCtrls;
type
TForm1 = class(TForm)
DBGrid1: TDBGrid;
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
N11: TMenuItem;
Label1: TLabel;
FindEdit: TEdit;
Label2: TLabel;
Edit1: TEdit;
Label3: TLabel;
FindTelephoneEdit: TEdit;
Button1: TButton;
Toolbar1: TToolBar;
Excel1: TMenuItem;
N12: TMenuItem;
N13: TMenuItem;
Panel1: TPanel;
SpeedButton1: TSpeedButton;
SpeedButton2: TSpeedButton;
SpeedButton3: TSpeedButton;
SpeedButton4: TSpeedButton;
SpeedButton5: TSpeedButton;
procedure N5Click(Sender: TObject);
procedure N6Click(Sender: TObject);
procedure N7Click(Sender: TObject);
procedure N8Click(Sender: TObject);
procedure N9Click(Sender: TObject);
procedure N10Click(Sender: TObject);
procedure FindEditChange(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Excel1Click(Sender: TObject);
procedure SpeedButton1Click(Sender: TObject);
procedure SpeedButton2Click(Sender: TObject);
procedure SpeedButton3Click(Sender: TObject);
procedure N13Click(Sender: TObject);
procedure SpeedButton4Click(Sender: TObject);
procedure N12Click(Sender: TObject);
procedure SpeedButton5Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses DataModuleUnit, TownBookUnit, EditFormunit, FindResultUnit,
AboutFormUnit;
{$R *.dfm}
procedure TForm1.N5Click(Sender: TObject);
begin
TownBookForm.ShowModal;
end;
procedure TForm1.N6Click(Sender: TObject);
begin
DataModule2.BookTable.Insert;
EditRecordForm.ShowModal;
end;
procedure TForm1.N7Click(Sender: TObject);
begin
EditRecordForm.ShowModal;
end;
procedure TForm1.N8Click(Sender: TObject);
begin
If Application.MessageBox(PChar(‘Выдействительнохотитеудалить’
+DataModule2.BookTableDSDesigner.AsString), ‘внимание!!!’ ,
MB_OKCANCEL)=id_OK then
DataModule2.BookTable.Delete;
end;
procedure TForm1.N9Click(Sender: TObject);
begin
DataModule2.BookTable.IndexFieldNames:= ‘[Названиепредприятия]’;
end;
procedure TForm1.N10Click(Sender: TObject);
begin
DataModule2.BookTable.IndexFieldNames:= ‘город‘;
end;
procedure TForm1.FindEditChange(Sender: TObject);
begin
If Length (FindEdit.Text)>0 then
DataModule2.BookTable.Filtered:=true
else
DataModule2.BookTable.Filtered:=false;
DataModule2.BookTable.Filter:='[Названиепредприятия]>»’+FindEdit.Text+»»;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
DataModule2.FindQuery.Active:=false;
DataModule2.FindQuery.Parameters.ParamByName(‘Telephone’).Value:=
FindTelephoneEdit.Text;
DataModule2.FindQuery.Active:=true;
FindResultForm.ShowModal;
end;
procedure TForm1.Excel1Click(Sender: TObject);
var
XLApp,Sheet,Colum:Variant;
index,i:Integer;
begin
XLApp:= CreateOleObject(‘Excel.Application’);
XLApp.Visible:=true;
XLApp.Workbooks.Add(-4167);
XLApp.Workbooks[1].WorkSheets[1].Name:=’отчет‘;
Colum:=XLApp.Workbooks[1].WorkSheets[‘отчет‘].Columns;
Colum.Columns[1].ColumnWidth:=20;
Colum.Columns[2].ColumnWidth:=20;
Colum.Columns[3].ColumnWidth:=20;
Colum.Columns[4].ColumnWidth:=20;
Colum.Columns[5].ColumnWidth:=20;
Colum.Columns[6].ColumnWidth:=20;
Colum.Columns[7].ColumnWidth:=20;
Colum.Columns[8].ColumnWidth:=20;
Colum.Columns[9].ColumnWidth:=20;
Colum:=XLApp.Workbooks[1].WorkSheets[‘отчет‘].Rows;
Colum.Rows[2].Font.Bold:=true;
Colum.Rows[1].Font.Bold:=true;
Colum.Rows[1].Font.Color:=clBlue;
Colum.Rows[1].Font.Size:=14;
Sheet:=XLApp.Workbooks[1].WorkSheets[‘отчет‘];
Sheet.Cells[1,2]:=’Служба быта’;
Sheet.Cells[2,1]:=’Заглавие компании‘;
Sheet.Cells[2,2]:=’Разряд’;
Sheet.Cells[2,3]:=’город‘;
Sheet.Cells[2,4]:=’Адресок’;
Sheet.Cells[2,5]:=’Телефоны’;
Sheet.Cells[2,6]:=’Специализация’;
Sheet.Cells[2,7]:=’Список оказаваемых услуг’;
Sheet.Cells[2,8]:=’Форма принадлежности’;
Sheet.Cells[2,9]:=’Часы и деньки работы‘;
index:=3;
DataModule2.BookTable.First;
for i:=0 to DataModule2.BookTable.RecordCount-1 do
begin
Sheet.Cells[index,1]:=DataModule2.BookTable.Fields.Fields[1].AsString;
Sheet.Cells[index,2]:=DataModule2.BookTable.Fields.Fields[2].AsString;
Sheet.Cells[index,3]:=DataModule2.BookTable.Fields.Fields[3].AsString;
Sheet.Cells[index,4]:=DataModule2.BookTable.Fields.Fields[4].AsString;
Sheet.Cells[index,5]:=DataModule2.BookTable.Fields.Fields[5].AsString;
Sheet.Cells[index,6]:=DataModule2.BookTable.Fields.Fields[6].AsString;
Sheet.Cells[index,7]:=DataModule2.BookTable.Fields.Fields[7].AsString;
Sheet.Cells[index,8]:=DataModule2.BookTable.Fields.Fields[8].AsString;
Sheet.Cells[index,9]:=DataModule2.BookTable.Fields.Fields[9].AsString;
Inc(index);
DataModule2.BookTable.Next;
end;
end;
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
DataModule2.BookTable.Insert;
EditRecordForm.ShowModal;
end;
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
EditRecordForm.ShowModal;
end;
procedure TForm1.SpeedButton3Click(Sender: TObject);
begin
If Application.MessageBox(PChar(‘Выдействительнохотитеудалить’
+DataModule2.BookTableDSDesigner.AsString), ‘внимание!!!’ ,
MB_OKCANCEL)=id_OK then
DataModule2.BookTable.Delete;
end;
procedure TForm1.N13Click(Sender: TObject);
begin
AboutForm.ShowModal;
end;
procedure TForm1.SpeedButton4Click(Sender: TObject);
begin
AboutForm.ShowModal;
end;
procedure TForm1.N12Click(Sender: TObject);
begin
Close;
end;
procedure TForm1.SpeedButton5Click(Sender: TObject);
begin
Close;
end;
end.
3.2
Код
модуля
unit DataModuleUnit
unit DataModuleUnit;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDataModule2 = class(TDataModule)
ADOConnection1: TADOConnection;
BookTable: TADOTable;
DataSource1: TDataSource;
BookTableDSDesigner: TAutoIncField;
BookTableDSDesigner2: TWideStringField;
BookTableDSDesigner3: TWideStringField;
BookTableDSDesigner4: TWideStringField;
BookTableDSDesigner5: TWideStringField;
BookTableDSDesigner6: TWideStringField;
BookTableDSDesigner7: TWideStringField;
BookTableDSDesigner8: TWideStringField;
BookTableDSDesigner9: TWideStringField;
BookTableDSDesigner10: TDateTimeField;
BookTableDSDesigner11: TBooleanField;
TownSourse: TDataSource;
TownTable: TADOTable;
TownTableKey1: TAutoIncField;
TownTableDSDesigner: TWideStringField;
BookTableDSDesigner12: TWideStringField;
FindQuery: TADOQuery;
FindSource: TDataSource;
FindQueryDSDesigner: TAutoIncField;
FindQueryDSDesigner2: TWideStringField;
FindQueryDSDesigner3: TWideStringField;
FindQueryDSDesigner4: TWideStringField;
FindQueryDSDesigner5: TWideStringField;
FindQueryDSDesigner6: TWideStringField;
FindQueryDSDesigner7: TWideStringField;
FindQueryDSDesigner8: TWideStringField;
FindQueryDSDesigner9: TWideStringField;
FindQueryDSDesigner10: TWideStringField;
FindQueryDSDesigner11: TDateTimeField;
FindQueryDSDesigner12: TBooleanField;
procedure BookTableFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataModule2: TDataModule2;
implementation
uses Unit1;
{$R *.dfm}
procedure TDataModule2.BookTableFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept:=false;
If copy(BookTableDSDesigner.AsString,1,Length(Form1.FindEdit.Text))=
Form1.FindEdit.Text then
Accept:=true;
end;
end.
3.3.
Код
модуля
TownBookUnit
unit TownBookUnit;форма «городка»
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, StdCtrls;
type
TTownBookForm = class(TForm)
DBGrid1: TDBGrid;
OK: TButton;
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure OKClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
TownBookForm: TTownBookForm;
implementation
uses DataModuleUnit;
{$R *.dfm}
procedure TTownBookForm.Button1Click(Sender: TObject);
begin
DataModule2.TownTable.Insert;
DBGrid1.SetFocus;
end;
procedure TTownBookForm.Button2Click(Sender: TObject);
begin
if DataModule2.TownTable.Modified then
DataModule2.TownTable.Post;
end;
procedure TTownBookForm.Button3Click(Sender: TObject);
begin
DataModule2.TownTable.Delete;
end;
procedure TTownBookForm.OKClick(Sender: TObject);
begin
TownBookForm.Close;
end;
end.
3.4
код
модуля
EditFormunit
unit EditFormunit; форма «редактированиеданных»
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DBCtrls, Mask;
type
TEditRecordForm = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
DBEdit5: TDBEdit;
DBCheckBox1: TDBCheckBox;
DBLookupComboBox1: TDBLookupComboBox;
Label6: TLabel;
Button1: TButton;
Button2: TButton;
Label7: TLabel;
Label8: TLabel;
DBEdit6: TDBEdit;
DBEdit7: TDBEdit;
DBEdit8: TDBEdit;
Label9: TLabel;
Label10: TLabel;
DBEdit9: TDBEdit;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
EditRecordForm: TEditRecordForm;
implementation
uses DataModuleUnit;
{$R *.dfm}
procedure TEditRecordForm.Button1Click(Sender: TObject);
begin
if DataModule2.BookTable.Modified then
DataModule2.BookTable.Post;
Close;
end;
procedure TEditRecordForm.Button2Click(Sender: TObject);
begin
DataModule2.BookTable.Cancel;
Close;
end;
end.
3.5
код
модуля
FindResultUnit.
unitFindResultUnit; форма «итог поиска»
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids;
type
TFindResultForm = class(TForm)
DBGrid1: TDBGrid;
private
{ Private declarations }
public
{ Public declarations }
end;
var
FindResultForm: TFindResultForm;
implementation
uses DataModuleUnit, EditFormunit, TownBookUnit, Unit1;
{$R *.dfm}
end.
3.6.
Код
модуля
AboutFormUnit
unitAboutFormUnit; форма «о программке»
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls;
type
TAboutForm = class(TForm)
Panel1: TPanel;
Label1: TLabel;
Label2: TLabel;
private
{ Private declarations }
public
{ Public declarations }
end;
var
AboutForm: TAboutForm;
implementation
{$R *.dfm}
end.
4. ОПИСАНИЕ ПРОГРАММЫ.
ГОСТ 19.402-78
4.1 Общие требования
база данных для службы быта (справочник пользователя).
Программный продукт сотворен с применением языка программирования Delphi в среде компилятора Borland Delphi 7.0.
4.2 Описание логической структуры
Для реализации прикладной части системы была выбрана среда разработки Borland Delphi 7.0. Доступ к БД осуществляется через Microsoft activeX Data Objects (ADO) .
Также были применены последующие составляющие:
· TADOConnection;
· TDATASourse;
· TADOQueri;
4.3 Функциональное предназначение
Даная программка применима для коммерческой деятель (справочная по компаниям, информационное бюро).
Основная форма программки содержит полную информацию о предприятии (заглавие, разряд, адресок, телефоны, специализация, список услуг, часы и деньки работы). Форма редактирование данных, на данной для нас форме идет добавление новейшей записи, или редактирование имеющейся.
4.4 Применяемые технические средства
ОС Windows(98, МЕ,2000,XP), и выше, клавиатура мышь.
Программка написана на языке программирования Delphi в среде компилятора Borland Delphi 7.0. Не считая того нужно наличие Microsoft ActiveX Data Objects (ADO) – машинка баз данных Borland. Представляет собой набор DLL –библиотек, обеспечивающих низкоуровневый доступ к локальным и клиент-северным БД. Обязана устанавливаться на любом компе, который употребляет приложения для работы с БД, написанные для Delphi.
Пуск программку осуществляется при открытии файла S_P.EXE.
4.5 Входные данные
информация вводимая с клавиатуры.
4.6 Выходные данные
Инфы выводимая на экран.
4.7 структура БД
Пояснение к схеме:
Таблицы:
· Служба быта — содержит полную информацию по компаниям;
· Справочник городов – содержит перечень городов.
Поля (таблица служба быта):
· Код номера
· Заглавие компании;
· Разряд;
· город;
· Адресок;
· Телефоны
· Специализация
· Список оказываемых услуг
· Форма принадлежности
· Часы и деньки работы
· Дата
· Телефон
Поля (таблица справочник городов):
· Key
· Заглавие городка
5. программка И методика ИСПЫТАНИЙ.
ГОСТ 19.301-79
5.1 Объект испытаний
база данных для службы быта.
5.2 Область внедрения
Даная программка применима для коммерческой деятель (справочная по компаниям, информационное бюро).
5.3 Цель испытаний
Проверить работоспособность программки.
5.4 На техническом уровне требования
ОС Windows(98, МЕ,2000,XP), и выше, клавиатура мышь.
Программка написана на языке программирования Delphi в среде компилятора Borland Delphi 7.0. Не считая того нужно наличие Microsoft ActiveX Data Objects (ADO) – машинка баз данных Borland. Представляет собой набор DLL –библиотек, обеспечивающих низкоуровневый доступ к локальным и клиент-северным БД. Обязана устанавливаться на любом компе, который употребляет приложения для работы с БД, написанные для Delphi.
5.5 Способы тесты
Программный продукт тестировался на работоспособность на компе с нужным, установленным программным обеспечением (Borland Delphi 7.0.).
Для настоящей работы базы данных нужно наличие всех компонент данного программного продукта: модули и таблицы с данными.
6. ОПИСАНИЕ ПРИМЕНЕНИЯ
ГОСТ 19.502-78
Реальный эталон устанавливает состав и требования к содержанию программного документа «Описание внедрения», определённого ГОСТ 19.101-77.
Эталон вполне соответствует СТ СЭВ 2093-80.
Структуру и оформление документа устанавливают в согласовании с ГОСТ 19.105-78.
6.1 Наименование
база данных для службы быта.
6.2 Предназначение программки
Даная программка применима для коммерческой деятель (справочная по компаниям, информационное бюро).
6.3 Условия внедрения
ОС Windows(98, МЕ,2000,XP). машина — комплекс технических средств, предназначенных для автоматической обработки информации в процессе решения вычислительных и информационных задач) (либо вычислительной системы) которое делает арифметические и логические операции данные программкой преобразования инфы управляет вычислительным действием и коор Pentium1, Atlon6и выше, клавиатура мышь.
программка написана на языке программирования Delphi в среде компилятора Borland Delphi 7.0. Не считая того нужно наличие Microsoft ActiveX Data Objects (ADO) – машинка баз данных Borland. Представляет собой набор DLL –библиотек, обеспечивающих низкоуровневый доступ к локальным и клиент-северным БД. Обязана устанавливаться на любом компе, который употребляет приложения для работы с БД, написанные для Delphi.
Пуск программку осуществляется при открытии файла S_P.EXE.
6.4 Входные данные
информация вводимая с клавиатуры.
6.5 Выходные данные
Инфы выводимая на экран.
7. РУКОВОДСТВА СИСТЕМНОГО ПРОГРАММИСТА.
ГОСТ 19.503-79
7.1 Наименование программки
“База данных для информационного бюро”.
программка написана на языке программирования Delphi в среде компилятора Borland Delphi 7.0.
7.2. структура БД
7.3 Настройка программки
Нужно наличие програмы Borland Delphi 7.0 либо выше, не считая того нужно наличие BDE и Microsoft ActiveX Data Objects (ADO) – машинка баз данных Borland. Представляет собой набор DLL –библиотек, обеспечивающих низкоуровневый доступ к локальным и клиент-северным БД. Обязана устанавливаться на любом компе, который употребляет приложения для работы с БД, написанные для Delphi.
Для настоящей работы базы данных нужно наличие всех компонент данного программного продукта: модули и таблицы с данными.
7.4 Выполнение программки
Пуск программку осуществляется при открытии файла S_P.EXE.
Возникает основное окно программки.
Основная форма программки содержит полную информацию о предприятии (заглавие, разряд, адресок, телефоны, специализация, список услуг, часы и деньки работы).
Форма редактирование данных, на данной для нас форме идет добавление новейшей записи, или редактирование имеющейся.
Форма итог поиска, на данной для нас форме выводиться итог поиска.
7.5 Проверка программки
Программный продукт тестировался на работоспособность на компе с нужным, установленным программным обеспечением (Borland Delphi 7.0.).
Для настоящей работы базы данных нужно наличие всех компонент данного программного продукта: модули и таблицы с данными.
8. РУКОВОДСТВО ОПЕРАТОРА.
ГОСТ 19.505-79
8.1 Наименование программки
“База данных для информационного бюро”.
программка написана на языке программирования Delphi в среде компилятора Borland Delphi 7.0.
8.2 Предназначение программки
Даная программка применима для коммерческой деятель (справочная по компаниям, информационное бюро).
8.3 Условия выполнения программки
ОС Windows(98, МЕ,2000,XP). машина — комплекс технических средств, предназначенных для автоматической обработки информации в процессе решения вычислительных и информационных задач) (либо вычислительной системы) которое делает арифметические и логические операции данные программкой преобразования инфы управляет вычислительным действием и коор Pentium1, Atlon6и выше, клавиатура мышь.
8.4 Выполнение программки.
Пуск программку осуществляется при открытии файла S_P.EXE.Основная форма программки содержит полную информацию о предприятии (заглавие, разряд, адресок, телефоны, специализация, список услуг, часы и деньки работы). Форма редактирование данных, на данной для нас форме идет добавление новейшей записи, или редактирование имеющейся.
]]>