Информационная система 'Азиатские государства'
Министерство
образования и науки Республики Казахстан
Костанайский
социально-технический университет
Имени
академика Зулхарнай Алдамжар
Технический
факультет
Кафедра
«Инновационных технологий»
Специальность
050704 «Вычислительная техника и программное обеспечение»
ДИПЛОМНЫЙ
ПРОЕКТ
Информационная
система «Азиатские государства»
Дипломник: Баранов
Дмитрий Александрович
Руководитель
дипломного проекта: Сухов Михаил Васильевич
Костанай,
2009
Аннотация
Разработанная программа решает вопросы, связанные,
как с нахождением необходимой информации о государствах Азии, так и о самой
территории Азии в целом. Данная программа предоставляет информацию о
происхождении названия территории Азии, описывает населении во многих аспектах,
описывает основные сведения территории, такие как: самая южная точка, северная
точка, площадь и т.д. Так же предоставляет карты Азии и государств,
политическая, физическая и карта из космоса. Имеется возможность просмотра
посольств Казахстана в государствах Азии. Всю предоставленную информацию можно
сохранить и распечатать.
Аннотация
Өңделген
бағдарлама
сұрақтар
шешеді,
байлаулылар,
қалай
қажетті
хабар
табуымен
Азия
мемлекеттері
туралы,
дәл
осылай
және
туралы
Азия
аумақтары
бітінде.
Азия
аумақтары тап осы бағдарлама ат тегісі туралы хабарды пайдалануына
береді, халықта бейнелеп тісіндіреді көптегендерді аспектілерде,
аумақтыс негізгі мәлімдеулері бейнелеп төсіндіреді,
сондайлардың қалай: ең оңтүстік орын, солтүстік
орын, аудан және т.б. Осылай ғой Азия карталары пайдалануына береді
және мемлекеттердің, саяси, физикалық және ғарыштан
карта. Азия мемлекеттерінде Қазақстан елшіліктерінің қарау
мүмкіншілігі болады. Бәрін пайдалануға берілген хабарды сақтау
және желімделген нәрсені ашуға болады .
Abstract
developed program addresses issues
associated with finding relevant information about Asia, and the most territory
of Asia as a whole. This program provides information on the origin of the name
of Asia, describes the population in many aspects, describes the basic
information area, such as: the most southern point, north point, area and so
on. Also provides maps of Asia and the States, political, and physical map of
the cosmos. You can view the Embassy of Kazakhstan in Asia. All the information
you can save and print.
Содержание
Введение
.
Теоретические аспекты применения программы
.1
Сферы применения
.2
Необходимость применения
.3
Обоснование применения среды программирования
1.3.1
Delphi
.3.2
C++Builder
.3.3
Сравнение
Delphi и
C++Builder
2.
Описание программы
.1
Схема взаимодействия родительской и дочерних форм
.2
Используемые компоненты в программе
.2.1
Компоненты отображения данных
.2.2
Компоненты ввода данных
.2.3
Компоненты доступа к базам данных
.3
Интерфейс программы
.3.1
Интерфейс главной - родительской формы
.3.2
Интерфейс дочерних форм
.4
Музыкальное сопровождение в программе
.5
Справки программы
.
Охрана труда
.1
Требования к производственным помещениям
.2
Освещение
.3
Шум и вибрация
.4
Эргономические требования к рабочему месту
.5
Режим труда
Заключение
Список
используемой литературы
Приложение
Введение
информационная система азия
интерфейс
В последнее время работы туристических агентств,
стало необходимостью использования множества достоверной и полной информации
для привлечения туристов, организации поездок, описания государств,
предоставления сведений о посольстве Казахстана в государствах Азии.
Осуществление предоставления вышеуказанной информации является, и являлось
одним из плюсов, при работе сотрудников фирмы с клиентами, которые желают
отправиться в путешествие либо по необходимым делам в Азиатские государства.
Организация необходимой информации в одном
(едином) программном продукте является одной из главных факторов информирования
клиентов и сотрудников фирмы, так как представление данных в единой программе
является ключевым фактором полноты информирования клиентов и сотрудников.
Разработка информационной системы является главным составляющим туристического
агентства и повысит эффективность деятельности фирмы за счет предоставления
полной и необходимой информации сотрудникам.
Целью данного дипломного проекта является
разработка информационной системы, которая бы смогла предоставить достоверную
информацию о государствах Азии, посольстве Казахстана в Азиатских государствах,
курортах, истории Азии, предоставить географические карты, как Азиатских
государств, так и территории Азии в целом [20][21], а так же позволит
распечатать и сохранить необходимую информацию.
Для достижения цели ставилась задача поиска
информации, осуществление графической привлекательности, а так же разработать
информационную систему, выполняющая следующие задачи:
сохранить представленную информацию
распечатать представленную информацию
отобразить необходимую пользователю информацию о
государствах
или о территории Азии
просмотреть отдельные справки «О программе»,
«Автор», «Справка
Азиатские государства»
Программа написана на С++Builder, ключевой
особенностью, которой, является использование технологии Drag-and-Drop,
позволяющая программисту формировать код будущего интерфейса, двигая по экрану
монитора указанные “мышью” стандартные объекты. C++Builder существенно снижает
трудозатраты программиста на написание интерфейса и систем управления базами
данных так как он имеет несложную систему программирования и является
визуальной средой программирования.
Достижения цели возможно при помощи минимальных
системных требований компьютера:
- персональный компьютер на базе микропроцессора
фирмы Intel PentiumPro с частотой 166 MHz ;
видеокарта SVGA;
операционная система Windows XP.
ОЗУ 256
Программу, для корректной работы, необходимо
скопировать на
диск С.
Проект состоит из введения, трех глав,
заключения, списка использованной литературы, приложения. В процессе разработки
программы использовались материалы: книги по компьютерным технологиям [23]-[36],
электронные учебники [1]-[14]. Интернет ресурсы [15]-[20], географические карты
стран [21],[22],[37].
В первой главе «Теоретические аспекты применения
программы» рассмотрены аспекты применения программы (сферы применения,
необходимость применения), обоснование выбора среды программирования (описание
двух сред программирования Delphi и C++Builder, а так же подробное их
сравнение), во второй главе представлено описание программы (интерфейс
программы с пояснением произведенных действий, сопровождающая композиция с
описанием структуры действий работы, используемые компоненты в программе, с
пояснениями для чего используются, а так же схема взаимодействия родительской и
дочерних форм), в третьей главе рассмотрена охрана труда [14] (технические
требования к рабочему месту программиста с использованием компьютерной техники,
эргономические требования к рабочему месту с описанием размещений компьютерной
техники на столе программиста, предельные уровни звука на рабочих местах, общие
требования к рабочему месту и режим труда) в заключении даны основные выводы по
проектированию и разработке информационной системы «Азиатские государства».
1.Теоретические аспекты применения программы
Данный раздел описывает сферы применения, такие
как: применение в педагогике, туристической деятельности, таможенной системе, а
так же маркетинге. Описывает необходимость применения программы, как в
повседневной жизни, так и в отдельных случаях.
.1 Сферы применения
Перед многими людьми, работающих в разнообразных
сферах деятельности встает вопрос о целесообразном использовании достоверной
информации и зачастую, человек не подозревает, что данные из многих источников
могут быть не достоверными. Разработанная программа имеет достоверные данные (о
странах, курортах, посольствах, населении и истории), проверенные в нескольких
источниках [19, 20]. Сфера применения разработанной программы имеет широкий
круг:
Педагогика - предполагается использование
преподавателем, информацией предоставленной программой (для обучения
ученического состава). В общей системе наук, в общей системе «вещей и знаний»
педагогика выступает как единственная наука, имеющая своим предметом воспитание
человека.
Развиваясь, всякая наука обогащает свою теорию,
наполняется новым содержанием и осуществляет дифференциацию своих исследований.
Этот процесс коснулся и педагогики. В настоящее время понятием «педагогика»
обозначается целая система педагогических наук.
Педагогика как наука подразделяется на ряд
самостоятельных педагогических дисциплин:
Общая педагогика, исследует основные
закономерности воспитания человека, раскрывает сущность, цели, задачи и
закономерности воспитания, его роль в жизни общества и развития личности,
процесс образования и обучения
Возрастная педагогика, изучающая особенности
воспитания людей, на различных этапах возрастного развития
специальная педагогика, изучающая особенности
развития, обучения и воспитания аномальных детей, которая в свою очередь
распадается на ряд отраслей.
Частная методика, исследующая специфику
применения общих закономерностей обучения к преподавателю определенного
предмета
История педагогики, изучающая развитие
педагогический идей и практики воспитания в различные исторические эпохи.
Интенсивно развиваются самостоятельные, такие
отрасли, как педагогика профтехобразования, исправительно-трудовая и др.
Складываются такие части педагогики, как школоведение, педагогика культурно
просветительной работы, педагогика юношеских организаций[20].
В этих и многих других отраслях педагогике
возможно использование разрабатываемой программы.
Туристическая деятельность. Туристические фирмы,
базирующиеся на организации туристических поездок в страны Азии. Может
использоваться в качестве информационной справочной информации о государствах
Азии, о посольствах, курортах (бальнеологические, горноклиматические, пляжные,
SPA курорты), а так же могут использоваться географические (политических,
физических) карты.
Туризм и путешествия являются неотъемлемой
частью индустрии гостеприимства. Путешествия - главная тема туризма. Различия
во времени, расстояниях, местах проживания, целях и продолжительности
пребывания - все это лишь отличительные элементы туризма. В целом, туризм
является многоцелевым феноменом, который одновременно сочетает в себе элементы
приключений, романтику дальних странствий, определенную тайну, посещение
экзотических мест и, одновременно, земные заботы предпринимательства, вопросы
здоровья, личной безопасности и сохранности имущества.
Туризм играет одну из главных ролей в мировой
экономике, обеспечивая десятую часть мирового валового национального продукта.
Эта отрасль экономики развивается быстрыми темпами и в ближайшие годы станет
наиболее важным ее сектором. Ежегодный рост инвестиций в индустрию туризма
составит около30%.
В последние годы туризм стал одним из самых
прибыльных видов бизнеса в мире. Он использует примерно 7% мирового капитала. В
начале 90-х годов доля туризма уже составляла 10% мировой торговли товарами и
услугами, что позволило ему занять третье место после экспорта нефти и
автомобилей, а к 2005 г. туризм вышел на первое место.
Международный туризм оказывает мощное
воздействие на занятость населения. В туризме большое значение отводится
мероприятиям по продвижению продукта к потребителю. Продвижение продукта может
осуществляться в следующих направлениях: рекламная компания, стимулирование
сбыта (продаж), персональные продажи, связи с общественностью.
Реклама в сфере туризма более актуальна, чем в
каких-либо других отраслях. Это обстоятельство связано с индивидуальными
свойствами туристических услуг. Туристские державы расходуют многомилионные
суммы на проведение рекламных кампаний. При этом на каждый затраченный доллар
получают, по меньшей мере, 200-300 долларов прибыли. Под стимулированием сбыта
в туризме понимают краткосрочные поощрительные меры, способствующие продаже.
Стимулирование проводится в трех направлениях:
а) стимулирование сотрудников туристической
фирмы. Оно направлено на повышение качества обслуживания, рост
профессионального мастерства и совершенствования работы
б) стимулирование торговых посредников. Эти
работы ориентированы на сотрудников фирм-партнеров в целях поощрения их работы
и, соответственно, увеличения сбыта туров основного предприятия
в) стимулирование клиентов. Многие фирмы
практикуют скидки с объявленных цен (сезонные скидки, скидки отдельным категориям
покупателей, групповые скидки, скидки постоянным клиентам). В качестве подарков
и сувениров применяют различные канцтовары, фирменные майки, печатную
продукцию. Туристам приятно в день рождения во время путешествия получить от
фирмы цветы, фрукты, сладости. При покупке тура специфическое вознаграждение
представляют зачетные талоны на приобретение других товаров. Например, скидка
на покупку мебели, спортивного снаряжения, автомашины, яхты и других
дорогостоящих товаров. Купоны дают право владельцу на скидку при покупке тура.
Многие туристические фирмы сотрудничают с банками путем предоставления купонов
их клиентам, поскольку последних в силу наличия денежных средств, можно считать
потенциальными покупателями туров. При размещении вкладов в том или ином банке
клиенту выдается книжка купонов на приобретение различных товаров и услуг.
Поэтому в этом и других случаях целесообразно поощрение клиентов и сотрудников
программой, которая бы помогала в обеспечении разнообразной информацией,
непосредственно связанной с государствами Азии (курорты, посольства, история
территории, географические карты, общие сведения государств Азии)
Таможенная система и охрана окружающей среды -
предполагается использования для целей, направленных на охрану приграничных
территорий, использую карты государств.
Охрана окружающей природной среды - новая форма
во взаимодействии человека и природы, рожденная в современных условиях, она
представляет собой систему государственных и общественных мер (технологических,
экономических, административно-правовых, просветительных, международных),
направленных на гармоничное взаимодействие общества и природы, сохранение и
воспроизводство действующих экологических сообществ и природных ресурсов во имя
живущих и будущих поколений. Поэтому собрание географических карт, возможно,
позволит уполномоченным органам быстрее реагировать на непредвиденные
обстоятельства.
Маркетинг - предполагает использование программы
в целях обеспечение необходимой информацией сотрудников фирмы.
Маркетинг - использование, предоставляемых
данных для организации разнообразной рекламы (например, рекламы посещения
определенной страны, в качестве отдыха). Концепция маркетинга предполагает, что
достижение компанией своих целей зависит от определения нужд и запросов целевых
рынков, а также от более эффективного по сравнению с конкурентами
удовлетворения потребителей. Суть концепции социально-этичного маркетинга можно
выразить следующим образом: сначала компания выявляет нужды, потребности и
интересы целевых рынков, а затем обеспечивает клиентам высшую потребительскую
ценность способами, которые поддерживают или даже улучшают благополучие
клиентов и общества. Эта концепция самая передовая. Каждая компания должна
найти свой стиль работы, наилучшим образом учитывающий специфику условий, возможностей,
целей и ресурсов. Всем компаниям необходимо думать о будущем и разрабатывать
долговременные стратегии, которые позволили бы оперативно реагировать на
меняющиеся условия рынка. Маркетинг играет важную роль в стратегическом
планировании. Он предоставляет необходимую информацию для разработки
стратегического плана. Стратегическое планирование, в свою очередь, определяет
роль маркетинга в организации. На этапе стратегического планирования компания
решает, какие действия ей предпринять по отношению к каждой бизнес-единице.
Маркетинговое планирование включает определение маркетинговых стратегий,
которые помогут компании в достижении ее общих стратегических целей. На этапе
реализации стратегические планы претворяются в жизнь, в результате чего
достигаются цели компании. Реализуют маркетинговые планы сотрудники
организации, работающие с другими людьми как внутри компании, так и за ее
пределами.
Поэтому, целесообразно использовать программу в
маркетинговой деятельности, в целях обеспечения сотрудников информацией о
государствах Азии.
Сфера применения программы разнообразна (широка)
и не останавливается на использовании только в одной сфере деятельности, так
как данные, используемые в программе не однотипны. Программа может быть
использована в познавательных целях.
.2 Необходимость применения
Данная программа предполагает использования
данных в своих законных, каких-либо действиях, не противоречащих законам
Республики Казахстан и направленных на организацию базовых знаний о
государствах Азии. Для применения данных, программа легка в обращении и может
распечатать, при возможности и желании, выбранную информацию, а так же
сохранить на внешний носитель информации (диск, флешь накопитель и др.).
Необходимость в применении данной программы возникает при отсутствии данных
(сведений) о каком-нибудь государстве либо о территории Азия в целом.
Целесообразность программы заключается в использовании информации только в
определенно правильных действиях.
Программа необходима для использования в целях
самопознания (изучения географических характеристик, тренировка памяти, т.е.
изучение местоположения, как городов, так и государств, пополнение знанию об
истории Азии.).
Использование данной программы позволит
пользователям сократить время на поиск необходимой информации для обеспечения
полноценной и достоверной информацией о государствах и о территории Азия в
целом. Необходимость применения программы зависит полностью от пользователя,
позволяющего использовать программу по назначению. Программа полностью
отображает суть географического отображения государств, находящихся на
территории Азии.
.3 Обоснование применения среды разработки
Так как стоял вопрос о выборе среды
программирования между Delphi и C++Builder, то данный раздел описывает
обоснование выбора между двумя языками и их сравнение.
.3.1Delphi- это комбинация нескольких важнейших
технологий:
Высокопроизводительный компилятор в машинный
код;
Объектно-ориентированная модель компонент;
Визуальное построение приложений из программных
прототипов;
Масштабируемые средства для построения баз
данных.
Компилятор в машинный код
Компилятор, встроенный в Delphi, обеспечивает
высокую производительность, необходимую для построения приложений в архитектуре
“клиент-сервер”. Этот компилятор быстрый, его скорость компиляции составляет
свыше 120 тысяч строк в минуту на компьютере 486DX33. Он предлагает легкость
разработки и короткое время проверки готового программного блока, характерного
для языков четвертого поколения (4GL) и в то же время обеспечивает качество
кодировки, характерное для компилятора 3GL. Кроме того, Delphi обеспечивает
быструю разработку без необходимости писать вставки на Си или ручного написания
кода.
В процессе построения приложения, разработчик
выбирает из палитры компонент готовые компоненты, как художник, делающий
крупные мазки кистью. Еще до компиляции он видит результаты своей работы -
после подключения к источнику данных их можно вывести на форму, можно
перемещаться по данным, представлять их в том или ином виде. В этом смысле
проектирование в Delphi мало, чем отличается от проектирования в
интерпретирующей среде, однако после выполнения компиляции мы получаем код,
который исполняется в 10-20 раз быстрее, чем тоже самое задание, сделанное при
помощи интерпретатора. Кроме того, компилятор компилятору рознь, в Delphi
компиляция производится непосредственно в родной машинный код, в то время как
существуют компиляторы, превращающие программу в так называемый p-код, который
затем интерпретируется виртуальной p-машиной. Это не может не сказаться на
практическом быстродействии готового приложения.
Объектно-ориентированная модель программных
компонент
Основной упор этой модели в Delphi делается на
максимальном реиспользовании кода. Это позволяет разработчикам строить
приложения из заранее подготовленных объектов очень быстро, а также дает им
возможность создавать свои собственные объекты для среды Delphi. Никаких
ограничений по типам объектов, которые могут быть созданы, не существует.
Действительно, все в Delphi написано на нем же, поэтому разработчики имеют
доступ к тем же объектам и инструментам, которые использовались для создания
среды разработки. В результате нет никакой разницы между объектами,
поставляемыми Borland или третьими фирмами, и объектами, которые можно создать.
В стандартную поставку Delphi входят основные
объекты, которые образуют удачно подобранную иерархию из 270 базовых классов.
Но если возникнет необходимость в решении какой-то специфической проблемы на
Delphi, прежде чем попытаться начинать решать проблему “с нуля”, то необходимо
просмотреть список свободно распространяемых или коммерческих компонент,
разработанных третьими фирмами. Количество этих фирм в настоящее время
превышает число 250.
Быстрая разработка работающего приложения из
прототипов
Игровая программа Rendzu была собрана из готовых
кусков за рабочий день, причем большая часть времени была посвящена
прихорашиванию и приукрашиванию [26]. Saver в виде прыгающих часиков был также
изготовлен на Delphi за весьма незначительное время. Конечно, на разработку
серьезной информационно-поисковой системы в архитектуре клиент-сервер может
уйти гораздо большее время, чем на разработку программы-игрушки. Среда Delphi
включает в себя полный набор визуальных инструментов для скоростной разработки
приложений (RAD - rapid application development), поддерживающей разработку
пользовательского интерфейса и подключение к корпоративным базам данных. -
библиотека визуальных компонент, включает в себя стандартные объекты построения
пользовательского интерфейса, объекты управления данными, графические объекты, объекты
мультимедиа, диалоги и объекты управления файлами, управление DDE и OLE.
Единственное, что можно поставить в вину Delphi, это то, что готовых компонент,
поставляемых Borland, могло бы быть и больше. Однако, разработки других фирм, а
также свободно распространяемые программистами freeware-компоненты уже
восполнили этот недостаток.
Масштабируемые средства для построения баз
данных
Объекты БД в Delphi основаны на SQL и включают в
себя полную мощь Borland Database Engine. В состав Delphi также включен Borland
SQL Link, поэтому доступ к СУБД Oracle, Sybase, Informix и InterBase происходит
с высокой эффективностью. Кроме того, Delphi включает в себя локальный сервер
Interbase для того, чтобы можно было разработать расширяемые на любые внешние
SQL-сервера приложения в офлайновом режиме. Разработчик в среде Delphi,
проектирующий информационную систему для локальной машины (к примеру, небольшую
систему учета медицинских карточек для одного компьютера), может хранить
информацию в файлах формата .dbf (как в dBase или Clipper) или .db (Paradox).
Если же он будет использовать локальный InterBase for Windows 4.0 (это
локальный SQL-сервер, входящий в поставку), то его приложение безо всяких
изменений будет работать и в составе большой системы с архитектурой клиент-сервер.
В первую очередь, Delphi предназначен для
профессионалов-разработчиков корпоративных информационных систем. Не секрет,
что некоторые удачные продукты, предназначенные для скоростной разработки
приложений (RAD - rapid application development) прекрасно работают при
изготовлении достаточно простых приложений, однако, разработчик сталкивается с
непредвиденными сложностями, когда пытается сделать что-то действительно
сложное. Бывает, что в продукте вскрываются присущие ему ограничения только по
прошествии некоторого времени.
Руководители предприятий, планирующие выделение
средств на приобретение программных продуктов, должны быть уверены в том, что
инвестиции окупятся. Поэтому одним из оцениваемых факторов должен быть вопрос -
а легко ли найти специалиста по Delphi и сколько будет стоить его обучение,
сколько времени он затратит на овладение продуктом[27].
Некоторые особенности Delphi
Локальный сервер InterBase
Следует заметить, что этот инструмент
предназначен только для автономной отладки приложений. В действительности он
представляет из себя сокращенный вариант обработчика SQL-запросов InterBase, в
который не включены некоторые возможности настоящего сервера InterBase.
Отсутствие этих возможностей с лихвой компенсируется преимуществом автономной отладки
программ. Development Support
Средство поддержки разработки проекта в группе.
Позволяет существенно облегчить управление крупными проектами. Это сделано в
виде возможности подключения такого продукта как Intersolve PVCS
непосредственно к среде Delphi.
Открытая компонентная архитектура
Благодаря такой архитектуре приложения,
изготовленные при помощи Delphi, работают надежно и устойчиво. Delphi
поддерживает использование уже существующих объектов, включая DLL, написанные
на С и С++, OLE сервера, VBX, объекты, созданные при помощи Delphi. Из готовых
компонент работающие приложения собираются очень быстро. Кроме того, поскольку
Delphi имеет полностью объектную ориентацию, разработчики могут создавать свои
повторно используемые объекты для того, чтобы уменьшить затраты на разработку.
предлагает разработчикам - как в составе команды, так и индивидуальным -
открытую архитектуру, позволяющую добавлять компоненты, где бы они ни были
изготовлены, и оперировать этими вновь введенными компонентами в визуальном построителе.
Разработчики могут добавлять CASE-инструменты, кодовые генераторы, а также
авторские help’ы, доступные через меню Delphi. way tools - однозначное
соответствие между визуальным проектированием и классическим написанием текста
программы. Это означает, что разработчик всегда может видеть код,
соответствующий тому, что он построил при помощи визуальных инструментов и
наоборот.
Визуальный построитель интерфейсов (Visual
User-interface builder) дает возможность быстро создавать клиент - серверные
приложения визуально, просто выбирая компоненты из соответствующей палитры.
Поддержка OLE 2.0, DDE и VBX
Это очень важная особенность для разработчиков в
среде Windows, поскольку в уже существующие Windows-приложения программист
может интегрировать то, что разработает при помощи Delphi.
Инспектор объектов
Этот инструмент представляет из себя отдельное
окно, где вы можете в период проектирования программы устанавливать значения
свойств и событий объектов (Properties & Events).
Менеджер проектов
Этот интерфейс дает возможность разработчику
просмотреть все модули в соответствующем проекте и снабжает удобным механизмом
для управления проектами.
Менеджер проектов показывает имена файлов,
время/дату выбранных форм и пр. Можно немедленно попасть в текст или форму,
просто щелкнув мышкой на соответствующее имя.
Компоненты доступа к базам данных и визуализации
данных.
Библиотека объектов содержит набор визуальных
компонент, значительно упрощающих разработку приложений для СУБД с архитектурой
клиент-сервер. Объекты инкапсулируют в себя нижний уровень - Borland Database
Engine.
Предусмотрены специальные наборы компонент,
отвечающих за доступ к данным, и компонент, отображающих данные. Компоненты
доступа к данным позволяют осуществлять соединения с БД, производить выборку,
копирование данных, и т. п. Компоненты визуализации данных позволяют отображать
данные виде таблиц, полей, списков. Отображаемые данные могут быть текстового,
графического или произвольного формата.
Библиотека объектных Визуальных Компонент
Компоненты, используемые при программировании в
Delphi, встроены в среду разработки приложений и представляют из себя набор
типов объектов, используемых в качестве фундамента при строительстве
приложения.
Этот костяк
называется
Visual Component Library (VCL). В VCL есть такие
стандартные элементы управления, как строки редактирования, статические
элементы управления, строки редактирования со списками, списки объектов.
Добавлены такие компоненты, которые ранее были доступны только в библиотеках
третьих фирм: табличные элементы управления, закладки, многостраничные записные
книжки. содержит специальный объект, предоставляющий интерфейс графических
устройств Windows, и позволяющий разработчикам рисовать, не заботясь об обычных
для программирования в среде Windows деталях.
Ключевой особенностью Delphi является
возможность не только использовать визуальные компоненты для строительства
приложений, но и создание новых компонент. Такая опция позволяет программистам
не переходить в другую среду разработки, а наоборот, встраивать новые
инструменты в существующую среду. Кроме того, можно улучшить или полностью
заменить существующие по умолчанию в Delphi компоненты.
Классы объектов построены в виде иерархии,
состоящей из абстрактных, промежуточных, и готовых компонент. Разработчик может
пользоваться готовыми компонентами, создавать собственные на основе абстрактных
или промежуточных, а также конструировать собственные объекты.
Формы, модули и метод разработки
Формы - это объекты, в которые вы помещаете
другие объекты для создания пользовательского интерфейса вашего приложения.
Модули состоят из кода, который реализует функционирование вашего приложения,
обработчики событий для форм и их компонент.
Информация о формах хранится в двух типах файлов
- .dfm и .pas, причем первый тип файла - двоичный - хранит образ формы и ее
свойства, второй тип описывает функционирование обработчиков событий и
поведение компонент. Оба файла автоматически синхронизируются Delphi, так что
если добавить новую форму, связанный с ней файл .pas автоматически будет
создан, и его имя будет добавлено в проект.
Такая синхронизация и делает Delphi
two-way-инструментом, обеспечивая полное соответствие между кодом и визуальным
представлением. Как только добавляется новый объект или код, Delphi
устанавливает так называемую “кодовую синхронизацию” между визуальными
элементами и соответствующими им кодовыми представлениями.
Делегирование: события программируются проще
Под делегированием понимается то, что некий
объект может предоставить другому объекту отвечать на некоторые события.
Такая модель в некоторых случаях значительно
упрощает программирование. Например, вместо того, чтобы создавать подкласс для
Windows controls при добавлении нового поведения, можно просто привязать
процедуру обработки события, которая будет вызываться автоматически на каждый
щелчок мышью пользователем или нажатие им клавиши.
Ссылки на классы
Ссылки на классы придают дополнительный уровень
гибкости, необходимо динамически создавать объекты, чьи типы могут быть
известны только во время выполнения кода. К примеру, ссылки на классы
применяются при формировании пользователем документа из разного типа объектов,
где он набирает нужные объекты из меню или палитры. Собственно, эта технология
использовалась и при построении Delphi.
Серьезные приложения должны надежным образом
обрабатывать исключительные ситуации, сохранять, если возможно, выполнение
программы или, если это невозможно, аккуратно ее завершать. В Delphi это
устроено в стиле С++.
.3.2 C++Builder
Новейшая система объектно-ориентированного
программирования C++ Builder производства корпорации Borland предназначена для
операционных систем Windows. Интегрированная среда C++Builder обеспечивает
скорость визуальной разработки, продуктивность повторно используемых компонент
в сочетании с мощью языковых средств C++, усовершенствованными инструментами и
разномасштабными средствами доступа к базам данных.
Быстрая разработка приложений подразумевает
поддержку свойств, методов и событий компонент в рамках
объектно-ориентированного программирования, а так же, при желании, возможность
вставки комментарий.
Комментарии:
Начинаются значком /*, заканчиваются значком */.
Эти комментарии не могут быть вложенными.
Начинаются значком //, заканчиваются символом
новой строки. Запрещается использовать комментарии // в строках препроцессора.
Код, содержащий эти комментарии, может быть закомментирован при помощи /* и */.
/* Это один большой комментарий.(i=0; i<10;
++i) //Инициализировать вектор
a[i]=0;
*/
Допускают любое число пробелов.
Идентификаторы:
Представляют собой последовательность букв,
подчеркиваний или цифр, начинающуюся с буквы или с подчеркивания. - Различают
регистр.
Могут иметь произвольную длину. Однако,
некоторые реализации языка С++ имеют ограничения.
Ключевые слова:
Зарезервированы языком (выделены ключевые слова,
появившиеся в С++):
Ключевые слова catch, throw и try используются
для обработки исключительных ситуаций.
Первые версии С++ используют ключевое слово
overload, которое перестало быть необходимым. Кроме того, в этих версиях не реализованы
ключевые слова asm, private, protected, signed, template, volatile.
Константы:
Целые знаковые константы
Десятичные: Это необязательный знак, за которым
следует ненулевая цифра, за которой, в свою очередь, следует произвольное число
цифр.
Имеют тип int, если значение константы не
превышает максимально допустимого значения для числа типа int на данной машине,
в противном случае имеет тип long.
Восьмиричные: Это ноль, за которым следует
произвольное количество цифр в диапазоне от 0 до 7.
, 052, 03707
Шестнадцатиричные: Это 0х или 0Х, за которым
следует произвольное количество цифр или букв в диапазоне от a до f или от A до
F.
x17, 0x2a, 0X7C7
Длинные целые константы
Это знаковые или беззнаковые целые константы,
которые имеют большие значения, нежели это допустимо для чисел типа int.
Явно обозначаются добавлением символа L или l к
знаковой или беззнаковой целой константе.
l, 0x2aL, 1991UL
Константы с плавающей точкой
Имеют целую часть, десятичную точку, дробную
часть, символ е или Е, и экспоненту со знаком или без него.
Могут не иметь целой или дробной части, а также
не иметь десятичной точки или экспоненты.
Имеют тип double, за исключением случаев, когда
оканчиваются символами F, f (тип float), L, l (тип long double).
Символьные константы
Чаще всего представляют собой отдельный символ,
заключенный в одиночные кавычки. Имеют тип char. В языке С символьные константы
имеют тип int.
Имеют числовое значение, которое равно значениям
машинных кодов соответствующих символов.
Используют управляющие последовательности для
представления определенных символов.
Строковые константы
Это ноль и более символов, окруженных двойными
кавычками.
Имеют тип static char, т.е. это статический
вектор символов.
Содержат в конце добавляемый компилятором символ
/0.
Используют \" для включения кавычек в
строку.
Могут быть записаны в нескольких строках.
Последним в переносимой строке должен быть символ \. При этом символы \ и новой
строки отбрасываются.
Соединяются, если являются смежными. Эта
возможность доступна при использовании препроцессора.
Перечислимые константы
Это идентификаторы.
Это единственный интегральный тип. В С
считается, что перечисления имеют тип int.
Выражения
Это сочетание одной или более констант,
переменных, или вызовов функций и нуля или более операций. Рассматриваются как
true, если результат их вычисления не равен нулю, или как false, если результат
равен нулю.
Операторы
Оператор выражения
Представляет собой выражение, заканчивающееся
точкой с запятой (;).= C++;
Оператор метки
Это оператор выражения, перед которым стоит
идентификатор и точка с запятой. Идентификатор метки отличается от остальных
идентификаторов тем, что его область действия ограничивается функцией, в
которой он используется.
Может быть использован в операторе goto (см. "goto").
_HERE: return result;
3 Пустой оператор
Это просто точка с запятой.
Используется, когда после метки или операторов
while, do или for не должно следовать никакого оператора. (*p++ = *q++);
Cоставной оператор
Представляет собой ноль или более операторов,
заключенных в фигурные скобки.
Допустим везде, где допустим оператор выражения.
Определяет новую область действия, то есть
переменные, определенные внутри составного оператора, являются локальными в нем
и скрывают внешние переменные с теми же именами.
Имеет конструктор для локальных переменных
класса, который вызывается при выходе из блока. Кроме того, деструктор
вызывается при выполнении операторов goto, break, continue и return (см.
"Деструкторы" в разделе "Классы").
Оператор объявления
Описывает идентификатор и его тип. В С все
объявления должны соответствовать всем операторам выражений, в С++ это
ограничение снято
Операции
Арифметические операции
Логические операции
Операции отношения
Операции присваивания
Операции инкремента и декремента
Операции указателей и массивов
Операции структуры, объединения и класса
Побитовые операции
Операции распределения памяти
Прочие операции
Организация программы
Программа на С++ обычно состоит из двух типов
файлов: файлов заголовков и файлов кода. Файлы заголовков имеют расширение .h,
а файлы кода - расширение .cpp. Достаточно сложная программа использует
различные файлы каждого из этих типов.
Файлы заголовков содержат классы, шаблоны,
структуры, объединения, перечисления и объявления функций, описания typedef,
определения констант, функции inline и директивы препроцессора. Все вместе, это
называется интерфейсом к файлам кода. Файлы кода содержат реализацию вашей
программы.
Объявления
Описывают новый тип, переменную и ее тип,
константу и ее значение или функцию, ее аргументы и возвращаемое значение.
Присваивают тип int, если тип не определен явно.
Функции
Это наборы из нуля или более операторов,
объединенных в исполняемый модуль, который выполняет действия, определенные
программистом.
Вызываются другими функциями и, как правило,
возвращают им значение (если только возвращаемое значение не имеет тип void).
Имеют несколько разновидностей:
обычные
члены
дружественные
шаблоны
Свойства
Свойства позволяют легко устанавливать
разнообразные характеристики компонент, такие как названия, контекстные подсказки
или источники данных.
Методы
Методы производят определенные операции над
компонентным объектом, в том числе и такие сложные как воспроизведение или
перемотка устройства мультимедиа.
События
События связывают воздействия пользователя на
компоненты, такие как активизация, нажатие кнопок или редактируемый ввод - с
кодами реакции на эти воздействия. Кроме того, события могут возникать при
таких специфических изменениях состояния компонент как обновление данных в
интерфейсных элементах доступа к базам данных.++Builder не делает различия
между тем, какие программные модули добавляются к проекту своего приложения -
написаны они на C++ (файлы с расширением СРР) или на Delphi (файлы с
расширением PAS). Технология визуального наследования форм дает возможность
модифицировать формы Delphi в среде C++Builder без каких бы то ни было проблем.
Исключения
Когда программа встречает ненормальную ситуацию,
на которую она не была рассчитана, можно передать управление другой части
программы, способной справиться с этой проблемой, и либо продолжить выполнение
программы, либо завершить работу. Переброс исключений (exception throwing)
позволяет собрать в точке переброса информацию, которая может оказаться
полезной для диагностики причин, приведших к нарушению нормального хода
выполнения программы.
Язык C++ определяет стандарт обслуживания
исключений в рамках ООП. C++Builder предусматривает специальные механизмы для
обработки исключений (ошибок), которые могут возникнуть при использовании
Библиотеки Визуальных Компонент. Блок кода, который может сгенерировать
исключение, начинается ключевым словом try и заключается в фигурные скобки.
Если блок try обнаруживает исключение внутри этого блока, происходит
программное прерывание. Блок кода, который обрабатывает возникшее исключение,
начинается ключевым словом catch и заключается в фигурные скобки. По меньшей
мере один кодовый блок обработчика исключения должен следовать непосредственно
за блоком try.
.3.3 Сравнение Delphi и C++Builder
Надо отметить, что и Delphi и CBuilder созданы
для решения одних и тех же задач. Так же эти инструменты используют один и тот
же стиль IDE. Поэтому сравнение их между собой является вполне корректным.
Превосходство CBuilder перед Delphi:
наличие шаблонов
наличие STL
наличие дополнительных библиотек
средства языка С++
стандарт языка С++
Шаблоны Delphi только начинают появляться,
поэтому, вероятно, большинство Delphi-программистов с ними вообще не знакомо.
Шаблоны используются для определения классов и функций в независимости от типов
входящих и выходящих параметров.
STL (Standard Template Library) - стандартная
библиотека
шаблонов.
Это
огромная библиотека, содержащая уже написанные функции и классы на все случаи
жизни. Большинство этих функций и классов написано с использованием шаблонов.
Так что они могут работать с любыми типами данных. Использование STL
рекомендуется всем и каждому, так как, во-первых, это экономит время (не надо
ничего программировать самому), во-вторых, все функции проверены и выверены на
предмет всяких переполнений, ошибок и исключительных ситуаций. То есть при
использовании функции из STL гарантированно создается хорошо защищенный код.
Сравнивая средства самих языков С++ и Delphi,
можно придти к выводу, что С++ гибче и сильнее.
Последний довод - стандарт С++. Не секрет, что
С++ считается основным языком разработки прикладных программ. Поэтому все
описания функций Win API используют синтаксис С++. Писать на С++ помогает и
MSDN. Хотя она ориентирована на MS Visual C++, при создании приложений под
Windows на CBuilder MSDN очень полезна.
Таким образом, при рассмотрении всех «плюсов» и
«минусов» сред программирования, было принято решение о выборе C++Builder, так
как он является более легким и практичным при разработке программ и имеет
больше «плюсов» нежели Delphi.
2. Описание программы
Данный раздел описывает интерфейс программы,
используемую композицию в программе, всевозможные справки, а так же взаимосвязь
и организацию исполняемого кода. Построена схема взаимодействия между собой
родительской и дочерними формами.
.1Схема взаимодействия родительской и дочерних
форм
.2 Используемы компоненты в программе
Задачей данной программы является отображение
найденной графической и текстовой информации, а так же печать и сохранение
данных при обращении пользователя к функциям «Печать» и «Сохранить как». Таким
образом, используемые компоненты в программе были выбраны из широкого круга
компонентов по тому, какая логика отображения у данных компонентов.
.2.1 Компоненты отображения данных Отображает
область редактируемого ввода множественных строк информации в формате RTF (Rich
Text Format), который включает различные вариации атрибутов шрифта и
форматирования параграфов. Данный формат принимают многие профессиональные
текстовые процессоры, например, Microsoft Word. Например TrichEdit (в
программе) в разделе Районы, при выборе района Азии отображает информацию,
связанную с географическим районированием.- Создает на форме контейнер
графического изображения (битового образа, пиктограммы или метафайла). Окно
редактора файлов изображений открывается кнопкой в графе значений свойства
Picture
На пример Timage (в программе), в разделе Азия
на карте, при выборе желаемой карты государства отображает ее; сохраняет
данные, будь то графическая или текстовая информация (пользователь может
указывать имя файла); показывает стандартное окно диалога печати, которая
позволяет пользователем определять информацию печати, типа диапазона страниц и
копии;отображает на форме прямоугольную область статического текста, который
нельзя редактировать. Обычно, текст представляет собой название другого
компонента. Текст названия является значением свойства Caption [21].создает
панель команд главного меню и соответствующие им выпадающие меню для
формы;Создает пустую панель, которая может содержать другие компоненты;Создает
кнопку с изображением битового образа. Графические кнопки имеют свойства для
спецификации битовых образов, их вида и размещения на кнопке.предоставляет
полный доступ к управлению мультимедией
.2.2 Компоненты ввода данных отображает
прямоугольную область редактируемого ввода одиночной строки информации на
форме. Начальное содержимое области редактирования определяет строка,
являющаяся значением свойства Text. Tedit является прямой производной от класса
TcustomEdit, полностью наследуя его свойства, методы и события.(кнопка)-Создает
прямоугольную кнопку с надписью. Нажатие на кнопку инициирует некоторое
действие в программе.создает круглую кнопку с двумя состояниями и описательным
текстом, специфицирующим ее назначение. Радио-кнопки представляют набор
взаимоисключающих вариантов выбора: только одна кнопка может быть выбрана в
данный момент времени (отмечается внутренним черным кружком), а с ранее
выбранной кнопки выбор автоматически снимается. При нажатии радио-кнопки свойство
компоненты Checked меняется соответственно и возникает событие OnClick. Если
выбрана одна кнопка, выбор всех прочих кнопок той же группе автоматически
снимается.Создает комбинацию области редактирования из выпадающего списка
текстовых вариантов для выбора. Значение свойства Text заносится
непосредственно в область редактирования. Элементы списка, которые может
выбирать пользователь, содержатся в свойстве Items, номер элемента, который
будет выбран во время выполнения программы, -в свойстве Itemlndex, а сам
выбранный текст - в свойстве SelText. Свойства SelStart и SelLength позволяют
установить выборку части текста или обнаружить, какая часть текста выбрана.
.2.3 Компоненты доступа к базам данных
Невидимые компоненты, обеспечивают соединения с
базами данных, что позволяет сфокусировать внимание на обслуживании данных, не
обращая внимания на организацию взаимодействия с пользователем.[2]представляет
собой интерфейс между прочими компонентами доступа к наборам данных и видимыми
компонентами управления, размещенными на форме. Именно посредством соединения с
источником данных пользователь получает возможность отображения, навигации и
редактирования содержимого баз данных. Установка значения false свойства
AutoEdit запрещает режим редактирования набора данных. Свойство DataSet
указывает, с каким набором данных (таблицей, запросом) связан их
источник.Представляет собой интерфейс между механизмом BDE и компонентой
TdataSource, которая, в свою очередь, образует соединение с такими компонентами
управления, как TDBGrid. Именно посредством ADOТаblе, обеспечивается доступ на
этапе проектирования к живым данным (live data) из таблицы локальной базы
данных: все записи или столбцы адресуемой таблицы сразу же становятся
доступными для приложения.Осуществляет отображение и редактирование записей,
содержащихся в наборе данных и представляемых на регулярной сетке.является
главной логической связующей таблиц.[8]
.3Интерфейс программы
Данный раздел описывает интерфейс главной -
родительской и дополнительных дочерних форм программы.
.3.1 Интерфейс главной - родительской формы
Для того, что бы было понятно, как программа
называется, кто автор и какая версия, была создана заставка программы, описывая
все вышеперечисленное[4], [17] (Рисунок 1).
Используемые элементы: Label, Timer
Организация связи и исполняемого
кода:=Interval=3000\\организует задержку времени на 3секунды= new
Tform4(this);\\представляет форму как независимую->ShowModal();->Free();
Рисунок 1. Заставка при загрузке программы
Графический интерфейс программы представлен для
широкого числа пользователей. Таким образом, внешний вид программы подобран
так, чтобы заинтересовать пользователей данной программы, в частности
расположено фото на форме (рисунок 2), используются специфические шрифты
(рисунок 3) и т.д. Для легкости при передвижении для выбора раздела, в главной
форме, было решение создания нескольких кнопок «Показать».
Создание цифровых часов, и даты реального
времени, используемых только в качестве визуальной привлекательности программы
(Рисунок 4) стало реальным. При выборе раздела, на главной форме, внизу,
отображается подсказка, для точного понимания предоставляемых, пользователю
данных.
Организация связи и исполняемого кода
отображения даты и времени:__fastcall TForm1::Timer1Timer(TObject *Sender) \\
функция управления таймером (выполнение каких-либо действий с использованием
времени)
{->Caption=Time().FormatString("hh:mm:ss");\\возвращает
значение текущего времени в имя label ->Interval=1;\\период
обновления->Caption=Date().FormatString("dd:mm:yyyy");\\возвращает
значение текущего времени в название label->Interval=10; \\период обновления
0,01 сек
}
Рисунок 2. Рисунок на главной форме программы
Рисунок 3. Специфический шрифт
Рисунок 4. Дата и время реального времени
.3.2 Интерфейс дочерних форм
В программу были внесены родительские формы для
создания разделов. Один из таких разделов это «Происхождение названия» (Рисунок
5), в котором описано как образовалось название Азия. Этот раздел создан для
текстового и графического описания (Рисунок 5). Имеется возможность печати и
сохранения данных (Рисунок 5).
Используемые элементы:
TRichEdit, SaveDialog, PrintDialog, MainMenu, Image
Организация связи и исполняемого кода: После
открытии дочерней формы «Происхождение названия», в окно (RichEdit) загружается
файл, который успешно отображается.
void __fastcall
TForm11::RichEdit1Change(TObject *Sender) \\ функция
отображения
данных
в
RichEdit
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\25.rtf");\\открывает
файл
25.rtf и
помещает
данные
в
RichEdit1
}
Отображение картинки (Image) стало возможным
после того, как были установлены Panel, а на них, непосредственно были
размещены рисунки.
Image1=picture=Load=путь
к
файлу=OK=picture=Load=путь
к
файлу=OK
Сохранения данных стало возможным после создания
пункта меню «Сохранить как», которое выводит стандартное окно сохранения
данных.
void __fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
->FileName);\\Если выводится окно с
сообщением о сохранении, то данные из RichEdit1 сохраняются в файл
}
Печать данных осуществлена путем добавления в
меню пункта «Печать», который выводит стандартное оено печати данных.
void __fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");\\Если
выводится окно с сообщением о печати, то данные из RichEdit1 выводятся на
печать
}:=c:\Документ.rtf=Текстовый редактор
(*.rtf)=c:\
Рисунок 5. Раздел «Происхождение названия» и
организация печати
Второй созданный раздел - это «Государства»
(Рисунок 6). Этот раздел создан для поиска информации о странах Азии
(Государство, столица, численность населения, координаты государства и т.д.)
Был реализован запрос для поиска: государство, столица, телефонный код
государства, валюта. Введенные неверно либо некорректно данные считаются не
верными и остаются данные отображенные ранее. Имеется возможность печати и
сохранения данных.
Используемые элементы: DataSource,
ADOConnection, ADOTable, MainMenu, DBGrid, Button, Label, Image
Организация связи и исполняемого кода: Поиск
информации осуществляется по нажатию на кнопку «Поиск» по данным : Государство,
столица, телефонный код государства, валюта__fastcall
TForm10::Button3Click(TObject *Sender) \\ функция определения действий при
нажатии на кнопку
{->Visible=true;\\отобразил
таблицуStr2;dz2,m1,m2,m3;=Edit1->Text;SearchOptions;\\опции
поиска<<loPartialKey<<loCaseInsensitive;\\задание
опции
поиска
dz2=Form10->ADOTable1
>Locate("Государство",Str2,SearchOptions);\\организация
поиска по столбцу Государство=Form10->ADOTable1
>Locate("Столица",Str2,SearchOptions);\\организация
поиска по столбцу «Государство»=Form10->ADOTable1->Locate("Валюта",Str2,SearchOptions);\\организация
поиска по столбцу «Валюта»=Form10->ADOTable1->Locate("Телефонный
код",Str2,SearchOptions);\\организация поиска по столбцу «Телефонный код»
}
Подключение базы данных
Поместил на форму компонент TADOConnection,
отвечающий за связь приложения с физической базой данных. Далее поместил
TDataSource, отвечающий за графическое отображение данных, он необходим для
связи Data Controls компонентов с компонентом TADOTable, который тоже поместил
на форму (он нужен для связи с конкретной таблицей БД, аналогично TTable из
BDE). Для связи всех трех компонентов между собой проделал следующие операции:
У компонента TADOTable установил свойство
Connection в положенный на форму компонент TADOConnection (По-умолчанию это
ADOConnection1);
Свойство DataSet компонента TDataSource
установил в ADOTable1;
Для установления соединение с БД выберал
компонент TADOConnection. В появившемся окне выбрал "Use connection
string" и нажал Build. В ответ предложили выбрать драйвер для работы с
базой, выбрал драйвер Microsoft Jet 4.0 OLE DB и нажал далее. Указал путь к
базе данных. Проверил, есть ли соединение с базой данных, установив свойство
Connected (этого же компонента) в true. Далее выбрал компонент TADOTable и указал
в свойстве TableName имя желаемой для работы таблицы из созданной базы данных.
Чтобы компонент получил доступ к базе данных, используя ADOConnection установил
Active=true (TADOTable). Соединение графических компонентов с физической базой
данных осуществил путем использования промежуточного звена - компонента
TDataSource. Для этого у каждого компонента есть свойство DataSource,
выделенное красным в "Инспекторе Объектов". Установил в это свойство
DataSource1. Далее свойство Active TADOTable поставил в положении true, а
TADOConnection[2].Connected=true. База данных
была
создана
в
Microsoft Office Access 2003.: =ADOTable=true:=false\\выключил
проверку
пароля=Build=Поставщик
данных=Microsoft
Jet 4.0=путь
к
базе=true:=false\\выключил
проверку
пароляstring=Build=Поставщик
данных=Microsoft
Jet4.0=путь
к
базе=true=ADOConnection1=true\\фильтрация
данных
по
названию
от
А
до
Я
LockType=ltReadOnly
ReadOnly=true\\ Организация атрибута «только для
чтения»=государства=true\\активировал соединение:=bsSingle\\стиль таблицы=clTeal\\выбрал
цвет таблицы
DataSource=DataSource1=true=true\\ активировал
атрибута
«только
для
чтения»
Рисунок 6. Раздел «Государства»
Далее создан раздел «Население Азии» (Рисунок
7), в котором отображена информация о численности населения, этнический состав
и другое. Имеется возможность печати и сохранения информации.
Используемые элементы: TRichEdit, SaveDialog,
PrintDialog, MainMenu, Image
Организация связи и исполняемого кода: После
открытия дочерней формы «Население» открывается текстовый файл, в котором
записана информация о населении Азии (численность, этнический состав)
void __fastcall
TForm12::RichEdit1Change(TObject *Sender)
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\26.rtf");\\открывает
файл
26.rtf и
помещает
данные
в
RichEdit1
}
Пункт «Сохранить как» был создан для сохранения
информации в файл, выведенной на экран монитора
void __fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
}
Для осуществления печати был создан пункт
«Печать», которое выводит окно, в котором можно указать имя принтера, число
копий и др.__fastcall TForm11::N6Click(TObject *Sender) \\ функция определения
действий при нажатии на пункт «Печать» в
меню(PrintDialog1->Execute())RichEdit1->Print("");\\Если
выводится окно с сообщением о спечати, то данные из RichEdit1 выводятся на
печать
}:=c:\Документ.rtf=Текстовый редактор (*.rtf)=c:\
Рисунок 7. Раздел «Население»
Следующий созданный раздел представлен как
«Основные сведения» (Рисунок 8), в котором представлены основные географические
сведения Азии: площадь, средняя высота над уровнем моря, самая южная точка
территории Азии и т.д.
Используемые элементы:
TRichEdit, Panel, SaveDialog, PrintDialog, MainMenu, Image
Организация связи и исполняемого кода:
Отображение информации осуществлен путем загрузки текстового файла в
RichEdit.__fastcall TForm13::RichEdit1Change(TObject *Sender) \\ функция
определения действий при открытии Form 13
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\27.rtf");\\открывает
файл 27.rtf и помещает данные в RichEdit1
}
Отображение картинки стало возможным после того,
как был помещен компонент Panel и сама картинки Image
Image1=picture=Load=путь
к
файлу=OK=picture=Load=путь
к
файлу=OK
Сохранение данных стало возможным после того,
как был создан пункт «Сохранить как» в меню «Файл»__fastcall
TForm11::N7Click(TObject *Sender) \\ определение событий при нажатии на пункт
«Сохранить как» в меню
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
->FileName);
}
Осуществление печати стало возможным после
организации исполняемого кода__fastcall TForm11::N6Click(TObject *Sender) \\
функция определения действий при нажатии на пункт «Печать» в меню
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)
InitialDir=c:\
Рисунок 8. Раздел «Основные сведения»
Далее был создан раздел «Расположение на
материке» (Рисунок 9) описывающий геополитические границы Азии, описание
территории, описание типов климата, расположение, описание крупных озер и рек,
расположение гор.
Используемые элементы:
TRichEdit, SaveDialog, PrintDialog, MainMenu
Организация связи и исполняемого кода: После
открытия дочерней формы (Расположение на материке), в окно (RichEdit)
загружается текстовый файл с информацией о расположении части света на материке
Евразия.
void __fastcall
TForm12::RichEdit1Change(TObject *Sender) \\ определение
действий
с
RichEdit1 на Form12
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\26.rtf");
}
Для осуществления функции сохранения
отображенной информации был создан пункт «Сохранить как», который при желании
пользователя сохраняет информацию в файл
void __fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
->FileName); \\ осуществляется
<\\осуществляется> сохранение данных из RichEdit1
Для осуществления печати был создан
пункт в меню «Файл», который печатает отображенную на экран монитора
информацию.
void
__fastcall TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый редактор
(*.rtf)
InitialDir=c:\
Рисунок 9. «Расположение на
материке»
Главным плюсом программы явилось
создание раздела с картами (политическая, физическая) государств, а так же всей
территории Азии. Этот раздел назван «Азия на карте» (Рисунок 10). Для выбора
необходимой географической карты был создан выпадающий список, из которого
можно выбирать нужную карту [18], [19]. Так же было создана функция печати и
сохранения карты в указанное место (Рисунок 10).
Используемые элементы:
SaveDialog, PrintDialog, MainMenu, Image, ComboBox
Организация связи и исполняемого
кода:
void
__fastcall TForm5::ComboBox1Change(TObject *Sender) \\ функция определения действий
ComboBox1
{(ComboBox1->ItemIndex==0)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\2.bmp");\\отображает на форме
2.bmp в
Image (ComboBox1->ItemIndex==1)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\7.bmp");\\
открывает файл
7.bmp (ComboBox1->ItemIndex==2)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\3.bmp");\\
открывает файл
3.bmp(ComboBox1->ItemIndex==3)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\6.bmp");(ComboBox1->ItemIndex==4)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\5.bmp");(ComboBox1->ItemIndex==5)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\6.jpg");(ComboBox1->ItemIndex==6)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\7.jpg");(ComboBox1->ItemIndex==7)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\8.bmp");(ComboBox1->ItemIndex==8)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\9.bmp");(ComboBox1->ItemIndex==9)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\10.bmp");(ComboBox1->ItemIndex==10)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\11.bmp");(ComboBox1->ItemIndex==11)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\12.bmp");(ComboBox1->ItemIndex==12)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\13.bmp");(ComboBox1->ItemIndex==13)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\14.bmp");(ComboBox1->ItemIndex==14)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\15.bmp");(ComboBox1->ItemIndex==15)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\16.bmp");
}=Text=Выберите государство
Для организации сохранения карты был
организован пункт «Сохранить как», который сохраняет выбранную карту в файл с
расширением *.bmp [38].
void
__fastcall TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
->FileName);
}
Для организации печати организован
пункт «Печать» в меню «Файл», при нажатии на которого осуществляется печать
географической, выбранной пользователем карты.
void
__fastcall TForm5::N7Click(TObject *Sender)
{(!Form5->PrintDialog1->Execute())
return;PPIx = GetDeviceCaps(Printer()->Handle, LOGPIXELSX);\\Определение данных принтера по значению ХPPIy =
GetDeviceCaps(Printer()->Handle, LOGPIXELSY);\\ \\Определение данных
принтера по значению YSmX = PPIx / 2, SmY = PPIy /
3;WInch = 10, HInch = 7; //организация масштаба()->Orientation
= poLandscape;\\Организация риентации листа
int x =
Printer()->PageWidth;\\определение переменной Х, шириныy =
Printer()->PageHeight;\\ определение переменной Y, длины
TPrinter
*Prntr = Printer();>BeginDoc();\\начало документа>Canvas->Draw(10,10,
Image2->Picture->Graphic);\\ Печать рисунка
Image2 с длинной и шириной в
10 дюймов
Prntr->EndDoc();\\конец документа
Рисунок 10. Раздел «Азия на карте».
Отображение карт государств
Далее был организован раздел
«Районы» (Рисунок 11), в котором были описаны физико-географические районы
Азии[19] (Западная Азия, Южная Азия и др. районы). Так же как и в других
разделах программы была создана функция печати и сохранения (из пункта меню
Файл), выведенных на экран монитора информации.
Используемые элементы: SaveDialog,
PrintDialog, MainMenu, Image, RadioButton, Button
Организация связи и исполняемого
кода: для легкости в отображении информации было создано несколько кнопок, при
нажатии на которых, в правом окне дочернего окна, отобразится информация
географического характера.
Западная Азия__fastcall
TForm14::RadioButton1Click(TObject *Sender)
{(RadioButton1->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\111.rtf");
\\открывает файл
111.rtf и помещает данные в
RichEdit1
}
Южная Азия__fastcall
TForm14::RadioButton3Click(TObject *Sender)
{(RadioButton3->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\33.rtf");
\\открывает файл
333.rtf и помещает данные в
RichEdit1
}
Юго-Восточная Азия__fastcall
TForm14::RadioButton4Click(TObject *Sender)
{(RadioButton4->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\44.rtf");
}
Восточная Азия__fastcall
TForm14::RadioButton5Click(TObject *Sender)
{(RadioButton5->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\55.rtf");
}
Северная Азия__fastcall
TForm14::RadioButton6Click(TObject *Sender)
{(RadioButton6->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\66.rtf");
}
Средняя Азия__fastcall
TForm14::RadioButton7Click(TObject *Sender)
{(RadioButton7->Checked==true)RichEdit1->Lines
->LoadFromFile("..\\AsiaGid\\doc\\77.rtf");
}
Для сохранения отображенных данных
был создан пункт «Сохранить как», в меню «Файл»[11]__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
->FileName);
}
Для организации печати данных был
создан пункт «Печать» в меню «Файл»__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый редактор
(*.rtf)
InitialDir=c:\
Рисунок 11. Дочернее окно «Районы»
Следующим, на этапе разработки стало
конструирование раздела «Посольства Казахстана в Азии» (Рисунок 12). Было
создано окно, в котором, при выборе государства отображалась информация о
посольствах Казахстана в странах Азии. Было описано местонахождения посольств,
адрес, телефон, факс, электронная почта. Разработана возможность печати и
сохранения информации на внешний носитель. Для наглядности и подробного
представления внизу изображен флаг Казахстана и государства, которая выбрана, в
качестве описания информации о посольстве.
Используемые элементы:
SaveDialog, PrintDialog, MainMenu, Image, RichEdit, ComboBox, Label
Организация связи и исполняемого
кода: Для осуществления выбора государств, был создан выпадающий список
(ComboBox), из которого можно выбрать желаемое Азиатское государство. После
выбора, в правом окне (RichEdit) отобразиться информация о посольстве
Республики Казахстан в выбранной стране.
void
__fastcall TForm15::ComboBox1Change(TObject *Sender)
{(ComboBox1->ItemIndex==0)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\6.rtf");
\\ при выборе пункта из выподающего списка загружаются данные из файла
6.rtf(ComboBox1->ItemIndex==1)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\21.rtf");
\\ при выборе пункта из выподающего списка загружаются данные из файла
21.rtf(ComboBox1->ItemIndex==2)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\1.rtf");(ComboBox1->ItemIndex==3)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\2.rtf");(ComboBox1->ItemIndex==4)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\7.rtf");(ComboBox1->ItemIndex==5)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\4.rtf");(ComboBox1->ItemIndex==6)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\8.rtf");(ComboBox1->ItemIndex==7)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\10.rtf");(ComboBox1->ItemIndex==8)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\17.rtf");(ComboBox1->ItemIndex==9)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\12.rtf");(ComboBox1->ItemIndex==10)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\9.rtf");(ComboBox1->ItemIndex==11)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\13.rtf");(ComboBox1->ItemIndex==12)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\5.rtf");(ComboBox1->ItemIndex==13)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\16.rtf");(ComboBox1->ItemIndex==14)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\3.rtf");(ComboBox1->ItemIndex==15)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\15.rtf");(ComboBox1->ItemIndex==16)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\20.rtf");(ComboBox1->ItemIndex==17)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\14.rtf");(ComboBox1->ItemIndex==18)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\18.rtf");(ComboBox1->ItemIndex==19)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\19.rtf");(ComboBox1->ItemIndex==20)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\11.rtf");(ComboBox1->ItemIndex==0)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag3.jpg");
\\ при выборе пункта из выподающего списка загружаются данные из файла
3.jpg, картинка(ComboBox1->ItemIndex==2)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag4.jpg");
\\ при выборе пункта из выподающего списка загружаются данные из файла
4.jpg, картинка(ComboBox1->ItemIndex==1)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag5.jpg");(ComboBox1->ItemIndex==3)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag6.jpg");(ComboBox1->ItemIndex==4)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag7.jpg");(ComboBox1->ItemIndex==5)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag8.jpg");(ComboBox1->ItemIndex==6)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag9.jpg");(ComboBox1->ItemIndex==7)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag10.jpg");(ComboBox1->ItemIndex==8)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag11.jpg");(ComboBox1->ItemIndex==9)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag12.jpg");(ComboBox1->ItemIndex==10)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag13.jpg");(ComboBox1->ItemIndex==11)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag14.jpg");(ComboBox1->ItemIndex==12)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag15.jpg");(ComboBox1->ItemIndex==13)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag1.jpg");(ComboBox1->ItemIndex==14)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag16.jpg");(ComboBox1->ItemIndex==15)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag17.jpg");(ComboBox1->ItemIndex==16)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag18.jpg");(ComboBox1->ItemIndex==17)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag19.jpg");(ComboBox1->ItemIndex==18)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag20.jpg");(ComboBox1->ItemIndex==19)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag21.jpg");(ComboBox1->ItemIndex==20)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag22.jpg");
Для сохранения отображаемых данных в
окне (RichEdit), при выборе государства, в меню «Файл», был создан пункт
«Сохранить как». __fastcall TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
->FileName);
}
Для организации печати, выведенной
на экран монитора данных, был организован пункт «Печать» в меню «Файл». После
нажатия на «Печать», отображаемая информация будет осуществлять печать на
бумажный носитель.
void
__fastcall TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf \\ задание имени
документа (по умолчанию) при сохранения=Текстовый редактор (*.rtf)=c:\ \\
сохранение файла на диск С
Для выхода из формы был организован
пункт «Выход» в меню
void
__fastcall TForm1::N5Click(TObject *Sender)
{->Close(); \\ закрывает форму 15
}
Рисунок 12. Дочернее окно «Посольства
Казахстана»
Еще одним плюсом стал факт создания
полноценного раздела «Курорты» (Рисунок 13), в котором при выборе Азиатского
государства, выводилась информация о курортах, находящихся на территории
страны. Ведь всегда будет удобно иметь под рукой программу, которая бы
предоставляла бы информацию о курортах и при необходимости выводила на печать
данные. Полезен туристическим фирмам, которые нуждаются в подобной информации.
Описаны морские климатические,
горноклиматические, SPA курорты, а так же горнолыжные, бальнеологические и
пляжные курорты государств Азии[19].
Используемые элементы:
SaveDialog, PrintDialog, MainMenu, Image, RichEdit, ComboBox
Организация связи и исполняемого
кода: Для осуществления выбора государств, в которых имеются курорты, был организован
выпадающий список (ComboBox), из которого возможен выбор государства, после
чего, в правом окне (RichEdit) отобразиться информация о курортах данного
государства (SPA курорты, горнолыжные, пляжные, горноклиматические,
бальнеологические курорты).
void
__fastcall TForm9::ComboBox1Change(TObject *Sender)
{(ComboBox1->ItemIndex==0)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\1.rtf");
\\ загрузка файла
1.rtf и отображение при выборе пункта из выпадающего списка с индексом
0(ComboBox1->ItemIndex==1)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\2.rtf");\\
загрузка файла
2.rtf и отображение при выборе пункта из выпадающего списка с индексом
1(ComboBox1->ItemIndex==2)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\3.rtf");(ComboBox1->ItemIndex==3)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\4.rtf");(ComboBox1->ItemIndex==4)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\5.rtf");(ComboBox1->ItemIndex==5)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\6.rtf");(ComboBox1->ItemIndex==6)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\7.rtf");(ComboBox1->ItemIndex==7)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\8.rtf");(ComboBox1->ItemIndex==8)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\9.rtf");(ComboBox1->ItemIndex==9)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\10.rtf");(ComboBox1->ItemIndex==10)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\11.rtf");(ComboBox1->ItemIndex==11)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\12.rtf");(ComboBox1->ItemIndex==12)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\13.rtf");(ComboBox1->ItemIndex==13)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\23.rtf");(ComboBox1->ItemIndex==14)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\14.rtf");(ComboBox1->ItemIndex==15)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\15.rtf");(ComboBox1->ItemIndex==16)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\16.rtf");(ComboBox1->ItemIndex==17)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\17.rtf");(ComboBox1->ItemIndex==18)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\18.rtf");(ComboBox1->ItemIndex==19)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\19.rtf");(ComboBox1->ItemIndex==20)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\20.rtf");(ComboBox1->ItemIndex==21)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\21.rtf");(ComboBox1->ItemIndex==22)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\22.rtf");
}
Для организации сохранения
отображаемых данных в меню «Файл», был создан пункт «Сохранить как», при
нажатии, на которого, информация, выведенная на экран монитора, сохраняется в
файл с расширением *.rtf.
void
__fastcall TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
->FileName); \\ сохраняются
данные из RichEdit1
}
Для организации печати, выведенной
на экран монитора данных, был организован пункт «Печать» в меню «Файл». После
нажатия на «Печать», отображаемая информация будет осуществлять печать на
бумажный носитель.
void
__fastcall TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
\\ выводится на печать отображенная на экран информация из RichEdit1
}:=c:\Документ.rtf=Текстовый
редактор (*.rtf)=c:\
Рисунок 13. «Курорты»
2.4 Музыкальное сопровождение в
программе
Музыка (композиция) в любой
программе является, в какой то мере привлечением пользователя к экрану
монитора, да и вообще появляется интерес к программе. Данная программа не стала
исключением, и была оснащена музыкальной мелодией, которая в какой то мере и
привлекает. При сопровождении композицией программы, важным фактором стало
оснащение кнопками «выключить» и «возобновить звучание композиции» (рисунок
14). Если кому-нибудь не понравится, либо не захочется прослушивать мелодию,
возможно выключить мелодию.
Оснащение музыкальной композицией
стало одной из привлекательных достопримечательностей данной, разрабатываемой
программы.
Используемые элементы: BitBtn,
SpeedButton
Организация связи и исполняемого
кода: При нажатии на кнопку вкл (BitBtn) срабатывает Timer и загружает
композицию из файла, который использует подсчет времени для организации цикла
проигрывания композиции. При нажатии на кнопку выкл (SpeedButton3) загружается
пустая мелодия [9].
Рисунок 14. Кнопки выключения и
возобновления сопровождения музыкальной композицией
.5 Справки программы
Справка была создана для упрощения
передвижения по формам и использования программы (Рисунок 14). Указатель
содержит полный список использования функций предоставления информации. Для
того, что бы не возникало вопросов у пользователей данной программы, был создан
полный указатель. Так же была создана отдельная справка, предоставляющая
информацию о разработчике, адрес электронной почты и номер ICQ и обращения по
всем вопросам, в том числе и о разработке программных продуктов (Рисунок
15)[1]. Так же создана для представления упрощенного описания программы в целом
отдельная справка, названная «О программе» (Рисунок 16).
Открытие справки, для просмотра
пояснений возможно в пункте «Справка Азиатские государства»
void
__fastcall TForm1::N6Click(TObject *Sender)
{>HelpFile
= "..\\AsiaGid\\doc\\help.hlp";\\открывает файл справки
Help.hlp
Application->HelpCommand(HELP_CONTENTS,
0);
}
Рисунок 14. Главная справка
программы
Открытие справки, для просмотра
информации о авторе возможно в пункте «Автор»
void
__fastcall TForm1::N4Click(TObject *Sender)
{->Show(); \\ открытие формы 2
}
Рисунок 15. Справка «Автор»
Открытие справки, для просмотра
информации о программе в целом возможно в пункте «О программе»
void
__fastcall TForm1::N3Click(TObject *Sender)
{->Show(); \\ отображает форму 3
}
Рисунок 16. «О программе»
3. Охрана труда
С развитием научно-технического
прогресса немаловажную роль играет возможность безопасного исполнения людьми
своих трудовых обязанностей. В связи с этим была создана и развивается наука о
безопасности труда и жизнедеятельности человека.
Безопасность жизнедеятельности (БЖД)
- это комплекс мероприятий, направленных на обеспечение безопасности человека в
среде обитания, сохранение его здоровья, разработку методов и средств защиты
путем снижения влияния вредных и опасных факторов до допустимых значений,
выработку мер по ограничению ущерба в ликвидации последствий чрезвычайных
ситуаций мирного и военного времени.
Цель и содержание БЖД:
обнаружение и изучение факторов
окружающей среды, отрицательно влияющих на здоровье человека;
ослабление действия этих факторов до
безопасных пределов или исключение их если это возможно;
ликвидация последствий катастроф и
стихийных бедствий.
Охрана здоровья трудящихся,
обеспечение безопасности условий труда, ликвидация профессиональных заболеваний
и производственного травматизма составляет одну из главных забот человеческого
общества. Обращается внимание на необходимость широкого применения
прогрессивных форм научной организации труда, сведения к минимуму ручного,
малоквалифицированного труда, создания обстановки, исключающей профессиональные
заболевания и производственный травматизм.
На рабочем месте должны быть
предусмотрены меры защиты от возможного воздействия опасных и вредных факторов
производства. Уровни этих факторов не должны превышать предельных значений,
оговоренных правовыми, техническими и санитарно-техническими нормами.
Данный раздел дипломного проекта
посвящен рассмотрению следующих вопросов:
определение оптимальных условий
труда инженера - программиста;
сведения о требуемой освещенности
рабочего места;
сведения о шуме и вибрации на
рабочем месте.
Эргономические требования к рабочему
месту
.1 Требования к производственным
помещениям
Окраска помещений и мебели должна
способствовать созданию благоприятных условий для зрительного восприятия,
хорошего настроения. Источники света, такие как светильники и окна, которые
дают отражение от поверхности экрана, значительно ухудшают точность знаков и
влекут за собой помехи физиологического характера, которые могут выразиться в
значительном напряжении, особенно при продолжительной работе. Отражение,
включая отражения от вторичных источников света, должно быть, сведено к
минимуму. Для защиты от избыточной яркости окон могут быть применены шторы и
экраны. В зависимости от ориентации окон рекомендуется следующая окраска стен и
пола:
окна ориентированы на юг: - стены
зеленовато-голубого или светло голубого цвета; пол - зеленый;
окна ориентированы на север: - стены
светло-оранжевого или оранжево-желтого цвета; пол - красновато-оранжевый;
окна ориентированы на восток: -
стены желто-зеленого цвета; пол зеленый или красновато-оранжевый;
окна ориентированы на запад: - стены
желто-зеленого или голубовато-зеленого цвета; пол зеленый или
красновато-оранжевый.
В помещениях, где находится
компьютер, необходимо обеспечить следующие величины коэффициента отражения: для
потолка: 60…70%, для стен: 40…50%, для пола: около 30%. Для других поверхностей
и рабочей мебели: 30…40%.
.2 Освещение
Существует три вида освещения -
естественное, искусственное и совмещенное (естественное и искусственное
вместе).
Естественное освещение - освещение
помещений дневным светом, проникающим через световые проемы в наружных
ограждающих конструкциях помещений. Естественное освещение характеризуется тем,
что меняется в широких пределах в зависимости от времени дня, времени года,
характера области и ряда других факторов.
Искусственное освещение применяется
при работе в темное время суток и днем, когда не удается обеспечить
нормированные значения коэффициента естественного освещения (пасмурная погода,
короткий световой день). Освещение, при котором недостаточное по нормам
естественное освещение дополняется искусственным, называется совмещенным
освещением.
Искусственное освещение
подразделяется на рабочее, аварийное, эвакуационное, охранное. Согласно СНиП
II-4-79 в помещений вычислительных центров необходимо применить систему
комбинированного освещения.
При выполнении работ категории
высокой зрительной точности (наименьший размер объекта различения 0,3…0,5мм)
величина коэффициента естественного освещения (КЕО) должна быть не ниже 1,5%, а
при зрительной работе средней точности (наименьший размер объекта различения
0,5…1,0 мм) КЕО должен быть не ниже 1,0%. В качестве источников искусственного
освещения обычно используются люминесцентные лампы типа ЛБ или ДРЛ, которые
попарно объединяются в светильники, которые должны располагаться над рабочими
поверхностями равномерно.
Требования к освещенности в
помещениях, где установлены компьютеры, следующие: при выполнении зрительных
работ высокой точности общая освещенность должна составлять 300лк, а
комбинированная - 750лк; аналогичные требования при выполнении работ средней
точности - 200 и 300лк соответственно.
.3 Шум и вибрация
Шум ухудшает условия труда оказывая
вредное действие на организм человека. Работающие в условиях длительного
шумового воздействия испытывают раздражительность, головные боли,
головокружение, снижение памяти, повышенную утомляемость, понижение аппетита,
боли в ушах и т. д. Такие нарушения в работе ряда органов и систем организма
человека могут вызвать негативные изменения в эмоциональном состоянии человека
вплоть до стрессовых. Под воздействием шума снижается концентрация внимания,
нарушаются физиологические функции, появляется усталость в связи с повышенными
энергетическими затратами и нервно-психическим напряжением, ухудшается речевая
коммутация. Все это снижает работоспособность человека и его
производительность, качество и безопасность труда. Длительное воздействие
интенсивного шума (выше 80 дБ(А)) на слух человека приводит к его частичной или
полной потере. В таблице 1 указаны предельные уровни звука в зависимости от
категории тяжести и напряженности труда, являющиеся безопасными в отношении
сохранения здоровья и работоспособности.
Таблица 1. Предельные уровни звука, дБ,
на рабочих местах
|
Категория
напряженности труда
|
Категория
тяжести труда
|
|
I.
Легкая
|
II.
Средняя
|
III.
Тяжелая
|
IV.
Очень тяжелая
|
|
I.
Мало напряженный
|
80
|
80
|
75
|
75
|
|
II.
Умеренно напряженный
|
70
|
70
|
65
|
65
|
|
III.
Напряженный
|
60
|
60
|
-
|
-
|
|
IV.
Очень напряженный
|
50
|
50
|
-
|
-
|
Уровень шума на рабочем месте
математиков-программистов и операторов видеоматериалов не должен превышать
50дБА, а в залах обработки информации на вычислительных машинах - 65дБА. Для
снижения уровня шума стены и потолок помещений, где установлены компьютеры,
могут быть облицованы звукопоглощающими материалами.Уровень вибрации в
помещениях вычислительных центров может быть снижен путем установки
оборудования на специальные виброизоляторы. Уровень шума, возникающий от
нескольких некогерентных источников, работающих одновременно, подсчитывается на
основании принципа энергетического суммирования излучений отдельных источников
(формула 1):
(1)
где Li - уровень звукового давления
i-го источника шума;
n - количество источников шума.
Уровни звукового давления источников
шума, действующих на оператора на его рабочем месте представлены в таблице 2
Таблица 2. Уровни звукового давления
различных источников.
|
Источник
шума
|
Уровень
шума, дБ
|
|
Жесткий
диск
|
40
|
|
Вентилятор
|
45
|
|
Монитор
|
17
|
|
Клавиатура
|
10
|
|
Принтер
|
45
|
|
Сканер
|
42
|
Полученное значение должно не превышать
допустимый уровень шума для рабочего места оператора (программиста), равный 65
дБ (ГОСТ 12.1.003-83)
.4 Эргономические требования к рабочему месту
Главными элементами рабочего места программиста
являются стол и кресло. Основным рабочим положением является положение сидя.
Рабочая поза сидя вызывает минимальное утомление программиста[14].
Оптимальное размещение предметов труда и
документации в зонах досягаемости:
ДИСПЛЕЙ размещается в зоне а (в центре);
СИСТЕМНЫЙ БЛОК размещается в предусмотренной
нише стола;
КЛАВИАТУРА - в зоне г/д;
«МЫШЬ» - в зоне в справа;
СКАНЕР в зоне а/б (слева);
ПРИНТЕР находится в зоне а (справа);
ДОКУМЕНТАЦИЯ: необходимая при работе - в зоне
легкой досягаемости ладони - в, а в выдвижных ящиках стола - литература,
неиспользуемая постоянно.
- сканер, 2 - монитор, 3 - принтер, 4 -
поверхность рабочего стола,
- клавиатура, 6 - манипулятор типа «мышь».
Для комфортной работы стол должен удовлетворять
следующим условиям:
высота стола должна быть выбрана с учетом
возможности сидеть свободно, в удобной позе, при необходимости опираясь на
подлокотники;
нижняя часть стола должна быть сконструирована
так, чтобы программист мог удобно сидеть, не был вынужден поджимать ноги;
поверхность стола должна обладать свойствами,
исключающими появление бликов в поле зрения программиста;
конструкция стола должна предусматривать наличие
выдвижных ящиков (не менее 3 для хранения документации, листингов, канцелярских
принадлежностей).
высота рабочей поверхности рекомендуется в
пределах 680-760мм. Высота поверхности, на которую устанавливается клавиатура,
должна быть около 650мм.
Положение экрана определяется:
расстоянием считывания (0,6…0,7м);
углом считывания, направлением взгляда на 20°
ниже горизонтали к центру экрана, причем экран перпендикулярен этому
направлению.
.5 Режим труда
Как уже было неоднократно отмечено, при работе с
персональным компьютером очень важную роль играет соблюдение правильного режима
труда и отдыха. В противном случае у персонала отмечаются значительное
напряжение зрительного аппарата с появлением жалоб на неудовлетворенность
работой, головные боли, раздражительность, нарушение сна, усталость и
болезненные ощущения в глазах, в пояснице, в области шеи и руках.
В табл. 3 представлены сведения о
регламентированных перерывах, которые необходимо делать при работе на
компьютере, в зависимости от продолжительности рабочей смены, видов и категорий
трудовой деятельности с ВДТ (видеодисплейный терминал) и ПЭВМ (в соответствии с
СанПиН 2.2.2 542-96 «Гигиенические требования к видеодисплейным терминалам,
персональным электронно-вычислительным машинам и организации работ»).
Таблица 3. Время регламентированных перерывов
при работе на компьютере
|
Категория
работы с ВДТ или ПЭВМ
|
Уровень
нагрузки за рабочую смену при видах работы с ВДТ
|
Суммарное
время регламентированных перерывов, мин
|
|
Группа
А, количество знаков
|
Группа
Б, количество знаков
|
Группа
В, часов
|
При
12-часовой смене
|
|
I
|
до
20000
|
до
15000
|
до
2,0
|
30
|
70
|
|
II
|
до
40000
|
до
30000
|
до
4,0
|
50
|
90
|
|
III
|
до
60000
|
до
40000
|
до
6,0
|
70
|
120
|
Время перерывов дано при соблюдении указанных
Санитарных правил и норм. При несоответствии фактических условий труда
требованиям Санитарных правил и норм время регламентированных перерывов следует
увеличить на 30%.
В соответствии со СанПиН 2.2.2 546-96 все виды
трудовой деятельности, связанные с использованием компьютера, разделяются на
три группы:
группа А: работа по считыванию информации с
экрана ВДТ или ПЭВМ с предварительным запросом;
группа Б: работа по вводу информации;
группа В: творческая работа в режиме диалога с
ЭВМ (электронная вычислительная машина).
Эффективность перерывов повышается при сочетании
с производственной гимнастикой или организации специального помещения для
отдыха персонала с удобной мягкой мебелью, аквариумом, зеленой зонойЗаключение
В результате проектирования и разработки
программы были реализованы функции и конструирование действий, направленные на
поиск необходимой информации об Азиатских государствах. В частности:
отображение данных о курортах в государствах Азии, общую информацию о
государствах (столица, глава государства, численность населения, координаты,
площадь, валюта, телефонный код государства), так же описание происхождения
названия территории «Азия», географические данные территории (самая южная
точка, общая площадь, площадь островов, средняя высота над уровнем моря и
т.д.), описание населения (темпы роста численности, этнический состав
населения), расположение на материке Евразия, описание географических районов
Азии. Так же решен вопрос с печатью данных (пользователь вправе выбирать
количество копий, диапазон печати) и сохранение (сохранение в файл в формате
*.rtf и *.bmp). Реализована справка с картинками, в которой представлена
наглядная информация для использования программы. Так же реализована отдельная
справка с координатами автора и справка, описывающая программу в целом.
Реализована база с государствами, которая возможно поможет пользователю.
Главным плюсом программы является музыкальное
сопровождение, которое воспроизводится циклично.
Раздел с посольствами Казахстана в государствах
Азии поможет пользователям туристических фирм, а так же людям, отправляющимся
за пределы Казахстана, но в пределах территории Азии в обеспечении полной и
достоверной информацией.
Была достигнута основная цель (создать
информационную справочную систему «Азиатские государства», используя
информацию, предоставленную из достоверных источников).
Проделав работу по данному проекту, стоит
отметить, что процесс является выгодным как для сотрудников туристических
организации, так и для клиентов, так как в одном программном продукте собрана
необходимая информация (сведения о курортах, посольствах, географические карты,
описание географических районов и истории территории Азии).
Список использованной литературы
Электронный
учебник.- C++ Builder первые опыты
Электронный
учебник.- Визуальная разработка приложений баз данных
Электронный
учебник.- Графические компоненты
Электронный
учебник.-Инструменты визуальной разработки приложений
Электронный
учебник.-Использование и создание визуальных компонент
Электронный
учебник.- Объектно-ориентированное программирование и C++
Электронный
учебник.- Основы программирования на С++Builder 6.0
Электронный
учебник. - Основы программирования баз данных
Электронный
учебник - Курс молодого бойца программирования
Электронный
учебник - С++Builder 6.0 для программирования
Электронный
учебник - Мир программирования
Электронный
учебник - На порядок выше в С++Builder
Электронный
учебник - С++ для изученных и одаренных
Электронный
учебник - Безопасность жизнедеятельности
www.worldcpp.vingrad.ru
<http://www.worldcpp.vingrad.ru>
www.cpp-exe.ucoz.ru
<http://www.cpp-exe.ucoz.ru>.web.znu.edu.ua
www.borland.xportal.ru
<http://www.borland.xportal.ru>
www.yestravel.ru
<http://www.yestravel.ru>.ru.wikipedia.org
Справочная
карта Казахстана серии «Страны мира»
Справочная
карта мира серии «Весь мир»/C++ в задачах и примерах. Культин Н.Б. -
Санкт-Петербург, 2006 г., - 288 c./C++ и Borland C++ Builder для начинающих.
Пахомов Б.И. - BHV-Санкт-Петербург, 2005 г., - 628 c./C++. Программирование на
языке высокого уровня. Павловская Т.А. - Питер, 2007 г,- 461с.: полное
руководство. Сухарев М - Наука и техника, 2008 г.,- 1035 с.7. Хомоненко. - БХВ
- Санкт-Петербург, 2007 г., - 1216 с.++ начала программирования. Ишкова Э. А. -
Бином., 2009 г., - 368 с./C++ в задачах и примерах. Культин Н. Б. - БХВ-Петербург,
2008 г., 281 с.++.Объектно-ориентированное программирование: Практикум.
Павловская Т. А. - Питер, 2008 г. 264 с.++. Просто как дважды два. Красиков И.
В., Красикова И. Е. - Эксмо-Пресс, 2007 г., - 231 с.2005 для Win32.
Дарахвелидзе П.Г., Марков Е.П., - БХВ-Петербург, 2005 г., - 1112 с.в задачах и
примерах. Культин Н., - БХВ-Петербург 2008 г.,-288C++ Builder. Рейсдорф К.,
Калверт Ч., - серия: "Энциклопедия программиста", ДиаСофт 2005 г., -
310с.
C++ Builder Borland Developer Studio
2006. Для
профессионалов. Шамис Владимир, - Питер, серия: "Для профессионалов",
- 2007 г., 457 с.
Технологии
C++Builder. Разработка приложений для бизнеса. Бобровский Сергей. - Питер,
серия: "Учебный курс" 2007 г., 574 с.
Атлас
мира. Обзорно-географический. АСТ, Астрель
Приложение
Главная форма
Кнопка Показать (выбранный раздел программы)
void __fastcall
TForm1::Button1Click(TObject *Sender)
{(RadioButton1->Checked==true)Form11->Show();(RadioButton2->Checked==true)Form10->Show();(RadioButton3->Checked==true)Form12->Show();(RadioButton4->Checked==true)Form13->Show();
}__fastcall
TForm1::SpeedButton4Click(TObject *Sender)
{(RadioButton1->Checked==true)Form11->Show();(RadioButton2->Checked==true)Form10->Show();(RadioButton3->Checked==true)Form12->Show();(RadioButton4->Checked==true)Form13->Show();
}
Кнопка Выключить
и
включить
звук__fastcall
TForm1::SpeedButton3Click(TObject *Sender)
{->MediaPlayer1->FileName="..\\AsiaGid\\music\\11.wav";->MediaPlayer1->Open();->MediaPlayer1->Play();->Enabled=false;
}__fastcall TForm1::BitBtn1Click(TObject
*Sender)
{->Enabled=true;->MediaPlayer1->FileName="..\\AsiaGid\\music\\7.mp3";->MediaPlayer1->Open();->MediaPlayer1->Play();
}
Кнопка Курорты__fastcall
TForm1::Button2Click(TObject *Sender)
{->Show();
}
Дата и время на панели
void __fastcall
TForm1::Timer1Timer(TObject *Sender)
{->Caption=Time().FormatString("hh:mm:ss");->Interval=1;->Caption=Date().FormatString("dd:mm:yyyy");
Timer1->Interval=10;
}
Подсказки в нижней части панели
void __fastcall
TForm1::RadioButton4Click(TObject *Sender)
{(RadioButton4->Checked==true)Label6->Caption="Сведения,
о
площади
островов,
самых
крайних
точках
Азии
и
др.";
}__fastcall
TForm1::RadioButton1Click(TObject *Sender)
{(RadioButton1->Checked==true)Label6->Caption="История
возникновения
названия";
}__fastcall
TForm1::RadioButton2Click(TObject *Sender)
{(RadioButton2->Checked==true)Label6->Caption="Список
всех Азиатских государств, а так же подробное их описание"}
void __fastcall
TForm1::RadioButton3Click(TObject *Sender)
{(RadioButton3->Checked==true)Label6->Caption="Характеристика
населения";
}__fastcall
TForm1::RadioButton5Click(TObject *Sender)
{(RadioButton5->Checked==true)Label6->Caption="Расположение
на
материке
Евразия";
}__fastcall
TForm1::RadioButton6Click(TObject *Sender)
{(RadioButton6->Checked==true)Label6->Caption="Политическая,
физическая карты Азии, а так же карта из космоса";
}__fastcall
TForm1::RadioButton5Click(TObject *Sender)
{
}__fastcall
TForm1::RadioButton6Click(TObject *Sender)
{(RadioButton6->Checked==true)Label6->Caption="Политическая,
физическая карты Азии, а так же карта из космоса";
}__fastcall
TForm1::RadioButton7Click(TObject *Sender)
{
(RadioButton7->Checked==true)Label6->Caption="Физико-географические
районы";
}__fastcall
TForm1::RadioButton8Click(TObject *Sender)
{(RadioButton8->Checked==true)Label6->Caption="Местоположение
Посольств
Казахстана
в
странах
Азии";
}
Меню
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Музыкальное сопровождение__fastcall
TForm1::Form1Create(TObject *Sender)
{->MediaPlayer1->FileName="..\\AsiaGid\\music\\7.mp3";->MediaPlayer1->Open();->MediaPlayer1->Play();
}
Заставка программы__fastcall
TForm1::Form1Create(TObject *Sender)
{= new TForm4(this);
Form4->ShowModal();
Form4->Free();
}
Раздел «Происхождение названия»
void __fastcall
TForm11::RichEdit1Change(TObject *Sender)
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\25.rtf");
}=picture=Load=путь
к
файлу=OK=picture=Load=путь
к
файлу=OK
Меню
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Печать__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)=c:\
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Раздел «Государства»
Кнопка Поиск
void __fastcall
TForm10::Button3Click(TObject *Sender)
{->Visible=true;(DBGrid1->Handle,SB_VERT,true);(DBGrid1->Handle,SB_VERT,true);Str2;dz2,m1,m2,m3;=Edit1->Text;SearchOptions;<<loPartialKey<<loCaseInsensitive;=Form10->ADOTable1->Locate("Государство",Str2,SearchOptions);=Form10->ADOTable1->Locate("Столица",Str2,SearchOptions);=Form10->ADOTable1->Locate("Валюта",Str2,SearchOptions);=Form10->ADOTable1->Locate("Телефонный
код",Str2,SearchOptions);
}
Подключение базы
данных:
=ADOTable=true:=false=Build=Поставщик
данных=Microsoft
Jet 4.0=путь
к
базе=true=ADOConnection1=true=ltReadOnly=true=государства=true:=bsSingle=clTeal=DataSource1=true=true
Раздел «Население»__fastcall
TForm12::RichEdit1Change(TObject *Sender)
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\26.rtf");
}
Меню
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Печать__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)=c:\
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Раздел «Основные сведения»
void __fastcall
TForm13::RichEdit1Change(TObject *Sender)
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\27.rtf");
}=picture=Load=путь
к
файлу=OK=picture=Load=путь
к
файлу=OK
Меню
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Печать__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)=c:\
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Раздел «Расположение на материке»
void __fastcall TForm8::RichEdit1Change(TObject
*Sender)
{->Lines->LoadFromFile("..\\AsiaGid\\doc\\24.rtf");
}
Меню
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Печать__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)=c:\
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Раздел «Азия на карте»
void __fastcall
TForm5::ComboBox1Change(TObject *Sender)
{(ComboBox1->ItemIndex==0)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\2.bmp");(ComboBox1->ItemIndex==1)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\7.bmp");(ComboBox1->ItemIndex==2)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\3.bmp");(ComboBox1->ItemIndex==3)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\6.bmp");(ComboBox1->ItemIndex==4)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\5.bmp");(ComboBox1->ItemIndex==5)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\6.jpg");(ComboBox1->ItemIndex==6)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\7.jpg");(ComboBox1->ItemIndex==7)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\8.bmp");(ComboBox1->ItemIndex==8)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\9.bmp");(ComboBox1->ItemIndex==9)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\10.bmp");(ComboBox1->ItemIndex==10)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\11.bmp");(ComboBox1->ItemIndex==11)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\12.bmp");(ComboBox1->ItemIndex==12)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\13.bmp");(ComboBox1->ItemIndex==13)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\14.bmp");(ComboBox1->ItemIndex==14)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\15.bmp");(ComboBox1->ItemIndex==15)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\16.bmp");
}=Text=Выберите государство
Меню
Печать
void __fastcall
TForm5::N7Click(TObject *Sender)
{(!Form5->PrintDialog1->Execute())
return;PPIx = GetDeviceCaps(Printer()->Handle, LOGPIXELSX);PPIy =
GetDeviceCaps(Printer()->Handle, LOGPIXELSY);SmX = PPIx / 2, SmY = PPIy /
3;WInch = 10, HInch = 7; // длина()->Orientation
= poLandscape;x = Printer()->PageWidth;y = Printer()->PageHeight;*Prntr =
Printer();>BeginDoc();>Canvas->Draw(10,10,
Image2->Picture->Graphic);>EndDoc();
}
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall TForm1::N4Click(TObject
*Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Раздел «Районы»
Западная Азия
void __fastcall
TForm14::RadioButton1Click(TObject *Sender)
{(RadioButton1->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\111.rtf");
}
Южная Азия__fastcall
TForm14::RadioButton3Click(TObject *Sender)
{(RadioButton3->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\33.rtf");
}
Юго-Восточная
Азия__fastcall
TForm14::RadioButton4Click(TObject *Sender)
{(RadioButton4->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\44.rtf");
}
Восточная Азия__fastcall
TForm14::RadioButton5Click(TObject *Sender)
{(RadioButton5->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\55.rtf");
}
Северная Азия__fastcall
TForm14::RadioButton6Click(TObject *Sender)
{(RadioButton6->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\66.rtf");
}
Средняя Азия__fastcall
TForm14::RadioButton7Click(TObject *Sender)
{(RadioButton7->Checked==true)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\77.rtf");
}
Меню
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Печать__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)=c:\
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Раздел Посольства Казахстана в Азии
void __fastcall
TForm15::ComboBox1Change(TObject *Sender)
{(ComboBox1->ItemIndex==0)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\6.rtf");(ComboBox1->ItemIndex==1)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\21.rtf");(ComboBox1->ItemIndex==2)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\1.rtf");(ComboBox1->ItemIndex==3)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\2.rtf");(ComboBox1->ItemIndex==4)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\7.rtf");(ComboBox1->ItemIndex==5)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\4.rtf");(ComboBox1->ItemIndex==6)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\8.rtf");(ComboBox1->ItemIndex==7)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\10.rtf");(ComboBox1->ItemIndex==8)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\17.rtf");(ComboBox1->ItemIndex==9)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\12.rtf");(ComboBox1->ItemIndex==10)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\9.rtf");(ComboBox1->ItemIndex==11)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\13.rtf");(ComboBox1->ItemIndex==12)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\5.rtf");(ComboBox1->ItemIndex==13)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\16.rtf");(ComboBox1->ItemIndex==14)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\3.rtf");(ComboBox1->ItemIndex==15)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\15.rtf");(ComboBox1->ItemIndex==16)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\20.rtf");(ComboBox1->ItemIndex==17)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\14.rtf");(ComboBox1->ItemIndex==18)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\18.rtf");(ComboBox1->ItemIndex==19)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\19.rtf");(ComboBox1->ItemIndex==20)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\posol\\11.rtf");(ComboBox1->ItemIndex==0)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag3.jpg");(ComboBox1->ItemIndex==2)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag4.jpg");(ComboBox1->ItemIndex==1)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag5.jpg");(ComboBox1->ItemIndex==3)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag6.jpg");(ComboBox1->ItemIndex==4)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag7.jpg");(ComboBox1->ItemIndex==5)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag8.jpg");(ComboBox1->ItemIndex==6)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag9.jpg");(ComboBox1->ItemIndex==7)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag10.jpg");(ComboBox1->ItemIndex==8)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag11.jpg");(ComboBox1->ItemIndex==9)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag12.jpg");(ComboBox1->ItemIndex==10)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag13.jpg");(ComboBox1->ItemIndex==11)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag14.jpg");(ComboBox1->ItemIndex==12)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag15.jpg");(ComboBox1->ItemIndex==13)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag1.jpg");(ComboBox1->ItemIndex==14)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag16.jpg");(ComboBox1->ItemIndex==15)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag17.jpg");(ComboBox1->ItemIndex==16)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag18.jpg");(ComboBox1->ItemIndex==17)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag19.jpg");(ComboBox1->ItemIndex==18)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag20.jpg");(ComboBox1->ItemIndex==19)Image2->Picture
>LoadFromFile("..\\AsiaGid\\foto\\flag22.jpg");
Меню
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Печать__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)=c:\
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile =
"..\\AsiaGid\\doc\\help.hlp";>HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}
Раздел Курорты__fastcall
TForm9::ComboBox1Change(TObject *Sender)
{(ComboBox1->ItemIndex==0)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\1.rtf");(ComboBox1->ItemIndex==1)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\2.rtf");(ComboBox1->ItemIndex==2)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\3.rtf");(ComboBox1->ItemIndex==3)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\4.rtf");(ComboBox1->ItemIndex==4)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\5.rtf");(ComboBox1->ItemIndex==5)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\6.rtf");(ComboBox1->ItemIndex==6)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\7.rtf");(ComboBox1->ItemIndex==7)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\8.rtf");(ComboBox1->ItemIndex==8)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\9.rtf");(ComboBox1->ItemIndex==9)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\10.rtf");(ComboBox1->ItemIndex==10)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\11.rtf");(ComboBox1->ItemIndex==11)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\12.rtf");(ComboBox1->ItemIndex==12)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\13.rtf");(ComboBox1->ItemIndex==13)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\23.rtf");(ComboBox1->ItemIndex==14)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\14.rtf");(ComboBox1->ItemIndex==15)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\15.rtf");(ComboBox1->ItemIndex==16)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\16.rtf");(ComboBox1->ItemIndex==17)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\17.rtf");(ComboBox1->ItemIndex==18)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\18.rtf");(ComboBox1->ItemIndex==19)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\19.rtf");(ComboBox1->ItemIndex==20)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\20.rtf");(ComboBox1->ItemIndex==21)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\21.rtf");(ComboBox1->ItemIndex==22)RichEdit1->Lines
>LoadFromFile("..\\AsiaGid\\doc\\22.rtf");
}
Меню
Сохранить как__fastcall
TForm11::N7Click(TObject *Sender)
{(SaveDialog1->Execute())RichEdit1->Lines->SaveToFile(SaveDialog1
>FileName);
}
Печать__fastcall
TForm11::N6Click(TObject *Sender)
{(PrintDialog1->Execute())RichEdit1->Print("");
}:=c:\Документ.rtf=Текстовый
редактор
(*.rtf)=c:\
Выход из
программы__fastcall
TForm1::N5Click(TObject *Sender)
{->Close();
}
Справка Азиатские
государства__fastcall
TForm1::N6Click(TObject *Sender)
{>HelpFile = "..\\AsiaGid\\doc\\help.hlp";
Application->HelpCommand(HELP_CONTENTS, 0);
}
Автор__fastcall
TForm1::N4Click(TObject *Sender)
{->Show();
}
О программе__fastcall
TForm1::N3Click(TObject *Sender)
{->Show();
}