Разработка программного обеспечения "Телефонный справочник"
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
В°3.2.1. 3 - База журнала оплат(Gurnal)
Наименование поляОписаниеТипДлинаkodНомер записиСчетчик-data_oplДата оплатыДата/время-sumСумма оплатыЧисловой-kod_abКод абонентаЧисловой-
Содержит в себе информацию о расчетном журнале, имеет поля код, дата оплаты, сумму, код абонента.
Таблица 3.2.1.4 - База тарифов(Tarif)
Наименование поляОписаниеТипДлинаkodНомер записиСчетчик-naimenТарифный планТекстовый20ab_fАбонентская плата частных лицТекстовый5ab_uАбонентская плата организацийТекстовый5min_fСтоимость минуты разговора частным лицамТекстовый5min_uСтоимость минуты разговора организациямТекстовый5
Содержит в себе информацию о расчетном журнале, имеет поля код, имя тарифа, абонентская плата частным лицам, абонентская плата организациям, стоимость минуты разговора частным лицам, стоимость минуты разговора организациям.
3.2.2 Описание полей, переменных и процедур
procedure TF_Glavn.BitBtn1Click(Sender: TObject);- выход из программы;
procedure TF_Glavn.Button1Click(Sender: TObject);-открытие формы База данных справочника;
procedure TF_Glavn.Button3Click(Sender: TObject);-открытие справки руководство пользователю;
procedure TF_Glavn.Button2Click(Sender: TObject);-открытие формы сведения;TF_Glavn.Button4Click(Sender: TObject);-открытие формы о разработчике; TF_Glavn.N3Click(Sender: TObject);- открывает форму организации через меню база данных справочника;
procedure TF_Glavn.N8Click(Sender: TObject);-открывает справку руководство пользователю из меню справка;
procedure TF_Glavn.N9Click(Sender: TObject);-открывает форму о разработчике из меню справка;
procedure TF_Glavn.N2Click(Sender: TObject);- открывает форму частные лица из меню база данных справочника;TF_Glavn.N5Click(Sender: TObject);- открывает форму тарифы из меню сведения;TF_Glavn.N6Click(Sender: TObject);- открывает форму расчетный журнал из меню сведения;
procedure TF_baza.Button1Click(Sender: TObject);-открывает форму частные лица;TF_baza.Button2Click(Sender: TObject);-открывает форму организации;TF_baza.Button3Click(Sender: TObject);-закрывает форму сведения; filtr;-процедура фильтрации частных лиц;
procedure TF_Chastnie.Button1Click(Sender: TObject);-отккрытие формы добавление частных лиц;
procedure TF_Chastnie.Button2Click(Sender: TObject);-открытие формы редактирование частных лиц;
procedure TF_Chastnie.Button3Click(Sender: TObject);- открытие формы удалить для частных лиц;
procedure TF_Chastnie.FormShow(Sender: TObject);- открытие формы частные;TF_Chastnie.Edit1Change(Sender: TObject);-фильтрация по ФИО для частных лиц;TF_Chastnie.Edit2Change(Sender: TObject);-фильтрация по номеру абонента для частных лиц;TF_Chastnie.Edit3Change(Sender: TObject);-фильтрация по населенному пункту для частных лиц;TF_Chastnie.Edit4Change(Sender: TObject);-фильтрация по адресу для частных лиц;TF_Chastnie.Button6Click(Sender: TObject);-процедура открытия всех абонентов; TF_Chastnie.FormCreate(Sender: TObject);- процедура вывода на печать телефонного справочника;
procedure TF_Chastnie.Button5Click(Sender: TObject);-выводит на печать частные лица;
procedure TF_Chastnie.Button7Click(Sender: TObject);-закрытие формы частные лица;
procedure filtr;-процедура фильтрации организаций;
procedure TF_Organiz.FormShow(Sender: TObject);-открытие формы организации;TF_Organiz.Button1Click(Sender: TObject);-открытия формы добавление организаций;TF_Organiz.Button2Click(Sender: TObject);- открытие формы редактирование организаций;TF_Organiz.Button3Click(Sender: TObject);-открытие формы удаление организации;TF_Organiz.Button6Click(Sender: TObject);-выводит список всех обонентов;TF_Organiz.Button5Click(Sender: TObject);- выводит на печать список организаций;TF_Organiz.FormCreate(Sender: TObject);- формирование телефонного справочника для организаций;TF_Organiz.Edit1Change(Sender: TObject);-поиск по полю организация;TF_Organiz.Edit2Change(Sender: TObject);-поиск по полю номер телефона;TF_Organiz.Edit3Change(Sender: TObject);-поиск по полю населенный пункт;TF_Organiz.Edit4Change(Sender: TObject);-поиск по полю адрес;TF_Organiz.Button4Click(Sender: TObject);-закрытие формы организации;TF_del_chastnie.BitBtn2Click(Sender: TObject);-закрытие формы удалить для частных лиц;tF_del_chastnie.BitBtn1Click(Sender: TObject);-удаление частных лиц;TF_del_organiz.BitBtn2Click(Sender: TObject);-закрытие формы удалить для организаций;TF_del_organiz.BitBtn1Click(Sender: TObject);-удаление организаций;TF_del_tarif.BitBtn2Click(Sender: TObject);-закрытие формы удалить для тарифа;TF_del_tarif.BitBtn1Click(Sender: TObject);-удаление тарифа;TF_dob_chastnie.FormShow(Sender: TObject);-очистка полей в форме добавить для частных лиц;TF_dob_chastnie.Button2Click(Sender: TObject);- закрытие формы добавить для частных лиц;TF_dob_chastnie.Button1Click(Sender: TObject);- добавляет данные в частные лица;TF_dob_chastnie.FormCreate(Sender: TObject);- процедура формирования заявления для частных лиц;TF_dob_chastnie.Edit_fioChange(Sender: TObject);- ограничение ввода в поле ФИО для частных лиц;TF_dob_chastnie.Edit_nomChange(Sender: TObject);- ограничение ввода в поле номер для частных лиц;TF_dob_chastnie.Button3Click(Sender: TObject);- процедура формирования заявления для частны лиц;TF_dob_organiz.Button2Click(Sender: TObject);-закрытие формы добавление организаций;TF_dob_organiz.FormShow(Sender: TObject);-очистка полей в форме добавить организации;TF_dob_organiz.Button1Click(Sender: TObject);-добавляет данные в организации;TF_dob_organiz.Edit_nomChange(Sender: TObject);- ограничение ввода в поле номер для организаций;TF_dob_organiz.FormCreate(Sender: TObject);- процедура формирования заявления для организаций;TF_dob_organiz.Button3Click(Sender: TObject);- процедура формирования заявления для организаций;TF_dob_tarif.FormShow(Sender: TObject);- открытие формы добавить для тарифов;TF_dob_tarif.Edit_ab_fChange(Sender: TObject);- ограничение ввода в поле абонентская плата для частных лиц;TF_dob_tarif.Edit_ab_uChange(Sender: TObject);- ограничение ввода в поле абонентская плата для организаций; TF_dob_tarif.Edit_min_fChange(Sender: TObject);- ограничение ввода в поле стоимость минуты разговора для частных лиц;
procedure TF_dob_tarif.Edit_min_uChange(Sender: TObject);- ограничение ввода в поле стоимость минуты разговора для организаций ;
procedure TF_dob_tarif.Button2Click(Sender: TObject);-закрытие формы добавление тарифа;TF_dob_tarif.Button1Click(Sender: TObject);- добавление данных в таблицу тарифов; filtr;- процедура фильтрации расчетного журнала;buton;- процедура активации кнопки оплатить;
procedure TF_Gurnal.FormShow(Sender: TObject);- процедура присоединения к выбору списка ФИО/Организация;
procedure TF_Gurnal.ComboBox1Change(Sender: TObject);- ограничение ввода в спи