Автор работы: Пользователь скрыл имя, 27 Декабря 2011 в 20:10, курсовая работа
В данной курсовой работе предложено создать Windows-приложение на алгоритмическом языке Object Pascal в среде визуального программирования Delphi. Разработчику ставиться вполне определенная задача, при выполнении которой используются навыки работы с операционными системами, программными оболочками, разнообразными служебными и сервисными средствами. А также навыки по алгоритмизации и программированию в интегрированной визуальной среде программирования Delphi.
Введение 5
1. Постановка задачи 8
1.1 Назначение и функции программы 8
1.2 Информационная база задачи 8
1.2.1 Входная информация 8
1.2.2 Выходная информация 9
1.3 Система меню 9
1.4 Система помощи 9
1.5 Контрольные примеры 10
1.6 Алгоритм программы 11
1.7 Обзор языка программирования и среды разработки программ. 11
2. Описание программы 18
2.1 Описание модулей программы 18
3. Описание применения 20
Заключение 22
Список используемых источников 23
Компилятор, встроенный в Delphi, обеспечивает высокую производительность, необходимую для построения приложений в архитектуре “клиент-сервер”. Этот компилятор в настоящее время является самым быстрым в мире. Он предлагает легкость разработки и быстрое время проверки готового программного блока и в то же время обеспечивает качество кода.
Основной
упор объектно-ориентированной
Cреда Delphi включает в себя полный набор визуальных инструментов для скоростной разработки приложений (RAD - rapid application development), поддерживающей разработку пользовательского интерфейса. VCL - библиотека визуальных компонент, включает в себя стандартные объекты построения пользовательского интерфейса, объекты управления данными, графические объекты, объекты мультимедиа, диалоги и объекты управления файлами, управление DDE и OLE.
В данной курсовой предложено создание приложения с помощью компонент страниц Dialogs и Samples.
TOpenDialog и TSaveDialog - диалоги открытия и сохранения файлов
Эти
компоненты имеют идентичные свойства
и поэтому рассматриваются
Компоненты TOpenDialog и TSaveDialog предназначены для организации стандартных диалоговых окон.
Свойства:
FileName: String;
-
позволяет на входе в
InitialDir: String;
-
позволяет установить
Filter: String
-
позволяет установить фильтр
файлов, показываемых в диалоговом
окне. Представляет собой любое
количество пар
Filter := ’Текстовые файлы (*.txt, *.doc)|*.txt, *.doc’;
Компонент TOpenPictureDialog и TSavePictuteDialog
Компоненты TOpenPictureDialog и TSavePictuteDialog позволяют организовать специальные диалоги открытия и сохранения графических изображений. В них предусмотрены стандартные фильтры для выбора графических файлов (с расширениями bmp, ico, wmf и emf). Во-вторых, в окна диалога включены панели для предварительного просмотра выбираемого файла.
TColorDialog
Этот компонент позволяет выбрать стандартный цвет, либо задать собственный. Основным свойством данного компонента является
Color: TColor;
в котором содержится выбранный цвет.
Компонент TFontDialog
С помощью этого компонент можно выбрать шрифт из множества шрифтов Windows.
Свойства компонента TFontDialog задаются множеством:
Device =(fdScreen, fdPrinter);
-
указывает, для какого
Font: TFont;
- содержит описание выбранного шрифта.
Пример. Пусть на форме расположены компоненты SpeedButton1, FontDialog1, Labe1 и ColorDialog1. По нажатию на SpeedButton1 необходимо осуществить последовательно диалоги выбора цвета и шрифта. Пример:
Procedure TForm1.Button1Click( );
begin
if ColorDialog1.Execute then
Form1.Color := ColorDialog1.Color;
if FontDialog1.Execute then
Label1.Font := FontDialog1.Font;
end;
Компонент TPrintDialog
Эта компонента позволяет организовать управление принтером и устанавливать его свойства.
Свойства:
Collate: Boolean;
Если
Collate = true;
то можно использовать свойство CheckBox “Разобрать”. При этом сначала будет печататься первая копия, затем вторая и т.д.;
Если
Collate = false;
сначала будут печататься все первые страницы, затем вторые и т.д.;
Copies: Integer
-
указывает количество копий.
FromPage: Integer
- определяет начальную страницу печати;
ToPage : Integer
- определяет конечную страницу печати;
PrintRange =(prAllPages, prSelection, prPageNums);
-
определяет диапазон
TPrinterSetupDialog - диалог настройки параметров принтера
Компонент
создает окно настройки параметров
принтера, вид которого зависит от
типа принтера. Этот диалог взаимодействует
с драйвером принтера и не возвращает
в программу никакой
TFindDialog - диалог поиска
Стандартное диалоговое окно компонента TFindDialog используется для поиска фрагмента текста.
Свойства компонента:
property FindText: String; | Указывает образец для поиска |
property Left: Integer; | Содержит горизонтальную позицию левого верхнего угла места появления окна |
property Options: TFindOptions; | Определяет настройку диалога (см. ниже) |
property Position: TPoint; | Содержит горизонтальную и вертикальную позицию левого верхнего угла места появления окна |
property Top: Integer; | Содержит вертикальную позицию левого верхнего угла места появления окна |
TReplaceDialog - диалог поиска и замены
Компонент TReplaceDialog создает и обслуживает окно поиска и замены текстового фрагмента.
Класс TReplaceDialog является прямым потомком класса TFindDialog и наследует от него большинство свойств. Дополнительно в компоненте определено свойство ReplaceText: string, в котором содержится текст замены, и событие OnReplace, которое возникает при нажатии кнопки заменить или заменить все.
4. Компоненты страницы
Samples
TGauge это графически улучшенный ProgressBar. Содержит в себе надпись процента выполнения действия. В свойствах MinValue, MaxValue, Progress указаны соответственно минимальное, максимальное и текущее значение. Свойство BackColor содержит цвет фона, а ForeColor - цвет заполнения. Свойством Kind можно задать разный тип отображения индикатора.
Он отличается от TProgress разнообразием форм.
property BackColor: TColor; property ForeColor: TColor; TGaugeKind = (gkText, gkHorizon-talBar, gkVerticalBar, gkPie, gkNeedle) ; | Цвет незакрашенной части индикатора Цвет закрашенной части индикатора Определяет форму индикатора |
property Kind: TGaugeKind; property MaxValue: Longint; | Определяет максимальное значение диапазона изменения свойства progress |
property MinValue: Longint; | Определяет минимальное значение диапазона изменения свойства progress |
property PercentDone: Longint; | Содержит текущее значение progress в процентах от его диапазона изменения |
property Progress: Longing; | Содержит текущее значение изменяющейся числовой величины |
property ShowText: Boolean; | Если содержит True, в центре компонента выводится строковое представление значения PercentDone |
TColorGrid - выбор или отображение цвета
Компонент предназначен для выбора и/или отображения цветов из 16-цветной палитры. Выбирать/отображать можно два цвета: основной и фоновый. Основной выбирается щелчком левой кнопки мыши и отображается символами fg, фоновый выбирается правой кнопкой и отображается символами bg (если оба цвета совпадают, соответствующая клетка таблицы помечается символами fb).
Индекс
цвета - это число в диапазоне
0... 15, указывающее номер
Пары свойств BackgroundEnabled - ClickEnablesColor И ForegroundEnabled - ClickEnablesColor запрещают выбор и отображение соответствующего цвета только в том случае, когда каждое из них имеет значение False. Однако даже в этом случае свойство selection хранит номер ячейки таблицы, по которой последний раз был произведен щелчок левой или правой кнопкой мыши. Это свойство изменяется до возникновения события от мыши и при необходимости может использоваться для выбора цвета без его отображения. С помощью метода
function ColorToIndex(AColor: TColor): Integer;
программа может получить индекс табличного цвета, наиболее близкого к цвету AColor. Событие
property OnChange: TNotifyEvent;
возникает
только при разрешенном выборе/
TSpinEdit по своему функциональному назначению схож с компонентом TUpDown (страница Win32). Значение Value видно сразу в момент его изменения в индикаторе. Кроме того значение можно корректировать с помощью цифр.
Компонент TSpinEdit предназначен для ввода/отображения числа. Он представляет собой комбинацию специализированного потомка однострочного редактора rcustomEdit и кнопок TSpinButton. Редактор способен вводить только числа (в этом и заключается его специализация), а кнопки используются для изменения числа на некоторую фиксированную величину.
TDirectoryOutline показывает древовидный список каталогов.
TCalendar - календарь. Свойство Year, Month, Day (год, месяц, день) разбиты на три отдельные части.
В отличие от компонента TUpDown компонент TSpinButton не связан с регулированием числовой величины и может использоваться просто как пара кнопок: верхняя (up) и нижняя (Down). Для компонента следует написать обработчики его событий onup-click и onDownclick, в которых реализуется реакция программы на щелчок по той или иной кнопке.
Рисунки на кнопках определяются свойствами upGlyph и DownGlyph. Каждый рисунок может содержать 1, 2 или 3 изображения: 1-е - для нормальной кнопки, 2-е - для запрещенной, 3-е - для нажатой.
В этом разделе приводится описание модулей программы в которых реализован ввод/вывод и сохранение данных, изменения всех окон формы, то есть решение поставленной задачи,
Если количество записей, необходимых ввести в таблицу, превышает количество установленных строк таблицы, то создаём кнопку «Добавить» и разрешаем появление полос прокрутки, что позволяет ввести нужное количество информации в таблицу.
Если количество введённых записей при использовании программы не нужно, то создадим кнопку «Очистить», что позволяет одним нажатием этой кнопки очистить все ячейки.
Информация о работе Программирование в Delphi. Компоненты страниц Dialogs и Samples