|
Реферат: База данных "Домашняя библиотека" (Компьютеры)
Министерство общего и профессионального
Образования Российской Федерации
Иркутский Государственный Технический
Университет
Кафедра информатики
Курсовая работа
База данных “Домашняя библиотека”
Выполнил: студент группы ТПП-
00-1
Озерова А.Ю.
Проверил: преподаватель
Информатики
Иркутск 2001г.
Иркутск 2001
Содержание
1. Введение 3
2. Основные понятия баз данных 4
2.1 Базы данных и системы управления базами данных 4
2.2 Состав системы управления базами данных 5
3. Структура простейшей базы данных 6
4. Свойства полей базы данных 6
5. Типы данных 8
6. Безопасность баз данных 9
2. Проектирование баз данных 9
1. Режимы работы с базами данных 9
2. Объекты базы данных 10
1. Таблицы 10
2. Запросы 10
3. Формы 10
4. Отчеты 11
5. Страницы 11
6. Макросы и модули 11
3. Проектирование базы данных 11
4. Разработка технического задания 12
5. Разработка структуры базы данных 12
3. Работа с СУБД Microsoft Access 2000
1. Создание таблиц
2. Создание запросов, отчетов
4. Заключение
5. Список использованной литературы
Введение
Для принятия обоснованных и эффективных решений в производственной
деятельности, в управлении экономикой и в политике современный специалист
должен уметь с помощью компьютеров и средств связи получать, накапливать,
хранить и обрабатывать данные, представляя результат в виде наглядных
документов. Поэтому, в данной курсовой работе рассмотрим работу с базами
данных.
Основные понятия баз данных
2.1 Базы данных и системы управления базами данных
База данных – это организованная структура, предназначенная для
хранения информации. В современных базах данных хранятся не только
данные, но и информация.
Это утверждение легко пояснить, если, например, рассмотреть базу данных
крупного банка. В ней есть все необходимые сведения о клиентах, об их
адресах, кредитной истории, состояние расчетных счетов, финансовых
операциях и т.д. Доступ к этой базе данных имеется у достаточно
большого количества сотрудников банка, но среди них вряд ли найдется
такое лицо, которое имеет доступ ко всей базе полностью и при этом
способно единолично вносить в нее произвольные изменения. Кроме данных,
база содержит методы и средства, позволяющие каждому из сотрудников
оперировать только с теми данными, которые входят в его компетенцию. В
результате взаимодействия данных, содержащихся в базе, с методами,
доступными конкретным сотрудникам, образуется информация, которую они
потребляют и на основании которой в пределах собственной компетенции
производят ввод и редактирование данных.
С понятием базы данных тесно связано понятие системы управления
базой данных. Это комплекс программных средств, предназначенных для
создания структуры новой базы, наполнение ее содержимым, редактирование
содержимого и визуализации информации. Под визуализацией информации
базы понимается отбор отображаемых данных в соответствии с заданным
критерием, их упорядочение, оформление и последующая выдача на
устройства вывода или передачи по каналам связи.
В мире существует множество систем управления базами данных.
Несмотря на то что они могут по-разному работать с разными объектами и
предоставляют пользователю различные функции и средства, большинство
СУБД опираются на единый устоявшийся комплекс основных понятий. Это
дает нам возможность рассмотреть одну систему и обобщить ее понятия,
приемы и методы на весь класс СУБД. В качестве такого учебного объекта
мы выберем СУБД Microsoft Access, входящую в пакет Microsoft Office.
2.2 Состав СУБД
Архитектура СУБД может быть представлена следующим образом:
Программа пользователя
СУБД физическая БД
ЯОД ЯМД
Описание БД
Язык описания данных (ЯОД) – Средства описания данных в БД и связей
между ними. Средствами этого языка описывается структура БД, форматы
записей, пароли, защищающие данные.
Язык манипулирования данными (ЯМД) – язык для выполнения операций
над данными, позволяющий менять их строение.
Для различных СУБД реализация этих уровней языков может быть
различной. В одних случаях ЯОД и ЯМД требует составления пользователем
программы полностью “вручную”, в других (что отражает современную
тенденцию) в СУБД присутствует средства визуальной (зримой, наглядной)
разработки программ. Для этого в современных СУБД имеются редакторы
экранных форм, отчетов. “Кирпичиками” (инструментами) таких редакторов
являются поля различных видов (поля ввода, поля вывода, вычисляемые
поля), процедуры обработки различных типов (формы ввода, таблицы,
отчеты, запросы). На основании созданных пользователем объектов
программы – генераторы формируют программный код на языке конкретной
машины или на промежуточном языке.
2.3 Структура простейшей базы данных
Сразу поясним, что если в базе нет никаких данных (пустая база), то это все
равно полноценная база данных. Этот факт имеет методическое значение. Хотя
данных в базе и нет, но информация в ней все-таки есть – это структура
базы. Она определяет методы занесения данных и хранения их в базе.
Простейший «некомпьютерный» вариант базы данных – деловой ежедневник, в
котором каждому календарному дню выделено по странице. Даже если в нем не
записано ни строки, он не перестает быть ежедневником, поскольку имеет
структуру, четко отличающую его от записных книжек, рабочих тетрадей и
прочей писчебумажной продукции.
Базы данных могут содержать различные объекты. Основными объектами любой
базы данных являются ее таблицы. Простейшая база данных имеет хотя бы одну
таблицу. Соответственно, структура простейшей базы данных тождественно
равна структуре ее таблицы.
Структуру двумерной таблицы образуют столбцы и строки. Их аналогами в
простейшей базе данных являются поля и записи. Если записей в таблице пока
нет, значит, ее структура образована только набором полей. Изменив состав
полей базовой таблицы (или их свойства), мы изменяем структуру базы данных
и, соответственно, получаем новую базу данных.
2.4 Свойства полей базы данных
Поля базы данных не просто определяют структуру базы – они еще определяют
групповые свойства данных, записываемых в ячейки, принадлежащие каждому из
полей. Ниже перечислены основные свойства полей таблиц баз данных на
примере СУБД Microsoft Access.
. Имя поля – определяет, как следует обращаться к данным этого поля при
автоматических операциях с базой (по умолчанию имена полей
используются в качестве заголовков столбцов таблиц).
. Тип поля – определяет тип данных, которые могут содержаться в данном
поле.
. Размер поля – определяет предельную длину (в символах) данных, которые
могут размещаться в данном поле.
. Формат поля – определяет способ форматирования данных в ячейках,
принадлежащих полю.
. Маска ввода – определяет форму, в которой вводятся данные а поле
(средство автоматизации ввода данных).
. Подпись – определяет заголовок столбца таблицы для данного поля (если
подпись не указана, то в качестве заголовка столбца используется
свойство Имя поля).
. Значение по умолчанию – то значение, которое вводится в ячейки поля
автоматически (средство автоматизации ввода данных).
. Условие на значение – ограничение, используемое для проверки
правильности ввода данных (средство автоматизации ввода, которое
используется, как правило, для данных, имеющих числовой тип, денежный
тип или тип даты).
. Сообщение об ошибке – текстовое сообщение, которое выдается
автоматически при попытке ввода в поле ошибочных данных.
. Обязательное поле – свойство, определяющее обязательность заполнения
данного поля при наполнении базы.
. Пустые строки – свойство, разрешающее ввод пустых строковых данных (от
свойства Обязательное поле отличается тем, что относится не ко всем
типам данных, а лишь к некоторым, например к текстовым).
. Индексированное поле – если поле обладает этим свойством, все
операции, связанные с поиском или сортировкой записей по значению,
хранящемуся в данном поле, существенно ускоряются. Кроме того, для
индексированных полей можно сделать так, что значение в записях будут
проверяться по этому полю на наличие повторов, что позволяет
автоматически исключить дублирование данных.
Поскольку в разных полях могут содержаться данные разного типа, то и
свойства у полей могут различаться в зависимости от типа данных. Так,
например, список вышеуказанных свойств полей относится в основном к полям
текстового типа. Поля других типов могут иметь или не иметь эти свойства,
но могут добавлять к ним и свои. Например, для данных, представляющих
действительные числа, важным свойством является количество знаков после
десятичной запятой. С другой стороны, для полей, используемых для хранения
рисунков, звукозаписей, видео клипов и других объектов OLE, большинство
вышеуказанных свойств не имеют смысла.
2.5 Типы данных
Таблицы баз данных, как правило, допускают работу с гораздо большим
количеством разных типов данных. Так, например, базы данных Microsoft
Access работают со следующими типами данных.
. Текстовый – тип данных, используемый для хранения обычного
неформатированного текста ограниченного размера (до 255 символов).
. Числовой – тип данных для хранения действительных чисел.
. Поле Мемо – специальный тип данных для хранения больших объемов текста
(до 65 535 символов). Физически текст не хранится в поле. Он храниться в
другом месте базы данных, а в поле храниться указатель на него, но для
пользователя такое разделение заметно не всегда.
. Дата/время – тип данных для хранения календарных дат и текущего времени.
. Денежный - тип данных для хранения денежных сумм. Теоретически, для их
записи можно было бы пользоваться и полями числового типа, но для
денежных сумм есть некоторые особенности (например, связанные с
правилами округления), которые делают более удобным использование
специального типа данных, а не настройку числового типа.
. Счетчик – специальный тип данных для уникальных (не повторяющихся в
поле) натуральных чисел с автоматическим наращиванием. Естественное
использование – для порядковой нумерации записей.
. Логический - тип для хранения логических данных (могут принимать только
два значения, например Да или Нет).
. Гиперссылка – специальное поле для хранения адресов URL Web-объектов
Интернета. При щелчке на ссылке автоматически происходит запуск броузера
и воспроизведение объекта в его окне.
. Мастер подстановок – это не специальный тип данных. Это объект,
настройкой которого можно автоматизировать ввод данных в поле так, чтобы
не вводить их вручную, а выбирать их из раскрывающегося списка.
2.6 Безопасность баз данных
Базы данных – это тоже файлы, но работа с ними отличается от работы с
файлами других типов, создаваемых прочими приложениями. Выше мы видели, что
всю работу по обслуживанию файловой структуры берет на себя операционная
система. Для базы данных предъявляются особые требования с точки зрения
безопасности, поэтому в них реализован другой подход к сохранению данных.
Базы данных – это особые структуры. Информация, которая в них содержится,
очень часто имеет общественную ценность. Нередко с одной и той же базой
работают тысячи людей по всей стране. От информации, которая содержится в
некоторых базах, может зависеть благополучие множества людей. Поэтому
целостность содержимого базы не может и не должна зависеть ни от конкретных
действий некоего пользователя, забывшего сохранить файлы перед выключением
компьютера, ни от перебоев в электросети.
Проблема безопасности баз данных решается тем, что в СУБД для сохранения
информации используется двойной подход. В части операций, как обычно,
участвует операционная система компьютера, но некоторые операции сохранения
происходят в обход операционной системы.
Проектирование баз данных
3.1 Режимы работы с базами данных
Обычно с базами данных работаю две категории пользователей. Первая
категория – проектировщики. Их задача состоит в разработке структуры таблиц
базы данных и согласование ее с заказчиком. Кроме таблиц проектировщики
разрабатывают и другие объекты базы данных, предназначенные, с одной
стороны, для автоматизации работы с базой, а с другой стороны – для
ограничения функциональных возможностей работы с базой (если это необходимо
из соображений безопасности). Проектировщики не наполняют базу конкретными
данными, (заказчик может считать их конфиденциальными и не предоставлять
посторонним лицам). Исключение составляет экспериментальное наполнение
модельными данными на этапе отладки объектов базы.
Вторая категория исполнителей, работающих с базами данных, - пользователи.
Они получают исходную базу данных от проектировщиков и занимаются ее
наполнением и обслуживанием. В общем случае пользователи не имеют средств
доступа к управлению структурой базы – только к данным, да и то не ко всем,
а к тем, работа с которыми предусмотрена на конкретном рабочем месте.
Соответственно СУБД имеет два режима работы: проектировочный и
пользовательский. Первый режим предназначен для создания или изменения
структуры базы и создание ее объектов. Во втором режиме происходит
использование ранее подготовленных объектов для наполнения базы или
получения данных из нее.
3.2 Объекты базы данных
3.2.1 Таблицы
Таблицы – это основные объекты любой базы данных. Во-первых, в таблицах
хранятся все данные, имеющиеся в базе, а во-вторых, таблицы хранят и
структуру базы (поля, их типы и свойства).
2. Запросы
Эти объекты служат для извлечения данных из таблиц и предоставления их
пользователю в удобном виде. С помощью запросов выполняют такие операции
как отбор данных, их сортировку и фильтрацию. С помощью запросов можно
выполнять преобразования данных по заданному алгоритму, создавать новые
таблицы, выполнять автоматическое наполнения таблиц данными,
импортированными из других источников, выполнять простейшие вычисления в
таблицах и многое другое.
3. Формы
Если запросы – это специальные средства для отбора и анализа данных, то
формы – это средства для ввода данных. Смысл их тот же – предоставить
пользователю средства для заполнения только тех полей, которые ему
заполнять положено. Одновременно с этим в форме можно разместить
специальные элементы управления (счетчики, раскрывающиеся списки,
переключатели, флажки и прочее) для автоматизации ввода. Преимущества форм
раскрываются особенно наглядно, когда происходит ввод данных с заполненных
бланков. В этом случае форму делают графическими средствами так, чтобы она
повторяла оформление бланка – это заметно упрощает работу наборщика,
снижает его утомление и предотвращает появление печатных ошибок.
3.2.4 Отчеты
По своим свойствам и структуре отчеты во многом похожи на формы, но
предназначены только для вывода данных, причем для вывода не на экран, а на
принтер. В связи с этим отчеты отличаются тем, что в них приняты
специальные меры для группирования выводимых данных и для вывода
специальных элементов оформления, характерных для печатных документов.
3.2.5 Страницы
Это специальные объекты баз данных, реализованных в последней версии СУБД
Microsoft Access (Access 2000). Правда, более коректно их называть
страницами доступа к данным. Физически это особый объект, выполненный в
коде HTML, размещаемый на Web-странице и передаваемый клиенту вместе с ней.
Сам по себе этот объект не является базой данной, но содержит компоненты,
через которые осуществляется связь переданной Web-страницы с базой данных,
остающейся на сервере. Пользуясь этими компонентами, посетитель Web-узла
может просматривать записи базы в полях страницы доступа. Таким образом,
страницы доступа к данным осуществляют интерфейс между клиентом, сервером и
базой данных, размещенной на сервере. Эта база данных не обязательно должна
быть базой данных Microsoft Access. Страницы доступа, созданные средствами
Microsoft Access, посволяют работать также с базами данных Microsoft SQL
Server.
3.2.6 Макросы и модули
Эти категории объектов предназначены как для автоматизации повторяющихся
операций при работе с СУБД, так и для создания новых функций путем
программирования. В СУБД Microsoft Access макросы состоят из
последовательности внутренних команд СУБД и являются одним из средств
автоматизации работы с базой. Модули создаются средствами внешнего языка
програмирования, в данном случае языка Visual Basic for Applications. Это
одно из средств, с помощью которых разработчик базы может заложить в нее
нестандартные функциональные возможности, удовлетворить специфическое
требование заказчика, повысить быстродействие системы управления, а также
уровень ее защищенности.
2. Проектирование базы данных
Методически правильно начинать работу с карандашом и листом бумаги в руках,
не используя компьютер. На данном этапе он просто не нужен. Неоптимальные
решения и прямые ошибки, заложенные на этапе проектирования, впоследствии
очень трудно устраняются, поэтому этот этап является основополагающим.
3. Разработка технического задания
Техническое задание на проектирование базы данных должен предоставить
заказчик. Однако для этого он должен владеть соответствующей терминологией
и знать, хотя бы в общих чертах, технические возможности основных СУБД. К
сожалению, на практике такое положение встречается не всегда. Поэтому
обычно используют следующие подходы:
. Демонстрируют заказчику работу аналогичной базы данных, после чего
согласовывают спецификацию отличий;
. Если аналога нет, выясняют круг задач и потребностей заказчика, после
чего помогают ему подготовить техническое задание.
При подготовке технического задания составляют:
. Список исходных данных, с которыми работает заказчик;
. Список выходных данных, которые необходимы заказчику для управления
структурой своего предприятия;
. Список выходных данных, которые не являются необходимыми для заказчика,
но которые он должен предоставить в другие организации (в вышестоящие
структуры, в органы статистического учета, прочие административные и
контролирующие организации).
При этом очень важно не ограничиваться взаимодействием с головным
подразделением заказчика, а провести обсуждение со всеми службами и
подразделениями, которые могут оказать оказаться поставщиками данных в базу
или их потребителями.
4. Разработка структуры базы данных
Выяснив основную часть данных, которые заказчик потребляет или поставляет,
можно приступать к созданию структуры базы, то есть структуры ее основных
таблиц.
1. Работа начинается с составления генерального списка полей – он может
насчитывать десятки и даже сотни позиций.
2. В соответствии с типом данных, размещаемых в каждом поле, определяют
наиболее подходящий тип для каждого поля.
3. Далее распределяют поля генерального списка по базовым таблицам. На
первом этапе распределение производят по функциональному признаку. Цель –
обеспечить, чтобы ввод данных в одну таблицу производился, по
возможности, в рамках одного подразделения, а еще лучше – на одном
рабочем месте.
4. В каждой из таблиц намечают ключевое поле. В качестве такого выбирают
поле, данные в котором повторяться не могут. Например, для таблицы данных
о студентах таким поле может служить индивидуальный шифр студента. Для
таблицы, в которой содержаться расписание занятий, такого поля можно и не
найти, но его можно создать искусственным комбинированием полей «Время
занятия» и «Номер аудитории». Эта комбинация не повторима, так как в
одной аудитории в одно и то же время не принято проводить два различных
занятия. Если в таблице вообще нет ни каких полей, которые можно было бы
использовать, как ключевые, всегда можно ввести дополнительное поле типа
Счетчик – оно не может содержать повторяющихся данных по определению.
5. С помощью карандаша и бумаги расчерчивают связи между таблицами. Такой
чертеж называется схемой данных. Существует несколько типов возможных
связей между таблицами. Наиболее распространенными являются связи «один
ко многим» и «один к одному». Связь между таблицами организуется на
основе общего поля, причем в одной из таблиц оно обязательно должно быть
ключевым, то есть на стороне «один» должно выступать ключевое поле,
содержащее уникальные, неповторяющиеся значения. Значения на стороне
«многие» могут повторяться.
6. Разработкой схемы данных заканчивается «бумажный» этап работы над
техническим предложением. Эту схему можно согласовать с заказчиком, после
чего приступать к непосредственному созданию базы данных.
Следует помнить, что по ходу разработки проекта заказчику непременно будут
приходить в голову новые идеи. На всех этапах проектирования он стремится
охватить единой системой все новые и новые подразделения и службы
предприятия. Возможность гибкого использования его пожеланий во многом
определяется квалификацией разработчика базы данных. Если схема данных
составлена правильно, подключать к базе новые таблицы нетрудно. Если
структура базы нерациональна, разработчик может испытать серьезные
трудности и войти в противоречие с заказчиком. Противоречия исполнителя с
заказчиком всегда свидетельствуют о недостаточной квалификации исполнителя.
Именно по этому этап предварительного проектирования базы данных следует
считать основным. От его успеха зависит, насколько база данных станет
удобной, и будут ли с ней работать пользователи. Если отмечается, что
пользователи базы «саботируют» ее эксплуатацию и предпочитают работать
традиционными методами, это говорит не о низкой квалификации пользователей,
а о недостаточной квалификации разработчика базы.
На этом этапе завершается предварительное проектирование базы данных, и на
следующем этапе начинается ее непосредственная разработка. С этого момента
следует начать работу с СУБД.
Список использованной литературы
1. Информатика. Базовый курс /Симонович С.В. и др. - СПб: Издательство
«Питер», 2000. – 640с.
2. Информатика. Учебное пособие /Под ред. В.Г. Кирия. – Иркутск:
ИрГТУ ,1998 часть 2. – 382с.
3. Информатика. Учебное пособие /Ломтадзе В.В., Шишкина Л.П. – Иркутск:
ИрГТУ, 1999. – 116с.
Реферат на тему: База данных "Бюро знакомств"
МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ
НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ КОРАБЛЕБУДУВАННЯ
ім. адм. Макарова
Херсонський філіал
Кафедра інформаційних технологій
Курсова робота
З ДИСЦИПЛІНИ
“Об’єктно – орієнтоване програмування”
ТЕМА: Розробка програмного забезпечення “Бюро знайомств”
Виконав:
Перевірив:
Херсон 2004
Ход работы программы
Модуль Proect1 содержит информацию о всех 7-ми Формах.
Форма 1 (Unit1) состоит из 6-ти кнопок и хранит процедуры их обработки:
. Кнопка Новая анкета позволяет создать новую анкету клиента,
содержащую данные о нем.
. Кнопка Просмотр анкет выводит список ранее зарегистрированных
клиентов.
. Кнопка Работа с архивом открывает таблицу, содержащую личные
данные клиентов о себе и раздел анкет по полу.
. Кнопка Просмотр архива открывает таблицу архива, содержащую личные
данные и параметры клиентов.
. Кнопка Просмотр сохраненных приглашений открывает диалоговое окно,
содержащее информацию о текущем приглашении пары (по умолчанию в
кафе “Ночной Тарзан”).
. Кнопка Выход завершает работу программы Бюро знакомств.
Форма 2 (Unit 2) создаёт новую анкету, содержащую такие поля: Дата,
Регистрационный номер (задаётся автоматически), Фамилия, Имя, Отчество,
Пол, Возраст, О себе, Требования. Так же имеются 2 кнопки: OK – сохраняет
новую, заполненную анкету, Cancel - отменяет создание новой анкеты.
Форма 3 (Unit3) – это форма, просмотра анкет, она содержит такие
заполненные поля: Рег №, Дата регистрации, Имя, Фамилия, Возраст, Пол,
данные клиента о себе и требования к партнёру. Так же есть строка поиска
по регистрационному номеру и две кнопки: Удалить – удаляет полностью
выбранную анкету, Выход – закрывает форму Просмотр анкет.
Форма 4 (Unit4) содержит таблицу, содержащую личные данные клиентов и
сортировку пар по полу. Имеются 3 кнопки: Занести в архив – занос в архив
выбранной пары, Выход – завершение работы с архивом, Подготовить
приглашение – открывает окно подготовки приглашения пары в кафе “Ночной
Тарзан” на вечер знакомства с кандидатом женского пола и кандидатом
мужского пола. Далее приглашение можно сохранить нажатием кнопки
Сохранить, либо отменить приглашение, нажатием кнопки Выйти.
Форма 5 (Unit5) состоит из строк для просмотра всех данных клиента:
регистрационный номер, дата регистрации, пол, данные о себе, требования,
возраст, ФИО. Так же имеется кнопка Выход – завершающая просмотр данной
формы.
Форма 6 (Unit 6) открывает окно подготовки приглашения пары в кафе
“Ночной Тарзан” на вечер знакомства с кандидатом женского пола и
кандидатом мужского пола. Далее приглашение для дальнейшего
редактирования можно сохранить нажатием кнопки Сохранить, что открывает
окно диалога сохранения файла и сохраняем текстовую область Mtmo1 в
указанный файл, либо отменить приглашение, нажатием кнопки Выйти.
Форма 7 (Unit7) представляет собой окно, для просмотра готовых
приглашений тех пар, которым были назначены встречи, тут же можно
отредактировать приглашение и сохранить заново. Имеются 3 кнопки:
Открытие приглашения – открытие готового приглашения, путём вывода окна
диалога, которое открывает файл. В этом окне происходит заполнение
текстовой области Memo1 из указанного файла;
Сохранить приглашение – даёт возможность сохранить новое,
отредактированное приглашение путём открытия окна диалога сохранения
файла и сохраняется текстовая область Memo1 в указанный файл;
Выход – завершение работы Unite7.
Текст программы
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2},
Unit3 in 'Unit3.pas' {Form3},
Unit4 in 'Unit4.pas' {Form4},
Unit5 in 'Unit5.pas' {Form5},
Unit6 in 'Unit6.pas' {Form6},
Unit7 in 'Unit7.pas' {Form7};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
Application.CreateForm(TForm4, Form4);
Application.CreateForm(TForm5, Form5);
Application.CreateForm(TForm6, Form6);
Application.CreateForm(TForm7, Form7);
Application.Run;
end.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button4: TButton;
Button3: TButton;
Button5: TButton;
Button6: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit2, Unit3, Unit4, Unit5, Unit7;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);//Процедура обработки клика
кнопки "Новая форма"
begin
form2.ShowModal; //показ формы Form2. Форма открывается в режиме при
котором другие формы не доступны
end;
procedure TForm1.Button2Click(Sender: TObject);//Процедура обработки клика
кнопки "Просмотр анкет"
begin
Form3.showmodal;//показ формы Form3. Форма открывается в режиме при котором
другие формы не доступны
end;
procedure TForm1.Button4Click(Sender: TObject);//Процедура обработки клика
кнопки "Выход"
begin
Close;//Закрытие формы Form1, что означает выход из программы
end;
procedure TForm1.Button3Click(Sender: TObject);//Процедура обработки клика
кнопки "Работа с архивом"
begin
form4.ShowModal;//показ формы Form4. Форма открывается в режиме при котором
другие формы не доступны
end;
procedure TForm1.Button5Click(Sender: TObject);//Процедура обработки клика
кнопки "Просмотр архива"
begin
form5.Table1.Open; //откритие таблицы Table1 находящейся на форме FORM5
form5.ShowModal; //показ формы Form5. Форма открывается в режиме при
котором другие формы не доступны
end;
procedure TForm1.Button6Click(Sender: TObject);
begin
form7.ShowModal;//показ формы Form7. Форма открывается в режиме при
котором другие формы не доступны
end;
end.
[pic]
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, DBCtrlsEh, Mask, DBCtrls, DB, DBTables, StdCtrls, Buttons;
type
TForm2 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
DBMemo1: TDBMemo;
DBMemo2: TDBMemo;
Table1: TTable;
DataSource1: TDataSource;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
DBDateTimeEditEh1: TDBDateTimeEditEh;
DBEdit5: TDBEdit;
Label6: TLabel;
Label7: TLabel;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
DBEdit6: TDBEdit;
Label8: TLabel;
procedure FormCreate(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
uses Unit3;
{$R *.dfm}
procedure TForm2.FormCreate(Sender: TObject);//При показе, активации и
создании формы Form2 выполняются действия:
begin
Table1.Open;//Открывается таблица Table1
table1.Append;//Добавляется в конец таблицы новая строка в таблицу Table1
table1.FieldByName('date').AsDateTime:=date;//Записываем в текущую строку в
поле Date сегодняшнее число
table1.Post; //Сохранение изменений
table1.edit; //Начинаем изменения в таблице Table1 в текущей сторке
end;
procedure TForm2.BitBtn1Click(Sender: TObject);//Процедура обработки клика
кнопки "ОК"
begin
table1.Post; //Сохранение изменений
close;//Закрытие формы Form2
end;
procedure TForm2.BitBtn2Click(Sender: TObject);
begin
table1.Cancel;//отмена изменений
table1.Delete;//Удаление текущей строки в таблице Table1
close;//Закрытие формы Form2
end;
procedure TForm2.FormClose(Sender: TObject; var Action:
TCloseAction);//Процедура обработки событя при закрытии формы Form2
begin
form3.Table1.Refresh;//Обновление данных в таблице Table1 находящейся на
форме Form3
end;
end.
[pic]
unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, StdCtrls, DBCtrls, Grids, DBGrids, Buttons, ExtCtrls, DB,
DBTables;
type
TForm3 = class(TForm)
DataSource1: TDataSource;
Table1: TTable;
Panel1: TPanel;
DBGrid1: TDBGrid;
DBMemo1: TDBMemo;
DBMemo2: TDBMemo;
Button1: TButton;
Button2: TButton;
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
Label3: TLabel;
procedure FormCreate(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Edit1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form3: TForm3;
implementation
{$R *.dfm}
procedure TForm3.FormCreate(Sender: TObject); //прцедура обработки события
при создании формы Form3
begin
table1.Open;//Открытие таблицы table1
end;
procedure TForm3.BitBtn1Click(Sender: TObject);//Процедура обработки клика
кнопки "Удалить"
begin
table1.Delete;//Удаление текущей строки в таблице Table1
end;
procedure TForm3.Button2Click(Sender: TObject);//Процедура обработки клика
кнопки "Выход"
begin
Close;//Закрытие Form3
end;
procedure TForm3.Edit1Change(Sender: TObject);
begin
Try //Задействование обработчика
ошибок
Table1.FindKey([strtoint(edit1.Text)]); //Поиск по индексу (ставит курсор
в таблице ближе всего находящейся к искомому значению)
except
Showmessage('Не верный параметр для поиска'); //в солучае возникновения
ошибки будет дано сообщение
end;
end;
end.
[pic]
unit Unit4;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, StdCtrls, DB, Grids, DBGrids, DBTables;
type
TForm4 = class(TForm)
Table1: TTable;
Table2: TTable;
Table3: TTable;
DBGrid1: TDBGrid;
DBGrid2: TDBGrid;
DataSource1: TDataSource;
DataSource2: TDataSource;
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form4: TForm4;
implementation
uses Unit6;
{$R *.dfm}
procedure TForm4.Button2Click(Sender: TObject);
begin
close;
end;
procedure TForm4.Button1Click(Sender: TObject);//Процедура обработки клика
кнопки "Занести в архив"
begin
//table1.Open;
//table2.Open;
table1.DisableControls;//Отмена слежения за изменениями в таблице Table1
table2.DisableControls;//Отмена слежения за изменениями в таблице Table2
table3.Open;//Открываем таблицу Table3
table3.Append;//Добавляем в конец таблицы новую строку
table3.FieldByName('reg').AsInteger:=table1.FieldByName('reg').AsInteger;//к
опируем в поле "REG" таблицы Table3 значение поля "REG" таблицы Table1
table3.FieldByName('date').Asdatetime:=table1.FieldByName('date').Asdatetime
;//копируем в поле "DATE" таблицы Table3 значение поля "DATE" таблицы
Table1
table3.FieldByName('pol').Asstring:=table1.FieldByName('pol').Asstring;//коп
ируем в поле "POL" таблицы Table3 значение поля "POL" таблицы Table1
table3.FieldByName('osebe').AsVariant:=table1.FieldByName('osebe').AsVariant
;//копируем в поле "OSEBE" таблицы Table3 значение поля "OSEBE" таблицы
Table1
table3.FieldByName('treb').AsVariant:=table1.FieldByName('treb').AsVariant;/
/копируем в поле "TREB" таблицы Table3 значение поля "TREB" таблицы Table1
table3.FieldByName('name').Asstring:=table1.FieldByName('name').Asstring;//к
опируем в поле "NAME" таблицы Table3 значение поля "NAME" таблицы Table1
table3.FieldByName('family').Asstring:=table1.FieldByName('family').Asstring
;//копируем в поле "FAMILY" таблицы Table3 значение поля "FAMILY" таблицы
Table1
table3.FieldByName('father').Asstring:=table1.FieldByName('Father').Asstring
;//копируем в поле "FATHER" таблицы Table3 значение поля "FATHER" таблицы
Table1
table3.Post;//Сохраняем изменения в таблице Table3
table3.Append;//Добавляем в конец таблицы новую строку
table3.FieldByName('reg').AsInteger:=table2.FieldByName('reg').AsInteger;//к
опируем в поле "REG" таблицы Table3 значение поля "REG" таблицы Table2
table3.FieldByName('date').Asdatetime:=table2.FieldByName('date').Asdatetime
;//копируем в поле "DATE" таблицы Table3 значение поля "DATE" таблицы
Table2
table3.FieldByName('pol').Asstring:=table2.FieldByName('pol').Asstring;//коп
ируем в поле "POL" таблицы Table3 значение поля "POL" таблицы Table2
table3.FieldByName('osebe').AsVariant:=table2.FieldByName('osebe').AsVariant
;//копируем в поле "OSEBE" таблицы Table3 значение поля "OSEBE" таблицы
Table2
table3.FieldByName('treb').AsVariant:=table2.FieldByName('treb').AsVariant;/
/копируем в поле "TREB" таблицы Table3 значение поля "TREB" таблицы Table2
table3.FieldByName('name').Asstring:=table2.FieldByName('name').Asstring;//к
опируем в поле "NAME" таблицы Table3 значение поля "NAME" таблицы Table2
table3.FieldByName('family').Asstring:=table2.FieldByName('family').Asstring
;//копируем в поле "FAMILY" таблицы Table3 значение поля "FAMILY" таблицы
Table2
table3.FieldByName('father').Asstring:=table2.FieldByName('Father').Asstring
;//копируем в поле "FATHER" таблицы Table3 значение поля "FATHER" таблицы
Table2
table3.Post;//Сохраняем изменения в таблице Table3
Button3Click(Sender);//Вызов процедуры Button3Click(см ниже)
table1.Delete;//Удаляем текущую строку из таблицы TABLE1
table2.Delete;//Удаляем текущую строку из таблицы TABLE2
table1.EnableControls;//Возобновляем контроль над таблицей TABLE1
table2.EnableControls;//Возобновляем контроль над таблицей TABLE2
table1.Refresh;//Обновляем данные в таблице Table1
table2.Refresh;//Обновляем данные в таблице Table1
end;
procedure TForm4.FormShow(Sender: TObject); //При показе формы Form4
выполняются действия:
begin
table1.Open;//открытие таблицы Table1
table2.Open;//открытие таблицы Table2
end;
procedure TForm4.FormClose(Sender: TObject; var Action: TCloseAction);//При
закрытии формы Form4 выполняются действия:
begin
table1.Close;//Закрытие таблицы Table1
table2.Close;//Закрытие таблицы Table2
end;
procedure TForm4.Button3Click(Sender: TObject);//Процедура обработки клика
кнопки "Подготовить приглашение"
var ff:textfile;//Объявление типа файловой переменной
begin
assignfile(ff,'c:Prigl.txt'); //процедура ассоциации имени файла с
файловой переменной FF
rewrite(ff);//Перезапись файла
Writeln(ff,'Приглашение в кафе "Ночной Тарзан"');//Добавляем строку в файл
Writeln(ff,'На вечер знакомства с '+table1.fieldbyname('Family').asstring+'
'+table1.fieldbyname('Name').asstring);//Добавляем строку в файл со
значениями некоторых полей из таблиц Table1 и Table2
Writeln(ff,' и '+table2.fieldbyname('Family').asstring+'
'+table2.fieldbyname('Name').asstring);
closefile(ff);//Закрытие файла
form6.Memo1.Lines.LoadFromFile('c:Prigl.txt');//Заполняем текстовое поле
Memo1 в окне формы 6 содержимым только что сохранненого файла
form6.ShowModal;//показ формы Form6. Форма открывается в режиме при котором
другие формы не доступны
end;
end.
[pic]
unit Unit5;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, StdCtrls, Buttons, DBCtrls, ExtCtrls, DB, DBTables, Grids,
DBGrids;
type
TForm5 = class(TForm)
DataSource1: TDataSource;
DBGrid1: TDBGrid;
Table1: TTable;
Panel1: TPanel;
DBMemo1: TDBMemo;
DBMemo2: TDBMemo;
BitBtn1: TBitBtn;
Label1: TLabel;
Label2: TLabel;
procedure BitBtn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form5: TForm5;
implementation
{$R *.dfm}
procedure TForm5.BitBtn1Click(Sender: TObject);
begin
close;//закрытие формы Form5
end;
end.
[pic]
unit Unit6;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, StdCtrls, ExtCtrls;
type
TForm6 = class(TForm)
Memo1: TMemo;
Panel1: TPanel;
Button1: TButton;
Button2: TButton;
SaveDialog1: TSaveDialog;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form6: TForm6;
implementation
{$R *.dfm}
procedure TForm6.Button1Click(Sender: TObject);
begin
if SaveDialog1.Execute then
memo1.Lines.SaveToFile(SaveDialog1.FileName);//Открываем окно диалога
сохранения файла и сохраняем текстовую область Memo1 в указанный файл
end;
procedure TForm6.Button2Click(Sender: TObject);
begin
Close;//Закрытие формы
end;
end.
[pic]
unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, StdCtrls, ExtCtrls;
type
TForm7 = class(TForm)
OpenDialog1: TOpenDialog;
SaveDialog1: TSaveDialog;
Panel1: TPanel;
Memo1: TMemo;
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button3Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form7: TForm7;
implementation
{$R *.dfm}
procedure TForm7.Button3Click(Sender: TObject);
begin
Close;//Закрытие формы Form7
end;
procedure TForm7.Button1Click(Sender: TObject);
begin
If OpenDialog1.Execute then
memo1.Lines.LoadFromFile(OpenDialog1.FileName);//Открываем окно диалога
открытия файла и заполняем текстовую область Memo1 из указанного файла
end;
procedure TForm7.Button2Click(Sender: TObject);
begin
If SaveDialog1.Execute then
memo1.Lines.SaveToFile(SaveDialog1.FileName);//Открываем окно диалога
сохранения файла и сохраняем текстовую область Memo1 в указанный файл
end;
end.
[pic]
Целью моей курсовой работы является программирование базы
даных с помощью Delphi 7. Прежде чем начать выполнять свое
задание рассмотрим эту систему программирования, в общем.
Delphi - это греческий город, где жил дельфийский оракул. И этим именем
был назван новый программный продукт с феноменальными характеристиками.
Delphi - это комбинация нескольких важнейших технологий:
. Высокопроизводительный компилятор в машинный код
. Объектно-ориентированная модель компонент
. Визуальное (а, следовательно, и скоростное) построение приложений
из программных прототипов
. Масштабируемые средства для построения баз данных
Компилятор, встроенный в Delphi, обеспечивает высокую
производительность, необходимую для построения приложений в архитектуре
“клиент-сервер”. Этот компилятор в настоящее время является самым быстрым
в мире, его скорость компиляции составляет свыше 120 тысяч строк в минуту
на компьютере 486DX33. Он предлагает легкость разработки и быстрое время
проверки готового программного блока, характерного для языков четвертого
поколения (4GL) и в то же время обеспечивает качество кода, характерного
для компилятора 3GL.
В процессе построения приложения разработчик выбирает из палитры
компонент готовые компоненты как художник, делающий крупные мазки кистью.
Еще до компиляции он видит результаты своей работы - после подключения к
источнику данных их можно видеть отображенными на форме, можно перемещаться
по данным, представлять их в том или ином виде.
Cреда Delphi включает в себя полный набор визуальных инструментов для
скоростной разработки приложений (RAD - rapid application development),
поддерживающей разработку пользовательского интерфейса и подключение к
корпоративным базам данных.
В Delphi визуальные компоненты пишутся на объектном паскале, на том же
паскале, на котором пишется алгоритмическая часть приложения. И визуальные
компоненты Delphi получаются открытыми для надстройки и переписывания.
Delphi использует структурный объектно-ориентированный язык (Object
Pascal), который сочетает с одной стороны выразительную мощь и простоту
программирования, характерную для языков 4GL, а с другой стороны
эффективность языка 3GL.
Структура базы данных
База данных — это набор однородной, как правило, упорядоченной по
некоторому критерию, информации. База данных может быть представлена в
"бумажном" или в компьютерном виде.
Типичным примером "бумажной" базы данных является каталог библиотеки —
набор бумажных карточек, содержащих информацию о книгах. Информация в этой
базе однородная (содержит сведения только о книгах) и упорядоченная
(карточки расставлены, например, в соответствии с алфавитным порядком
фамилий авторов). Другими примерами "бумажной" базы данных являются
телефонный справочник и расписание движения поездов.
Компьютерная база данных представляет собой файл (или набор связанных
файлов), содержащий информацию.
База данных состоит из записей. Каждая запись содержит информацию об
одном экземпляре. Записи состоят из полей. Каждое поле содержит информацию
об одной характеристике экземпляра. Например, запись базы данных “Бюро
знакомств” состоит из следующих полей: "Регистрационный номер", "Дата
регистрации", "ФИО", "Возраст", "Пол". Содержимое этих полей характеризует
личность клиентов Бюро знакомств.
Следует обратить внимание, что каждая запись состоит из одинаковых
полей. Некоторые поля могут быть не заполнены, однако они все равно
присутствуют в записи.
На бумаге базу данных удобно представить в виде таблицы. Каждая строка
таблицы соответствует записи, а ячейка таблицы — полю. При этом заголовок
столбца таблицы — это имя поля, а номер строки таблицы — номер записи.
Информацию компьютерных баз данных обычно выводят на экран в виде
таблиц. Поэтому в литературе довольно часто вместо словосочетания "файл
данных" используется словосочетание "таблица данных" или просто "таблица".
Программа управления базой данных
Перед тем как приступить непосредственно к разработке приложения
управления базой данных, необходимо, используя утилиту Database Desktop,
создать файл данных (таблицу) и добавить в нее несколько записей.
Приложение работы с базой данных должно содержать компоненты,
обеспечивающие доступ к данным, возможность просмотра и редактирования
содержимого полей. Компоненты доступа к данным находятся на вкладке Data
Access палитры компонентов, а компоненты отображения данных — на вкладке
Data Controls.
Создание базы данных
Приложения баз данных могут получать доступ к источникам данных при
помощи разнообразных технологий
доступа, многие из которых используются и в приложениях Delphi. Тем не
менее любое приложение баз данных в
Delphi имеет стандартное ядро, структура которого определена
архитектурой приложения баз данных.
Набор базовых компонентов и способов разработки является единой
основой, на которой базируются технологии
доступа к данным. Это позволило унифицировать процесс разработки
приложений баз данных.
В основе процесса разработки лежит триада компонентов:
- невизуальные компоненты набора данных;
- невизуальные компоненты TDataSource;
- визуальные компоненты отображения данных.
Для создания таблицы автономной базы имеется приложение
Database Desktop, которое вызывается командой Tools/Database Desktop.
Оно имеет собственное окно, меню и кнопки (заставка этого пункта). Новая
таблица создается построителем таблиц, который вызывается командой
File/New/ТаЫе. На запрос тип СУБД выберем Рагаdох 7.
Рассмотрим основные колонки и поля окна конструктора таблиц.
File Name - идентификаторы полей (не более латинских букв и цифр для
совместимости с другими СУБД).
Туре - тип поля (указывается выбором из контекстного меню): А1рhа (А -
строка из не более чем 255, символов), Number (N - число с плавающей
точкой), Моnеу ($ - аналогичен типу NumЬег, но добавляется денежный
знак), Short (S - целое число в диапазоне -32768..32767), LongIntereger (I
целое число в диапазоне-2147483.. 2147483647), ВСD (# - число в двоично-
десятичном формате), Datе (D - дата). Time (Т - время), Timestamp (@ - дата
и время), Меmо (М - строка любой длины), Formatted Memo (F - аналогичен
Меmо, но может содержать форматированный текст), Graphic (G -изображение
ВМР, РСХ, ТIF, СИР, ЕРS), ОLЕ (О - объект ОLЕ), Logical (L логическое - Т,
F), Autoincrement (+ - при добавлении записи, автоматически формируется
уникальное значение), Вinary (В – последовательность байтов любой длины),
Вуtes (У последовательность не более, чем 255 байтов).
Size- размер поля в байтах.
Кеу - признак первичного ключевого поля (двойной щелчок по колонке).
Таbles properties - дополнительные свойства таблицы: Secondary Index
(задание вторичных индексов), Validity Checks (ограничения на ввод значений
полей). Рassword Security (определение пароля), Referential Intergity
(определение ссылочной целостности между таблицами), ТаЫе Language(задание
языка), ТаЫе Lоокор (задание полей просмотра), Depending ТаЫеs(зависимые
дочерние таблицы).
Requierd Filed - признак обязательного заполнения поля.
Мiniтит..., Махiпит... - начало и конец диапазона допустимых значений.
Default vа1ие - значение по умолчанию при добавлении пустой записи.
Р1сture,Assist - шаблон и построитель шаблона значения поля.
Вторичные ключи (индексы) создаются путем выбора из списка свойств
таблицы строки Secondary Indexes, и после нажатия кнопки Define выводится
окно Define Secondary Indexes. Используя кнопки со стрелками или двойными
щелчками, перенесем нужное поле или несколько полей, если ключ составной, в
список индексов. Имеются переключатели: Unique (уникальный индекс), Саse
sensitive (учет регистров строковых полей), Descending (сортировка по
возрастанию). Кнопкой ОК. производится выход с указанием имени индекса.
Поле, которое является первичным ключом другой родительской таблицы,
называют внешним ключом. Для связи таблиц обычно создают индексы по внешним
ключам. После формирования таблицы она сохраняется, если нажать кнопку Save
As, под указанным именем; при этом в поле имени файла можно указать как
полное имя с каталогами, так и псевдоним базы (Аlias). Псевдоним позволяет
не привязываться к каталогу, который может меняться в дальнейшем.
Для создания псевдонима выполним команду Тоо1s/Аlias Мапаger, и
появится окно Аlias Маnаgег.
Нажмем кнопку New и в поле Database alias введем имя
псевдонима Учет, кнопкой Вrowse выберем наш каталог с базой Люди, далее
Кеер New и ОК.
Командой File/Working Directory установим текущий каталог, выбрав
псевдоним Курсовая в списке Alias, займемся созданием таблиц.
[pic]
Таблица Люди, будет иметь столбцы: Люди, Регистрационный номер, Дата
регистрасии, Пол, О себе, Требования, Возраст, ФИО.
Вторая таблица – Архив будет иметьаналогичные названия столбцов.
[pic]
Для корректировки и просмотра открытой таблицы имеются команды
ТаЫе/Restructure (кнопка Restructure) и ТаЫе/Into Structure. Для
переименования таблицы следует сохранить ее под новым именем. Для
заполнения и редактирования таблицы, после ее связывания с другими
таблицами, испочьзуется кнопка Edit Data и меню Record приложения
Database Deskot (кириллицу при вводе использовать нельзя).
Сведения о бюро знакомств
С судьбой можно встретиться еще в школе. Или в институте. Можно
выйти замуж за кучерявого брюнета из соседнего дома или познакомиться с
будущей женой в очереди за жетончиками метро. Вариантов масса. Но даже если
все варианты испробованы, а своего единственного вы еще не встретили,
остается еще один вариант - знакомство через Бюро знакомств.
Бытует мнение, что в службу знакомств обращаются в основном
несчастные, никому ненужные люди. Конечно, можно еще подумать, а можно
отнестись к проблеме более целеустремленно. На самом деле это люди с
активной жизненной позицией, которые смогли побороть в себе какие-то
комплексы и решили попробовать цивилизованный способ знакомства.
Бюро знакомств уже не первый год успешно работает на рынке брачных
услуг, имеет очень много положительных результатов, и у каждого есть свой
шанс найти спутника жизни.
Названию "брачное агентство" лучше предпочесть более нейтральное -
"служба знакомств". Это позволит избегать трудновыполнимых обещаний,
поскольку каких-либо гарантий в деле устройства чьей-то судьбы просто не
существует.
Брачный бизнес - это коммерческая, то есть платная, подразумевающая
получение дохода, деятельность, связанная с предоставлением услуг в сфере
брачных знакомств. Организациями, занимающимися данным видом деятельности и
предоставляющими услуги в этом виде бизнеса, являются брачные агентства и
службы знакомств. Кроме организаций, в брачном бизнесе активно работают и
индивидуальные брачные дилеры, в прошлом - брачные свахи.
Применение программы на практике
С давних времен люди искали себе спутников жизни на протяжении долгого
времени. Постепенно стали появляться фирмы, помогающие людям найти себе
партнера, так называемые “службы знакомств”.
Люди приходили в эти службы, заполняли анкеты, оставляя данные о себе,
оставляли так же и требования к человеку, которого хотели бы найти.
Так же приходили в бюро знакомств люди, которые хотели не только
зарегистрироваться, но и поискать спутника или спутницу в уже существующей
базе. В этих службах велась огромная документация, хранившая адреса,
фотографии, номера телефонов, личные данные своих клиентов. Следовательно,
чтобы найти кого-то, нужно было пересмотреть и отсортировать сотни, а то и
тысячи бумаг.
Моя задача – облегчить поиск и подбор желающих познакомиться с новыми
людьми через бюро знакомств.
Программа, написанная мной, может хранить данные о личности, такие как
ФИО, возраст, пол, дату регистрации, описания внешности и других
характеристик клиента, а так же требования, удовлетворяющие желание клиента
в поиске избранницы либо избранника. Реализован поиск по регистрационному
номеру, что удобно как для работника бюро знакомств (для сортировки анкет),
так и для клиентов. Клиент может зарегистрироваться, оставив анкету в бюро
знакомств, и автоматически получить регистрационный номер, что поможет при
объявлении в той же газете. Введя определённый регистрационный номер,
компьютер автоматически выводит все данные о человеке.
| |
