Приложение 4

ОП-020699846.230105.13.20.37

Файл TextEdit.exe

Листов 1

Выполнили:________ А.А. Тутаков

________ Н.А. Кустов

2013

Литера ОП

ПРИЛОЖЕНИЕ 4

1. Информационная часть

Программный продукт предназначен для создания и редактирования текстовых документов. Интерфейс удобен, понятен не только оператору ЭВМ, но и любому пользователю ПК.

2. Назначение программы

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

3. Входные и выходные данные

Входными данными являются файлы с расширением *txt. Выходными данными является текст, выведенный пользователю на монитор.

КОСТРОМСКОЙ ПОЛИТЕХНИЧЕСКИЙ КОЛЛЕДЖ

Специальность: Программное обеспечение вычислительной техники и автоматизированных систем

УТВЕРЖДАЮ

Руководитель

_________ С.Б. Татаринова

«___» _____________ 2013 г

«ТЕКСТОВЫЙ РЕДАКТОР»

Паспорт программы

Приложение 5

ОП-020699846.230105.13.20.05

Файл TextEdit.exe

Листов 2

Выполнили:________ А.А. Тутаков

________ Н.А. Кустов

2013

Литера ОП

ПРИЛОЖЕНИЕ 5

1. Назначение

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

2. Запуск программы

Запуск программы осуществляется с помощью файла TextEdit.exe.

3. Объем

Программный продукт занимает 3 Мб дискового пространства.

4. Специальные указания оператору

Главным условием, необходимым для функционирования программы является наличие установленной на компьютере ОС Windows XP/Vista/7.

ПРИЛОЖЕНИЕ 5(Продолжение)

5. Авторы

Тутаков А.А.

Кустов Н.А.

6. Дата создания

03.03.2013.

7. Версия

1.0

КОСТРОМСКОЙ ПОЛИТЕХНИЧЕСКИЙ КОЛЛЕДЖ

Специальность: Программное обеспечение вычислительной техники и автоматизированных систем

УТВЕРЖДАЮ

Руководитель

_________ С.Б. Татаринова

«___» _____________ 2013 г

«ТЕКСТОВЫЙ РЕДАКТОР»

Текст программы

Приложение 6

ОП-020699846.230105.13.20.12

Файл TextEdit.exe

Листов 2

Выполнили:________ А. А. Тутаков

________ Н.А. Кустов

2013

Литера ОП

ПРИЛОЖЕНИЕ 6

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

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner){

}

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

void __fastcall TForm1::N17Click(TObject *Sender)

{ Close();

}

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

void __fastcall TForm1::Timer1Timer(TObject *Sender)

{StatusBar1->Panels->Items[3]->Text = TimeToStr(Time());

}

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

void __fastcall TForm1::Memo1Change(TObject *Sender)

{StatusBar1->Panels->Items[1]->Text = IntToStr(Memo1->Lines->Count);

}

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

void __fastcall TForm1::N2Click(TObject *Sender)

{ if (Memo1->Modified) {

if (Application->MessageBoxA("Сохранить изменения?", "Текст изменен", MB_YESNO) == IDYES) {

N4Click(N4);

}

} Memo1->Clear();

}

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

void __fastcall TForm1::N4Click(TObject *Sender)

{ if (SaveDialog1->Execute()) {

Memo1->Lines->SaveToFile(SaveDialog1->FileName);

Memo1->Modified = false;

}

}

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

ПРИЛОЖЕНИЕ 6(продолжение)

void __fastcall TForm1::N3Click(TObject *Sender)

{if (Memo1->Modified) {

if (Application->MessageBoxA("Сохранить изменения?", "Текст изменен", MB_YESNO) == IDYES) {

N4Click(N4);

}

}if (OpenDialog1->Execute()) {

Memo1->Lines->LoadFromFile(OpenDialog1->FileName);

}

}

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

void __fastcall TForm1::N8Click(TObject *Sender)

{ Memo1->CopyToClipboard();

}

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

void __fastcall TForm1::N9Click(TObject *Sender)

{ Memo1->CutToClipboard();

}

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

void __fastcall TForm1::N10Click(TObject *Sender)

{ Memo1->PasteFromClipboard();

}

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

void __fastcall TForm1::N18Click(TObject *Sender)

{ Memo1->Clear();

}void __fastcall TForm1::N12Click(TObject *Sender)

{FontDialog1->Font = Memo1->Font;

if (FontDialog1->Execute()) {

Memo1->Font = FontDialog1->Font;

}

}

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

void __fastcall TForm1::N14Click(TObject *Sender)

{Memo1->Alignment = taLeftJustify;

}

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

void __fastcall TForm1::N15Click(TObject *Sender)

{Memo1->Alignment = taCenter;

}

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

void __fastcall TForm1::N16Click(TObject *Sender)

{ Memo1->Alignment = taRightJustify;

}