программа телефонного справочника с функциями добавления, корректировки и удаления записей

СОДЕРЖАНИЕ

ВВЕДЕНИЕ. 2

1. Постановка задачи. 3

1.1  Назначение и функции программы.. 3

1.2  Математическая модель задачи. 3

1.2.1  Математическая формулировка задачи. 3

1.2.2  Выбор метода решения задачи. 3

1.3  Информационная база задачи. 3

1.3.1  Входная информация. 3

1.3.2  Выходная информация. 3

1.4  Система меню. 4

1.5  Система помощи. 4

1.6  Контрольные примеры.. 4

1.7  Алгоритм примеры. 4

2  Описание программы. 4

3  Описание применения. 4

4  Методы отладки программы. 4

5  Тестирование программы. 4

ЗАКЛЮЧЕНИЕ. 8

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ.. 9

ПРИЛОЖЕНИЕ А.. 10

ПРИЛОЖЕНИЕ В.. 20

ПРИЛОЖЕНИЕ С.. 21

ВВЕДЕНИЕ

Стремительное  развитие  новых современных технологий  способствует совершенствованию различных телефонных коммуникаций. Для улучшения качества связи и расширения предоставляемых услуг стационарные телефонные линии переводят на новые стандарты. При переходе у абонентов меняются номера телефонов. Высокая конкуренция среди мобильных операторов вызывает перемещение абонентов от одного оператора к другому. Таким образом население, особенно молодое поколение, часто меняют номера своих телефонов.

Поэтому в настоящее время важно иметь всегда под рукой простой телефонный справочник, в котором были бы предусмотрены функции как поиска абонентов, так и  функции добавления, корректировки и удаления записей.

В данной курсовом проекте  разработаем программу телефонного справочника с перечисленными функциями.

1. Постановка задачи 1.1  Назначение и функции программы В курсовом проекте «Телефонный справочник» разработана программа для поиска контактных данных абонентов внесенных в список.

Разрабатываемое приложение представляет собой приложение- оболочку для работы с базой данных, разработанной в СУБД MS Access. Область применения: в качестве записной книжки для пользователей. Поскольку ставится задача разработать приложение для Windows, то использоваться программа может только под управлением ОС Windows.

Необходимо разработать приложение «Телефонный справочник». Приложение должно предоставлять пользователю средства для просмотра и редактирования базы справочника, а также предоставлять возможность осуществления поиска по базе абонентов. Приложение должно обеспечивать корректное редактирование базы справочника.

1.2  Математическая модель задачи 1.2.1  Математическая формулировка задачи

В программе нет описания задачи с помощью формул, уравнений, неравенств, потому что  программа «Телефонный справочник» создана для поиска контактных данных абонентов внесенных в список.

1.2.2  Выбор метода решения задачи

Программа реализована путем подключения базы данных  организацией SQL запросов непосредственно между базой и справочником. Использование файловой системы в программном продукте «Телефонный справочник» нецелесообразно.

1.3  Информационная база задачи 1.3.1  Входная информация

-фамилия

-имя

-отчество

-адрес

-телефон

-город

-дата рождения

1.3.2  Выходная информация

-     вывод данных поиска

-     раздел помощи

-     информация о разработчике

1.4  Система меню.

В системе меню справочника предусмотрено два пункта. Вкладка «Файл» (рис.  1.4.1) предназначена для выхода из программы.

Рис.1.4.1 - Выход из программы

В пункте меню «Справка»  предусмотрены два подпункта  (рис. 1.4.2): «О программе»  и  «Просмотреть справку».

Рис. 1.4.2 - Контекстное меню «Справка»

Во вкладке «О программе» (рис. 1.4.3) представлена информация о разработчике программы.

Рис. 1.4.3 - «О программе»

Рис. 1.4.4 - «Просмотр справки»

Во вкладке «Просмотреть справку»  (рис. 1.4.4)  находиться краткая инструкция пользователю по  основным функциям программного продукта.

1.5 Система помощи

Что бы открыть программу «Телефонный справочник», надо запустить ее с помощью программы Delphi 7.

Вы откроете программу «Телефонный справочник», которая  предназначена для ведения базы данных телефонных абонентов.

При этом на экране появляется форма добавления/редактирования, в которой добавляются новые записи или редактируются уже имеющиеся.

  Сохранение новых или измененных данных возможно только в том случае, если поля «Фамилия» и «Телефон» не пусты.

При помощи кнопки «Удалить» можно удалять текущую запись справочника. Поиск осуществляется при помощи поля для ввода поиска, переключателей для поиска по фамилии. Поиск по базе справочника осуществляется по нажатию кнопки «ENTER». С помощью клавиш «Назад» и «Вперед» можно перейти к предыдущей записи или к следующей.

Выбрав пункт меню «О программе» и «Просмотреть справку» можно просмотреть информацию об авторе программы и просмотр справки.  

Нажатие кнопки «Выход» завершает работу с приложением.

1.6 Контрольные примеры

На главной странице справочника  (рис. 1.5.1) размещена таблица  с указанием всех внесенных данных абонентов.

Рис. 1.5.1 - Главная страница справочника

В верхней части окна расположена лента с ячейкой для ввода данных поиска и  кнопками  , предназначенными для возврата к данным предыдущего поиска и обратно. В правой части экрана расположено поле с клавишами выбора операций.

Рис. 1.6 - Окно «Добавить запись»

При нажатии на клавишу «Добавить»  появляется окошко рис. 1.6  «Добавить запись», в котором предлагается заполнить данные  нового абонента.

При нажатии на клавишу «Изменить»  появляется форма рис. 1.7 «Изменить запись»,  в которой можно произвести корректировку ранее внесенных данных.  Для сохранения изменений необходимо нажать клавишу «Сохранить»,   а затем  «Закрыть»   окно.

Рис. 1.7 - Окно «Изменить запись»

Кнопка «Удалить» предназначена для удаления всех данных выбранного абонента.

Рис. 1.8 - Удаление данных абонента

При нажатии на клавишу «Удалить»,  появляется окно «Внимание» рис. 1.8.

Для подтверждения удаления данных необходимо нажать клавишу «ОК». При нажатии на клавишу «Отмена»,   программа возвращает пользователя к предыдущему окну.

1.7 Алгоритм программы

Обобщенный алгоритм в словесной форме записывается следующим образом:

создать соединение с базой данных;

вывести на экран справочник;

в случае необходимости корректно произвести редактирование базы или поиск по базе.

2 Описание программы

При наборе фамилии в строке поиска программа , при наличии совпадений, выдаст данные (фамилия, имя, телефон, адрес) искомого абонента.

В программе  предусмотрены  возможности внесения новых абонентов, корректировка ранее внесенных данных, удаление записей из справочника.

3 Описание применения

   Программное средство «Телефонный справочник» предназначено для удобного просмотра базы данных «Телефонный справочник»  и поиска записи по фамилии  обычным пользователем.
       Эта программа уменьшит время, затрачиваемое  на внесение информации в файл, предоставит  возможность сортировки информации по фамилии.

4 Методы отладки программы

Методы:

-     ручного тестирования;

-     индукции;

-     дедукции;

-     обратного прослеживания.

Метод ручного тестирования – выполнение программы вручную с использованием тестового набора, при прогоне которого была обнаружена ошибка.

Метод индукции включает:

-     определение данных тестирования, имеющих отношение к ошибке;

-                   анализ от частного к общему позволит выявить закономерности в данных тестирования. В результате анализа выдвигается гипотеза о причине ошибки;

-                   для подтверждения гипотезы разрабатывается тесты, которые должны либо подтвердить, либо опровергнуть гипотезу;

-                   если дополнительные тесты подтверждают гипотезу, можно приступать к исправлению ошибки

Для больших программ необходимо определить фрагмент программы, в котором может быть локализована ошибка.

Альтернативный метод дедукции заключается в:

-                     перечисление возможных причин или гипотез:

-                   использование данных тестирования для исключения некоторых возможных причин;

-                   уточнение выбранной наиболее вероятной гипотезы, возможно с использованием дополнительных тестов;

-                   доказательство выбранной гипотезы совпадает с п.4 и п.5 метода индукции.

Метод обратного прослеживания эффективен для небольших программ. Выявляется точка вывода неправильных результатов. Для этой точки строится гипотеза о значениях основных переменных, которые могли бы привести к получению имеющегося результата. Далее, исходя из этой гипотезы, делают предположения о значениях переменных в предыдущей точке. Процесс продолжают до тех пор, пока не обнаружат причину ошибки.

 5 Тестирование программы

Тестирование ─ один из важнейших этапов проверки качества разработанного программного обеспечения. В связи с постоянным увлечением сложности разработанного программных систем роль тестирования растет.

Разработка любой программы предполагает наличие в исходном тексте и борьбу с ними. Ошибки обычно подразделяют на три группы:

-          Синтаксические ошибки;

-          Ошибки времени выполнения программы;

-          Смысловые (логические) ошибки.

Тестирование данного программного средства состояло из следующих

пунктов:

-          Запуск программы;

-          Проверка правильности выполнения;

-          Просмотр количества ошибок;

-          Выход.

 Тестирование работы приложения проводится визуально, т.е. проведением операций со справочником.

При тестировании программы ошибок не обнаружено. Все операции с базой справочника обрабатываются корректно.

ЗАКЛЮЧЕНИЕ

Поставленная задача выполнена. Разработана программа телефонного справочника с функциями поиска, добавления, удаления и корректировки данных абонентов.

Программу в дальнейшем можно развивать. Для увеличения информации о лицах , внесённых в справочник  можно добавить дополнительные данные: день рождения, место учёбы или работы. Также можно увеличить графическую составляющую , заложить возможность настройки и выбора фона и оформления таблиц.

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

1.           Алексеев Е.Р., Чеснокова О.В., Кучер Т.В. Free Pascal и Lazarus. Учебник по программированию. – М.: ALT Linux: Издательский дом ДМК-пресс, 2010. – 440 с.

2.           Архангельский А.Я. Язык Pascal и основы программирования в Delphi. Учебное пособие - М.:ООО "Бином-Пресс", 2004г.- 496 с.:ил.

3.           Ачкасов В.Ю. Введение в программирование на Delphi. – М.: Интуит, 2008.

4.           Епанешниковы А.М. и В.А.  Программирование в среде Turbo Pascal 7.0 Диалог-МИФИ 2000 г. 

5.           Королев Л.Н., Миков А.И. Информатика. Введение в компьютерные науки. - М.:Высш.шк., 2003. - 341 с.: ил.

6.           Мельников С.В. Delphi и Turbo Pascal на занимательных примерах. – СПб.: БХВ-Петербург, 2006. – 448 с.

7.           Рубанцев В. Большой самоучитель Delphi XE3. – 2013.

8.           Фаронов В. В. Программирование баз дан­ных в Delphi 7: Питер / Фаронов В. В. — СПб.: Питер, 2006. — 458с.

ПРИЛОЖЕНИЕ А

(справочное)

Код программы

unit Unit1;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, Buttons, StdCtrls, ExtCtrls, Grids, DBGrids, ComCtrls, DB, ADODB,

  Menus;

type

  TForm1 = class(TForm)

    StatusBar1: TStatusBar;

    Panel1: TPanel;

    Panel2: TPanel;

    BitBtn1: TBitBtn;

    BitBtn2: TBitBtn;

    BitBtn3: TBitBtn;

    Edit1: TEdit;

    Label1: TLabel;

    SpeedButton1: TSpeedButton;

    SpeedButton2: TSpeedButton;

    MainMenu1: TMainMenu;

    N1: TMenuItem;

    N2: TMenuItem;

    N3: TMenuItem;

    N4: TMenuItem;

    N5: TMenuItem;

    BitBtn4: TBitBtn;

    DBGrid1: TDBGrid;

    ADOQuery1: TADOQuery;

    DataSource1: TDataSource;

    ADOConnection1: TADOConnection;

    procedure BitBtn1Click(Sender: TObject);

    procedure BitBtn2Click(Sender: TObject);

    procedure SpeedButton1Click(Sender: TObject);

    procedure SpeedButton2Click(Sender: TObject);

    procedure BitBtn3Click(Sender: TObject);

    procedure Edit1Change(Sender: TObject);

    procedure N3Click(Sender: TObject);

    procedure N4Click(Sender: TObject);

    procedure N5Click(Sender: TObject);

    procedure BitBtn4Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

implementation

uses Unit2, Unit3, Unit4;

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);

begin

Form2.show;

Form1.ADOQuery1.Insert;

Form2.Caption := "Добавить запись";

end;

procedure TForm1.BitBtn2Click(Sender: TObject);

begin

Form2.Show;

Form2.Caption := "Изменить запись";

end;

procedure TForm1.SpeedButton1Click(Sender: TObject);

begin

ADOQuery1.Prior;

end;

procedure TForm1.SpeedButton2Click(Sender: TObject);

begin

ADOQuery1.Next;

end;

procedure TForm1.BitBtn3Click(Sender: TObject);

begin

 if Application.MessageBox(PChar("Вы действительно хотите удалить? "), "Внимание!!!", MB_OKCANCEL)=id_OK then

  Form1.ADOQuery1.Delete;

end;

procedure TForm1.Edit1Change(Sender: TObject);

begin

ADOQuery1.Locate("Фамилия", Edit1.Text, [loPartialKey]);

end;

procedure TForm1.N3Click(Sender: TObject);

begin

form3.show;

end;

procedure TForm1.N4Click(Sender: TObject);

begin

close;

end;

procedure TForm1.N5Click(Sender: TObject);

begin

 form4.show;

end;

procedure TForm1.BitBtn4Click(Sender: TObject);

begin

 close;

end;

end.

unit Unit2;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, Buttons, Unit1, StdCtrls, Mask, DBCtrls;

type

  TForm2 = class(TForm)

    DBEdit1: TDBEdit;

    DBEdit2: TDBEdit;

    DBEdit4: TDBEdit;

    SpeedButton1: TSpeedButton;

    SpeedButton2: TSpeedButton;

    Label1: TLabel;

    Label2: TLabel;

    Label3: TLabel;

    Label4: TLabel;

    DBEdit5: TDBEdit;

    Label5: TLabel;

    Label6: TLabel;

    DBEdit6: TDBEdit;

    DBEdit7: TDBEdit;

    Label7: TLabel;

    DBEdit3: TDBEdit;

    procedure SpeedButton2Click(Sender: TObject);

    procedure SpeedButton1Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.SpeedButton2Click(Sender: TObject);

begin

Form2.Close;

end;

procedure TForm2.SpeedButton1Click(Sender: TObject);

begin

Form1.ADOQuery1.Post;

Form2.Close;

end;

end.

unit Unit3;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls, jpeg, ExtCtrls, Buttons;

type

  TForm3 = class(TForm)

    Label1: TLabel;

    Label2: TLabel;

    BitBtn1: TBitBtn;

    Label3: TLabel;

    BitBtn2: TBitBtn;

    procedure Button1Click(Sender: TObject);

    procedure BitBtn1Click(Sender: TObject);

    procedure BitBtn2Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form3: TForm3;

implementation

uses Unit4;

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);

begin

close;

end;

procedure TForm3.BitBtn1Click(Sender: TObject);

begin

close;

end;

procedure TForm3.BitBtn2Click(Sender: TObject);

begin

 form4.show;

end;

end.

unit Unit4;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, jpeg, ExtCtrls, StdCtrls, Buttons;

type

  TForm4 = class(TForm)

    Image1: TImage;

    Label1: TLabel;

    Label2: TLabel;

    Label3: TLabel;

    Label4: TLabel;

    Label5: TLabel;

    Label6: TLabel;

    BitBtn1: TBitBtn;

    procedure BitBtn1Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form4: TForm4;

implementation

{$R *.dfm}

procedure TForm4.BitBtn1Click(Sender: TObject);

begin

Close;

end;

end.

ПРИЛОЖЕНИЕ В

(справочное)

Рис.В1 - Окно программы, при выбора пункта «О программе…»

Рис.В2 - «Просмотреть справку»

ПРИЛОЖЕНИЕ С

(обязательное)

 

Главная страница