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

Размещено на http://www.allbest.ru/

Дипломная работа

на тему: "Разработка интерфейсного приложения по обеспечению пользователю доступа к программным продуктам"

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

Автор:

Год разработки:

Дипломный проект содержит: страниц (из них - приложение 20 страниц), рисунков, таблиц 2, источников 17.

Ключевые слова: Информационные технологии, информационные системы, программное обеспечение, программный продукт, пакеты прикладных программ.

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

Содержание

Введение

1. История развития информационных технологий

1.1 Информационные системы и технологии

1.2 Классификация программного обеспечения

2. Особенности разработки программного обеспечения

2.1 Этапы разработки программного продукта

2.2 Требования к программному обеспечению

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

3.1 Анализ предметной области и постановка задачи

3.2 Интерфейс приложения

3.3 Описание собственных разработок

Заключение

Список литературы

Приложение

Введение

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

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

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

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

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

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

1. История развития информационных технологий

1.1 Информационные системы и технологии

Изучая исторические аспекты развития информационных систем и информационных технологий, можно отметить, что создаваемое программное обеспечение подчиняется устоявшимся историческим тенденциям. Любые инновационные технологии, вне зависимости от политического строя государства, религиозных взглядов, социальных аспектов и других признаков, первыми получает военная промышленность. И только в тот момент, когда для этой области технологии перестают быть значимыми, они переходят к правительственным организациям. Дальнейшее освоение технологий происходит в среде крупного и среднего бизнеса, чуть позднее доходя и до малого. Завершающим звеном в этой цепочке получения информационных технологий является представитель бытовой сферы - индивидуальный пользователь (см. табл.1). Произошло смещение акцентов и в формулировании целей использования компьютера. Если изначально компьютерные системы предназначались для научно-технических расчетов, и режим работы был однопрограммным, то в настоящее время больше внимания уделяется сетевой обработке, телекоммуникациям, информационному обслуживанию и персональному использованию с целью удовлетворения индивидуальных нужд. Первоначально за пультом компьютера находились опытные инженеры-программисты, располагавшиеся в машинном зале. Впоследствии за рабочим столом были уже пользователи с общей подготовкой, тип диалога с компьютером у которых осуществлялся интерактивно по жесткому меню. На данный момент слабо обученные пользователи, произвольно располагаясь, общаются с компьютером посредством интерактивного экранного диалога. Эволюция технологий использования компьютерных систем представлена в таблице 2.

Таблица 1. Сводная характеристика ключевых этапов в создании информационных систем

Годы	40-е	50-е	60-е	70-е	80-е	90-е	2000+
Число информационных систем (ИС)	~10№	~10І	~10і	~104	~105	~106	~107	~108
Пользователи информационных систем	Правительственные организации
		Крупнейший бизнес
			Крупный бизнес
				Средний бизнес
					Малый бизнес
						Быт
Среда ИС	Монополия
			Хост-терминал
					Файл-сервер
						Клиент-сервер
							Распределенная сетевая
Методы проектирования	Индивидуальное
				Типовое
					Автоматизированное
Технологии разработки	Коды
		Ассемблер
		Языки высокого уровня
				Структурное программирование
						Объектно-ориентированное
							RAD

Таблица 2. Эволюция технологий использования компьютерных систем.

Этапы развития технологии	Цель использования компьютера	Режим работы компьютера	Интеграция данных	Расположение пользователя	Тип пользователя	Тип диалога
50-е годы	Научно-технические расчеты	Однопрограммный	Низкая	Машинный зал	Инженеры-программисты	Работа за пультом компьютера
60-е годы	технические и экономические расчеты	Пакетная обработка	Средняя	Отдельное помещение	Профессиональные программисты	Обмен перфоносителями и машинограммами
70-е годы	Управление и экономические расчеты	Разделение времени	Высокая	Терминальный зал	Программисты	Интерактивный (через клавиатуру и экран)
80-е годы	Управление и предоставление информации	Персональная работа	Очень высокая	Рабочий стол	Пользователи с общей подготовкой	Интерактивный по жесткому меню
Наст. время	Телекоммуникации, информационное обслуживание и управление	Сетевая обработка	Сверхвысокая	Произвольное обильное	Слабо обученные пользователи	Интерактивный экранный типа "вопрос-ответ"

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

программный обеспечение пользователь delphi интерфейсный

1.2 Классификация программного обеспечения

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

К программному обеспечению (ПО) относится также вся область деятельности по проектированию и разработке ПО (технология проектирования программ, методы тестирования программ, анализ качества работы программ, документирование программ, разработка и использование программных средств, облегчающих процесс проектирования программного обеспечения).

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

Утилитарные программы ("программы для себя") предназначены для удовлетворения нужд их разработчиков. Чаще всего утилитарные программы выполняют роль сервиса в технологии обработки данных либо являются программами решения функциональных задач, не предназначенных для широкого распространения.

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

Данный вид программного обеспечения имеет сложную структуру. Он делится на три класса: системное ПО, прикладное ПО и инструментарий технологии программирования.

Системное программное обеспечение. Классификация.

Системное программное обеспечение (System Software) -- совокупность программ и программных комплексов для обеспечения работы компьютера и сетей ЭВМ.

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

Системное ПО состоит из базового программного обеспечения, которое, как правило, поставляется вместе с компьютером, и сервисного программного обеспечения, которое может быть приобретено дополнительно. В базовое программное обеспечение входят операционная система, операционные оболочки (текстовые и графические), системные утилиты.

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

Структура системного программного обеспечения представлена на рисунке 1.

Рис.1 Структура системного программного обеспечения

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

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

Выделяют следующие группы инструментальных средств технологии программирования (см. рис. 2):

Рис. 2. Классификация инструментария технологии программирования

· средства для создания приложений, включающие:

- локальные средства, обеспечивающие выполнение отдельных работ по созданию программ;

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

· CASE-технология (Computer-Aided System Engineering), представляющая методы анализа, проектирования и создания программных систем и предназначенная для автоматизации процессов разработки и реализации информационных систем.

Рассмотрим средства для создания приложений более подробно.

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

Язык программирования -- формализованный язык для описания алгоритма решения задачи на компьютере.

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

Инструментальная среда пользователя представлена специальными средствами, встроенными в пакеты прикладных программ, такими как библиотека функций, процедур, объектов и методов обработки; макрокоманды, клавишные макросы, языковые макросы, программные модули-вставки, конструкторы экранных форм и отчетов, генераторы приложений, языки запросов высокого уровня, языки манипулирования данными, конструкторы меню и многое другое.

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

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

Прикладное программное обеспечение работает под управлением базового ПО, в частности операционных систем. В состав прикладного ПО входят: пакеты прикладных программ различного назначения и рабочие программы пользователя. Прикладное программное обеспечение предназначено для решения конкретных задач пользователя и организации вычислительного процесса в целом (см. рис.3).

Рис. 3. Классификация прикладного программного обеспечения

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

Различают следующие виды ППП:

* общего назначения (универсальные);

* методо-ориентированные;

* проблемно-ориентированные

* глобальных сетей;

* администрирования вычислительного процесса.

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

Рассмотрим подробнее сущность интегрированных пакетов, так как именно к ним будет относиться создаваемое интерфейсное приложение. Интегрированными пакетами называются ППП, объединяющие в себе функционально различные программные компоненты ППП общего назначения. Современные интегрированные ППП могут включать в себя текстовый редактор, электронную таблицу, СУБД, коммуникационный модуль. В качестве дополнительных модулей в интегрированный пакет могут включаться такие компоненты, как система экспорта-импорта файлов, калькулятор, календарь, системы программирования. Интеграция различных компонентов в единую систему предоставляет пользователю неоспоримые преимущества в интерфейсе.

2. Особенности разработки программного обеспечения

2.1 Этапы разработки программного продукта

Разрабатывая конкретное приложение, необходимо четко разграничивать понятие "прикладная программа" (приложение) и "программный продукт".

Программный продукт -- комплекс взаимосвязанных программ для решения определенной проблемы (задачи) массового спроса, подготовленный к реализации как любой вид промышленной продукции.

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

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

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

Ряд производителей использует ОЕМ-программы (Original Equipment Manufacturer), т.е. встроенные программы, устанавливаемые на компьютеры или поставляемые вместе с вычислительной техникой.

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

Программные продукты могут создаваться как:

* индивидуальная разработка под заказ;

* разработка для массового распространения среди пользователей.

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

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

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

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

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

Поскольку любое разработанное приложение может быть доведено до уровня программного продукта, рассмотрим этапы его разработки:

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

· сбор информации о задаче;

· формулировка условия задачи;

· определение конечных целей решения задачи;

· определение формы выдачи результатов;

· описание данных (их типов, диапазонов величин, структуры и т.п.).

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

2. Анализ и исследование задачи, построение модели:

· анализ существующих аналогов;

· анализ технических и программных средств;

· разработка математической и информационной модели;

· разработка структур данных.

На втором этапе технологического процесса разработки программ выполняется формализованное описание задачи, т.е. устанавливаются и формулируются логико-математические зависимости между исходными и результатными данными. Экономико-математическое описание задачи обеспечивает ее однозначное понимание пользователем и разработчиком программы.

3. Разработка алгоритма:

· выбор метода проектирования алгоритма;

· выбор формы записи алгоритма (блок-схема, псевдокод и др.);

· выбор тестов и метода тестирования;

· проектирование алгоритма.

Третий этап технологического процесса подготовки решения задач на ЭВМ представляет собой алгоритмизацию ее решения, т.е. разработку оригинального или адаптацию (уточнение и корректировку) уже известного алгоритма.

4. Программирование:

· выбор языка программирования;

· уточнение способов организации данных;

· запись алгоритма на выбранном языке программирования.

Четвертый этап технологического процесса подготовки решения задач на ЭВМ представляет собой составление (адаптацию) программ (кодирование). Процесс кодирования заключается в переводе описания алгоритма на один из доступных для ЭВМ языков программирования.

5. Тестирование и отладка:

· синтаксическая отладка;

· отладка семантики и логической структуры;

· тестовые расчеты и анализ результатов тестирования;

· совершенствование программы.

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

6. Анализ результатов решения задачи и уточнение в случае необходимости математической модели с повторным выполнением этапов 2 - 5.

7. Сопровождение программы:

· доработка программы для решения конкретных задач;

· составление документации к решенной задаче, математической модели, алгоритму, программе по их использованию;

· приемо-сдаточные испытания;

· опытная эксплуатация;

· промышленная эксплуатация.

После завершения процесса тестирования и отладки программные средства вместе с сопроводительной документацией передаются пользователю для эксплуатации. При реализации достаточно сложных и ответственных программных комплексов по согласованию пользователя (заказчика) с разработчиком этап эксплуатации программных средств может быть разбит на два подэтапа: экспериментальная (опытная) и промышленная эксплуатация.

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

2.2 Требования к программному обеспечению

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

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

Требование наращиваемости и развития определяется двумя обстоятельствами: во-первых, сам пользователь нуждается в изменениях, а во-вторых, никакое программное обеспечение не является статическим. Разработанное программное обеспечение можно использовать как базовую систему для построения более мощных и совершенных систем. При этом затраты на ее развитие значительно уменьшаются. В итоге - более производительные системы могут быть созданы с меньшими усилиями.

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

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

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

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

Требование эффективности связано с возможностью посредством программного обеспечения своевременно и точно решать поставленные задачи при оптимальном использовании ресурсов вычислительной системы и труда пользователя. В ряде случаев для количественной оценки эффективности ПО используется соотношение "производительность/стоимость": чем оно выше, тем программное обеспечение эффективнее.

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

В основу разработки современного программного обеспечения положены три основных принципа:

· параметрическая универсальность;

· функциональная избыточность;

· функциональная избирательность.

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

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

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

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

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

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

3.1 Анализ предметной области и постановка задачи

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

· легкость восприятия и управления;

· отображение информации в удобной для пользователя форме;

· функциональность;

· наглядный, удобный, интуитивно понятный пользователю интерфейс;

· небольшой объем конечного продукта;

· возможность обновления и дополнения новыми программами.

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

· организация общения;

· работа с текстовыми документами, аудио-видео файлами;

· развлечения.



Рис. 4. Направления, реализуемые в интерфейсном приложении

Рассмотрим подробнее каждый из составляющих.

Приложение "Записная книжка" предназначена для хранения информации и данных об определенных контактах. Календарь - программа с функцией вывода текущей даты. Напоминания - программа, которая в определенное время напомнит о каком-либо событии, проиграв заданную мелодию. Программа "Калькулятор" производит, помимо стандартных вычислений, возведение в степень и вычисление корней, тригонометрические операции, операции с квадратными уравнениями и логарифмами. Блокнот, входящий в стандартный пакет ОС Windows, используется для просмотра и редактирования текстовых файлов. Программа "Конвертер рисунков" предназначена для конвертации рисунков из формата BMP в JPG. В раздел "Кодировщик информации" входят 2 программы: для кодирования слов и для шифрования файлов. Представлены 10 игр - 5 стандартных игр операционной системы Windows и 5 игр других разработчиков, IQ-тест для определения уровня интеллекта, Пианино - программа для любителей инструментальной музыки (пианино, гитара, орган, виолончель и другие). Клавиатурный тренажёр с конкретными задачами (тренировка смены регистра, тренировка переключения алфавитов, тренировка ввода информации в память компьютера) MediaPlayer - программа, которая воспроизводит музыкальные композиции. В данное приложение включена программа для просмотра видео-файлов - Light Alloy 1.E. В состав приложения включены стандартные exe-файлы операционной системы Windows, exe-файлы других разработчиков, exe-файлы собственного создания.

Рис. 5. Программные продукты, подключаемые к интерфейсному приложению

3.2 Интерфейс приложения

Разрабатываемое интерфейсное приложение "Master BEETLE" представляет собой диалоговое окно, на главной форме которого расположены часы с текущим временем и 5 кнопок для перехода в соответствующие разделы приложения: "Общение", "Работа", "MEDIA", "Развлечения", "Разное".

Рис. 6. Главная форма интерфейсного приложения

При нажатии на кнопку "Общение" произойдет переход на форму, где расположены "Записная книжка", "Календарь" и "Напоминания".

Рис. 7. Форма "Общение"

На форме "Общение" помимо кнопок для перехода к приложениям, описанным выше, находится кнопка "На главную>>>", которая осуществляет переход с данной формы на главную. При этом форма "Общение" закроется.

Далее представлены главные формы приложений раздела "Общение".

Рис. 8. Интерфейс приложения "Записная книжка"



Рис. 9. Интерфейс приложения "Напомнить о…"

Рис. 10. Интерфейс приложения "Календарь"

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

Рис.11. Форма "Работа"

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

Рис.12. Интерфейс приложения "Калькулятор"

Рис.13. Интерфейс текстового редактора "Блокнот"

Рис.14. Интерфейс приложения "Конвертер рисунков"

При нажатии на кнопку "Кодирование информации" появится форма, где для перехода к кодированию слов и шифрованию файлов расположены две соответствующие кнопки. Также имеется кнопка для перехода на главную форму интерфейсного приложения.

Рис.15. Форма "Кодирование информации"

Рис.16. Интерфейс приложения "Кодировщик/Раскодировщик"

Рис.17. Интерфейс приложения "Шифрование файлов"

В разделе GAME-ZONE располагаются игры: пять стандартных игр операционной системы Windows и пять игр других разработчиков.



Рис.18. Форма "GAME-ZONE"

Рис. 19. Окно игры "Mahjongg"

Рис. 20. Окно игры "Сапер"

Раздел MEDIA содержит программу для прослушивания аудио-файлов MediaPlayer и программу для просмотра видео-файлов Light Alloy. На форме "MEDIA" также есть кнопка "На главную>>>".

Рис. 22. Интерфейс приложения "Media Player"

Рис. 23. Интерфейс приложения "Light Alloy"

В разделе "Разное" представлены несколько приложений: для тренировки навыков работы на клавиатуре ("Клавиатурный тренажер"), для любителей инструментальной музыки ("Пианино"). Для проверки уровня интеллекта предложен IQ-тест.

Рис. 24. Форма "Разное"

Рис.25. Интерфейс приложения "Клавиатурный тренажер"

Рис.26. Интерфейс приложения "Пианино"



Рис. 27. Главное диалоговое окно IQ-теста

Рис. 28. Вариант вопроса IQ-теста

3.3 Описание собственных разработок

В число собственных разработок для создаваемого интерфейсного приложения входят: "Media Player", "Записная книжка", "Кодировщик", "Календарь", "Напомнить о…".

1. Media Player

"Media Player" - программа, которая должна воспроизводить музыкальные композиции. В Delphi есть универсальный компонент MediaPlayer, который выполняет нужные нам функции. Так же на форме расположены 2 кнопки для открытия файла и для выхода из программы.

Рис.29. Окно "Media Player"

2. Записная книжка

Записная книжка - программа, написанная на Delphi. Представляет собой окно, в котором расположены две кнопки: "Создать новый контакт" (для создания нового контакта) и "Просмотр" (для просмотра сведений об имеющихся контактах).

Рис. 30. Главная форма "Записной книжки"

При нажатии на кнопку "Создать…" появляется форма с различными вкладками. Во вкладки "Имя", "Домашние", "Служебные", "Личные", "Другие" заносятся различные сведения о создаваемом контакте такие как, фамилия, имя и отчество, дата рождения, адреса, номера телефонов, адрес электронной почты и многое другое.



Рис. 31. Процесс создания нового контакта

При нажатии кнопки "Добавить" происходит сохранение внесенных записей в базу данных. Для просмотра существующих записей необходимо нажать кнопку "Просмотр".

begin

Reset(f1,'C:\FriendsName.db');

Memo1.Clear;

s:='';

PageControl1.Hide;

Memo1.Show;

Button3.show;

while not eof(f1) do

begin

read(f1,friends);

s:=friends.name +' '+friends.fathername +' '+friends.surname+' '+friends.address+' '+friends.town+' '+friends.region+' '+friends.index+' '+friends.country+' '+friends.telephone+' '+friends.fax+' '+friends.mobile+' '+friends.mail+' '+friends.organize+' '+friends.addressorg+' '+friends.townorg+' '+friends.regionorg+' '+friends.indexorg+' '+friends.countryorg+' '+friends.post+' '+friends.section+' '+friends.telephoneorg+' '+friends.faxorg+' '+friends.pager+' '+friends.birthday+' '+friends.comment;

Memo1.Lines.Add(s);

end;

closeFile(f1);

Подробный листинг программы "Записная книжка" - в Приложении 2.

3. Кодировщик

Кодировщик/Раскодировщик слов - программа, написанная на языке программирования Visual Basic. Очень простая в использовании.

Кодировка происходит за счет замены любого введённого символа на символ, находящийся в пяти позициях от него. Раскодировка, соответственно, осуществляется обратным способом.

Листинг программы "Кодировщик" находится в Приложении 2.

Рис. 32. Окно программы Кодировщик/Раскодировщик

Рис.33. Процесс кодирования



Рис.34. Кодирование

4. Календарь

Программа "Календарь" создана на языке программирования Delphi при помощи функции MonthCalendar. Она представляет собой Стандартный календарь на месяц с указанием текущей даты.

Рис. 35. Календарь

5. "Напомнить о…"

Программа "Напомнить о…" предназначена для напоминания о каком-либо событии в установленное время.



Рис. 36. Интерфейс программы "Напомнить о…"

Заключение

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

Для выявления необходимости, эффективности и функциональности разработанного приложения был проведен опрос среди тридцати пяти респондентов в возрасте от девятнадцати (19) до тридцати трех (33) лет. Результат был получен следующий - девятнадцать (19) опрашиваемых дали положительный ответ на вопрос: "Стали бы вы использовать данное интерфейсное приложение в своей повседневной работе за персональным компьютером?" Было предложено расширение интерфейсного приложения большим количеством программ. Также предлагалось создавать приложения индивидуальной направленности, т.е. для конкретного пользователя.

Следовательно, можно заключить, что в рамках данного дипломного проектирования поставленная цель достигнута и разработанная программа готова к использованию.

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

Список литературы

1. Богумирский Б. Эффективная работа на IBM PC. СПб.: Питер, 2002.

2. Бройдо В Л. Основы информатики. СПб.: СПб.ГИЭА, 2003.

3. Гофман В.Э., Хомоненко А.Д. - Delphi 6. - СПб.: БХВ-Петербург, 2001.

4. Грабауров В.А. - Информационные технологии для менеджеров. - М.: Финансы и статистика, 2002.

5. Гринберг А.С., Горбачев Н.Н., Бондаренко А.С. - Информационные технологии управления: Учебное пособие для вузов. - М.: ЮНИТИ-ДИАНА, 2004.

6. Каймин В.А. Информатика: Учебник. - М.: ИНФРА-М, 2000.

7. Культин Н.Б. Delphi6. Программирование на Object Pascal. - СПб. 2001.

8. Макарова Н. В., Бройдо В. Л., Ильина О. П.и др. Информатика /Под ред. Н. В. Макаровой. М.: Финансы и статистика, 2002.

9. Мишенин А.И., Салмин С.П. - Теория экономических информационных систем. - М.: Финансы и статистика, 2005.

10. Немнюгин С.А. Программирование - М.: Питер, 2000.

11. Программирование под ред. В.В.Старлова - М: Питер, 1999.

12. Ремизов Н. Delphi - М.:Питер,2000.

13. Симонович С. В., Евсеев Г. А., Мураковский В. И. Информатика: базовый курс / Под ред. С. В. Симоновича. СПб.: Питер, 1999.

14. Титоренко Г.А. - Автоматизированные информационные технологии в экономике: Учебник.-- М.: Компьютер, ЮНИТИ, 1998.

15. Фигурнов В.Э. IBM PC для пользователя. 9-е изд., перераб.и доп. М.:Финансы и статистика, КомпьютерПресс 2003.

16. Черенков А.П.Информационные системы для экономистов: Учебное пособие/--М.: Издательство "Экзамен", 2004.

17. Якубайтис Э.А. Информатика - Электроника - Сети. М.: Финансы и статистика 2003.

Приложение 1.

Листинг главной формы

unit Unit1;

interface

uses

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

StdCtrls, ExtCtrls;

type

TForm1 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

Button5: TButton;

Timer1: TTimer;

Label1: TLabel;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

procedure Button5Click(Sender: TObject);

procedure Timer1Timer(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses Unit2, Unit3, Unit4, Unit5, Unit6;

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);

begin

Form2.show;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Form3.show;

end;

procedure TForm1.Button3Click(Sender: TObject);

begin

Form4.show;

end;

procedure TForm1.Button4Click(Sender: TObject);

begin

Form5.show;

end;

procedure TForm1.Button5Click(Sender: TObject);

begin

Form6.show;

end;

procedure TForm1.Timer1Timer(Sender: TObject);

begin

Label1.Caption:=FormatDateTime(' hh:mm:ss AM/PM', Now());

end;

end.

Листинг формы "Общение"

unit Unit2;

interface

uses

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

StdCtrls;

type

TForm2 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

procedure Button3Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form2: TForm2;

implementation

uses Unit1;

{$R *.DFM}

procedure TForm2.Button3Click(Sender: TObject);

begin

Form2.hide;

Form1.show;

end;

procedure TForm2.Button2Click(Sender: TObject);

begin

WinExec(PChar('Календарь.exe'),SW_ShowNormal);

end;

procedure TForm2.Button1Click(Sender: TObject);

begin

WinExec(PChar('Записная книжка.exe'),SW_ShowNormal);

end;

procedure TForm2.Button4Click(Sender: TObject);

begin

WinExec(PChar('Напомнить о.exe'),SW_ShowNormal);

end;

end.

Листинг формы "Работа"

unit Unit3;

interface

uses

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

StdCtrls;

type

TForm3 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

Button5: TButton;

procedure Button4Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button5Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form3: TForm3;

implementation

uses Unit7, Unit1;

{$R *.DFM}

procedure TForm3.Button4Click(Sender: TObject);

begin

Form7.show;

end;

procedure TForm3.Button1Click(Sender: TObject);

begin

WinExec(PChar('rfXP_calc.exe'),SW_ShowNormal);

end;

procedure TForm3.Button2Click(Sender: TObject);

begin

WinExec(PChar('Конвертер рисунков.exe'),SW_ShowNormal);

end;

procedure TForm3.Button3Click(Sender: TObject);

begin

WinExec(PChar('notepad.exe'),SW_ShowNormal);

end;

procedure TForm3.Button5Click(Sender: TObject);

begin

Form3.hide;

Form1.show;

end;

end.

Листинг формы "GAME-ZONE"

unit Unit4;

interface

uses

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

StdCtrls;

type

TForm4 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

Button5: TButton;

Button6: TButton;

Button7: TButton;

Button8: TButton;

Button9: TButton;

Button10: TButton;

Button11: TButton;

Label1: TLabel;

procedure Button5Click(Sender: TObject);

procedure Button11Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

procedure Button6Click(Sender: TObject);

procedure Button7Click(Sender: TObject);

procedure Button8Click(Sender: TObject);

procedure Button9Click(Sender: TObject);

procedure Button10Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form4: TForm4;

implementation

uses Unit1;

{$R *.DFM}

procedure TForm4.Button5Click(Sender: TObject);

begin

WinExec(PChar('jezzball.exe'),SW_ShowNormal);

end;

procedure TForm4.Button11Click(Sender: TObject);

begin

Form4.hide;

Form1.show;

end;

procedure TForm4.Button1Click(Sender: TObject);

begin

WinExec(PChar('shissho.exe'),SW_ShowNormal);

end;

procedure TForm4.Button2Click(Sender: TObject);

begin

WinExec(PChar('mahjongg.exe'),SW_ShowNormal);

end;

procedure TForm4.Button3Click(Sender: TObject);

begin

WinExec(PChar('sticks.exe'),SW_ShowNormal);

end;

procedure TForm4.Button4Click(Sender: TObject);

begin

WinExec(PChar('cubes.exe'),SW_ShowNormal);

end;

procedure TForm4.Button6Click(Sender: TObject);

begin

WinExec(PChar('sol.exe'),SW_ShowNormal);

end;

procedure TForm4.Button7Click(Sender: TObject);

begin

WinExec(PChar('spider.exe'),SW_ShowNormal);

end;

procedure TForm4.Button8Click(Sender: TObject);

begin

WinExec(PChar('winmine.exe'),SW_ShowNormal);

end;

procedure TForm4.Button9Click(Sender: TObject);

begin

WinExec(PChar('freecell.exe'),SW_ShowNormal);

end;

procedure TForm4.Button10Click(Sender: TObject);

begin

WinExec(PChar('mshearts.exe'),SW_ShowNormal);

end;

end.

Листинг формы "MEDIA"

unit Unit5;

interface

uses

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

StdCtrls;

type

TForm5 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

procedure Button2Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form5: TForm5;

implementation

uses Unit1;

{$R *.DFM}

procedure TForm5.Button2Click(Sender: TObject);

begin

WinExec(PChar('LA.exe'),SW_ShowNormal);

end;

procedure TForm5.Button1Click(Sender: TObject);

begin

WinExec(PChar('MediaPlayer.exe'),SW_ShowNormal);

end;

procedure TForm5.Button3Click(Sender: TObject);

begin

Form5.hide;

Form1.show;

end;

end.

Листинг формы "Разное"

unit Unit6;

interface

uses

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

StdCtrls;

type

TForm6 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form6: TForm6;

implementation

uses Unit1;

{$R *.DFM}

procedure TForm6.Button1Click(Sender: TObject);

begin

WinExec(PChar('klaw.exe'),SW_ShowNormal);

end;

procedure TForm6.Button2Click(Sender: TObject);

begin

WinExec(PChar('tpiano.exe'),SW_ShowNormal);

end;

procedure TForm6.Button3Click(Sender: TObject);

begin

WinExec(PChar('IQtest.exe'),SW_ShowNormal);

end;

procedure TForm6.Button4Click(Sender: TObject);

begin

Form6.hide;

Form1.show;

end;

end.

Листинг формы "Кодирование информации"

unit Unit7;

interface

uses

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

StdCtrls;

type

TForm7 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form7: TForm7;

implementation

uses Unit1;

{$R *.DFM}

procedure TForm7.Button1Click(Sender: TObject);

begin

WinExec(PChar('Код.exe'),SW_ShowNormal)

end;

procedure TForm7.Button2Click(Sender: TObject);

begin

WinExec(PChar('Шифровщик файлов.exe'),SW_ShowNormal);

end;

procedure TForm7.Button3Click(Sender: TObject);

begin

Form7.hide;

Form1.show;

end;

end.

Приложение 2.

Листинг программы "Записная книжка"

unit Unit1;

interface

uses

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

ComCtrls, StdCtrls, Mask;

type

TForm1 = class(TForm)

PageControl1: TPageControl;

TabSheet1: TTabSheet;

TabSheet2: TTabSheet;

TabSheet3: TTabSheet;

TabSheet4: TTabSheet;

TabSheet5: TTabSheet;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Edit1: TEdit;

Label4: TLabel;

Edit2: TEdit;

Edit3: TEdit;

Label5: TLabel;

Label6: TLabel;

Label7: TLabel;

Label8: TLabel;

Label9: TLabel;

Label10: TLabel;

Edit4: TEdit;

Edit5: TEdit;

Edit6: TEdit;

Edit8: TEdit;

Label11: TLabel;

Label12: TLabel;

Label13: TLabel;

Label14: TLabel;

Label15: TLabel;

Label16: TLabel;

Label17: TLabel;

Label18: TLabel;

Label19: TLabel;

Label20: TLabel;

Edit12: TEdit;

Edit13: TEdit;

Edit14: TEdit;

Edit15: TEdit;

Edit17: TEdit;

Label21: TLabel;

Label22: TLabel;

Label23: TLabel;

Label24: TLabel;

Label25: TLabel;

Edit18: TEdit;

Edit19: TEdit;

Edit22: TEdit;

Label26: TLabel;

Label27: TLabel;

Label28: TLabel;

Edit23: TEdit;

Label29: TLabel;

Label30: TLabel;

Edit25: TEdit;

Label31: TLabel;

Button1: TButton;

Button2: TButton;

Button5: TButton;

Memo1: TMemo;

Button3: TButton;

MaskEdit1: TMaskEdit;

MaskEdit2: TMaskEdit;

MaskEdit3: TMaskEdit;

MaskEdit4: TMaskEdit;

MaskEdit5: TMaskEdit;

MaskEdit6: TMaskEdit;

MaskEdit7: TMaskEdit;

MaskEdit8: TMaskEdit;

procedure FormCreate(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button5Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

type Tfriends=record

name, fathername, surname: string [20];

address, town, region,country,mail,organize, addressorg,townorg,regionorg,countryorg,post,section:string [50];

index, telephone, fax, mobile, indexorg, telephoneorg, faxorg, pager:string [15];

birthday:string [8];

comment:string [200];

end;

var

Form1: TForm1;

f1:file of Tfriends;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);

begin

Button2.hide;

Button3.hide;

Memo1.hide;

PageControl1.Hide;

AssignFile(f1,'C:\FriendsName.db');

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

PageControl1.show;

Button2.show;

end;

procedure TForm1.Button5Click(Sender: TObject);

var friends:Tfriends;

s:string;

begin

Reset(f1,'C:\FriendsName.db');

Memo1.Clear;

s:='';

PageControl1.Hide;

Memo1.Show;

Button3.show;

while not eof(f1) do

begin

read(f1,friends);

s:=friends.name +' '+friends.fathername +' '+friends.surname+' '+friends.address+' '+friends.town+' '+friends.region+' '+friends.index+' '+friends.country+' '+friends.telephone+' '+friends.fax+' '+friends.mobile+' '+friends.mail+' '+friends.organize+' '+friends.addressorg+' '+friends.townorg+' '+friends.regionorg+' '+friends.indexorg+' '+friends.countryorg+' '+friends.post+' '+friends.section+' '+friends.telephoneorg+' '+friends.faxorg+' '+friends.pager+' '+friends.birthday+' '+friends.comment;

Memo1.Lines.Add(s);

end;

closeFile(f1);

end;

procedure TForm1.Button2Click(Sender: TObject);

var friends: Tfriends;

s:string;

n:integer;

begin

n:=0;

AssignFile(f1,'C:\FriendsName.db');

{$I-}

Reset(f1);

Seek(f1,FileSize(f1));

{$I+}

if IOResult<>0 then

begin

rewrite(f1);

end;

with friends do

begin

name:=Edit1.Text;

fathername:=Edit2.Text;

surname:=Edit3.Text;

address:=Edit4.Text;

town:=Edit5.Text;

region:=Edit6.Text;

index:=MaskEdit5.Text;

country:=Edit8.Text;

telephone:=MaskEdit2.Text;

fax:=MaskEdit3.Text;

mobile:=MaskEdit4.Text;

organize:=Edit12.Text;

addressorg:=Edit13.Text;

townorg:=Edit14.Text;

regionorg:=Edit15.text;

indexorg:=MaskEdit6.Text;

countryorg:=Edit17.Text;

post:=Edit18.Text;

section:=Edit19.Text;

telephoneorg:=MaskEdit7.Text;

faxorg:=MaskEdit8.Text;

pager:=Edit22.Text;

mail:=Edit23.Text;

birthday:=MaskEdit1.Text;

comment:=Edit25.Text;

write(f1,friends);

end;

closeFile(f1);

Edit1.Text:='';

Edit2.Text:='';

Edit3.Text:='';

Edit4.Text:='';

Edit5.Text:='';

Edit6.Text:='';

MaskEdit5.Text:='';

Edit8.Text:='';

MaskEdit2.Text:='';

MaskEdit3.Text:='';

MaskEdit4.Text:='';

Edit12.Text:='';

Edit13.Text:='';

Edit14.Text:='';

Edit15.Text:='';

MaskEdit6.Text:='';

Edit17.Text:='';

Edit18.Text:='';

Edit19.Text:='';

MaskEdit7.Text:='';

MaskEdit8.Text:='';

Edit22.Text:='';

Edit23.Text:='';

MaskEdit1.Text:='';

Edit25.Text:='';

end;

procedure TForm1.Button3Click(Sender: TObject);