Реализация адресной книги

Вид материала

Содержание

Подобный материал:

1 2 3

void __fastcall TFr::Button2Click(TObject *Sender)

{

AnsiString inf[9];

if(Menu->Count < 1 && _fl == "") fx.Error(6);

else {

for(i=0; i<9; i++) {

TEdit *edit = (TEdit*)Fr->FindComponent("Edit"+AnsiString(i));

inf[i] = edit->Text.SubString(0,4000);

}

lds.Add(inf);

Menu->Items->Add(inf[0]);

}

}

//---------------------------------------------------------------------------

void __fastcall TFr::Button1Click(TObject *Sender)

{

i = Menu->ItemIndex;

if(Menu->Count < 1 || _fl == "") fx.Error(6);

else {

if(f != NULL) {

z = lds.GetEl(i);

for(j=0; j<9; j++) {

TEdit *edit = (TEdit*)Fr->FindComponent("Edit"+AnsiString(j));

z->inf[j] = edit->Text.SubString(0,4000);

}

Menu->Items->Strings[i] = z->inf[0];

} else {

AnsiString inf[9];

for(j=0; j<9; j++) {

TEdit *edit = (TEdit*)Fr->FindComponent("Edit"+AnsiString(j));

inf[j] = edit->Text.SubString(0,4000);

}

lds.Add(inf);

Menu->Items->Strings[i] = inf[0];

}

}

}

//---------------------------------------------------------------------------

void __fastcall TFr::N3Click(TObject *Sender)

{

i = Menu->ItemIndex + 1;

if(i<1) fx.Error(5);

else {

lds.DelEl(i);

Menu->Items->Delete(i-1);

}

for(i=0; i<9; i++) {

TEdit *edit = (TEdit*)Fr->FindComponent("Edit"+AnsiString(i));

edit->Clear();

}

i = Menu->ItemIndex;

if(i > 0) Menu->ItemIndex = i-1;

else Menu->ItemIndex = 0;

fx.Load();

}

//---------------------------------------------------------------------------

void __fastcall TFr::MenuKeyPress(TObject *Sender, char &Key)

{

i = Key;

if(i == 46 || i == 127) N3Click(Sender);

}

//---------------------------------------------------------------------------

void __fastcall TFr::N8Click(TObject *Sender)

{

lds.Clear();

Menu->Clear();

fx.Error(7,false);

}

//---------------------------------------------------------------------------

void __fastcall TFr::N1Click(TObject *Sender)

{

if(FileExists(_fl)) {

if(MessageBox(0, ("Вы действительно хотите удалить книгу " + _fl + "?").c_str(), "Предупреждение", MB_OKCANCEL) == 1) {

DeleteFile(_fl);

_fl = "";

lds.Clear();

Menu->Clear();

}

} else fx.Error(8);

}

//---------------------------------------------------------------------------

void __fastcall TFr::N10Click(TObject *Sender)

{

Fr2->L->Clear(); i=0;

for(node *z = f; z != NULL; z=z->n) {

Fr2->L->Items->Add()->Caption = z->inf[0];

for(j=1; j<9; j++) Fr2->L->Items->Item[i]->SubItems->Add(z->inf[j]);

i++;

}

Fr2->ShowModal();

}

//---------------------------------------------------------------------------

void __fastcall TFr::EvMinimize(TObject *Sender)

{

Application->Minimize();

Fr->Hide();

Tr->Visible = true;

Tr->BalloonHint = "Адресная книга свернута в трей. Для того чтобы вернуть её в первоначальное положение счелкните по иконке";

^ Tr->BalloonTitle = "Подсказка";

Tr->ShowBalloonHint();

}

//---------------------------------------------------------------------------

void __fastcall TFr::TrClick(TObject *Sender)

{

Fr->Show();

Tr->Visible = false;

Application->Restore();

Application->BringToFront();

}

//---------------------------------------------------------------------------

3.9. Контрольный прогон программы

Создание новой книги

3.9.1. Тест-пример «Файл с заданным именем не существует»

^ 3.9.2. Тест-пример «Файл с заданным именем уже существует»

Открытие существующей книги

^ 3.9.3 Тест-пример «Файл записан корректо. Загрузка прошла успешно»

^ 3.9.4. Тест-пример «Файл имеет некорректный формат. Книга не загружена»

Сохранение книги

^ 3.9.5. Тест-пример «Файл с заданным именем уже существует. Книга не сохранена»

3.9.6. Тест-пример «Файл успешно сохранен»

Работа с данными

^ 3.9.7. Тест-пример «Просмотр\редактирование данных»

^ 3.9.8. Тест-пример «Добавление данных»

^ 3.9.9. Тест-пример «Удаление данных»

3.9.10. Тест-пример «Очистка книги»

^ 3.9.11. Тест-пример «Удаление книги»

Минимизация программы в трей

Заключение

В процессе выполнения курсового проектирования я закрепил и углубил теоретические знания, полученные при изучении дисциплин по программированию в целом, и изученным в дисциплине «Структуры и алгоритмы обработки данных», в частности. Приобрел опыт программирования на языке C++ в среде разработки Borland C++ Builder по практическому применению динамических структур данных для решения конкретной прикладной задачи.

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

За время проведения курсовой работы мне впервые довелось самостоятельно выполнить все этапы создания программной разработки:

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

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

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

^ Список использованных информационных источников

1. Сыромятников В.П. «Структуры и алгоритмы обработки данных», лекции, М., МИРЭА, 2006-2007 учебный год.

2. Сыромятников В.П. «Основы построения динамических структур данных» - М.: МИРЭА, 2007.

3. Лаптев В.В. «С++. Экспресс-курс» - СПб.: БХВ-Петербург, 2004, 512с.: ил.

4. Бобровский С.И. «Самоучитель программирования на языке C++ в системе C++ Builder 5.0» - M.: ДЕСС КОМ, 2001.

5. «С++ начала программирования», издательство «Бином», М., 2004.

6. Материалы сайта ссылка скрыта

7. Материалы сайта ссылка скрыта

Blog

Реализация адресной книги

Содержание