- •СОДЕРЖАНИЕ
- •ВВЕДЕНИЕ
- •1.1. Теоретические сведения
- •1.2. Порядок выполнения работы
- •1.3. Содержание отчета
- •1.4. Контрольные вопросы
- •2.1. Теоретические сведения
- •2.2. Порядок выполнения работы
- •2.3. Содержание отчета
- •2.4. Контрольные вопросы
- •2.5. Варианты заданий
- •3.1. Теоретические сведения
- •3.2. Порядок выполнения работы
- •3.3. Содержание отчета
- •3.4. Контрольные вопросы
- •4.1. Теоретические сведения
- •4.1.1. Процедуры
- •4.1.2. Функции
- •4.2. Порядок выполнения работы
- •4.3. Содержание отчета
- •4.4. Контрольные вопросы
- •4.5. Варианты заданий
- •5.1. Теоретические сведения. Работа с компонентами
- •5.2. Порядок выполнения работы
- •5.3. Содержание отчета
- •5.4. Контрольные вопросы
- •5.5. Варианты заданий
- •6.1. Теоретические сведения. Работа с компонентами
- •6.2. Порядок выполнения работы
- •6.3. Содержание отчета
- •6.4. Контрольные вопросы
- •6.5. Варианты заданий
- •7.1. Теоретические сведения
- •7.2. Порядок выполнения работы
- •7.3. Содержание отчета
- •7.4. Контрольные вопросы
- •7.5. Варианты заданий
- •8.1. Теоретические сведения
- •8.2. Работа с компонентами
- •8.3. Порядок выполнения работы
- •8.4. Содержание отчета
- •8.5. Контрольные вопросы
- •8.6. Варианты заданий
- •9.1. Теоретические сведения
- •9.1.1. Методы сортировки
- •9.2. Сортировки обменом
- •9.2.1. Сортировка простым обменом (метод пузырька)
- •9.2.2. Сортировка простым обменом с флагом
- •9.2.3. Сортировка простым обменом с границей
- •9.2.4. Шейкер-сортировка
- •9.2.5. Быстрая сортировка
- •9.3. Сортировки включениями
- •9.3.1. Сортировка простым включением
- •9.3.2. Сортировка бинарными вставками
- •9.3.3. Сортировка Шелла
- •9.4. Сортировки выбором
- •9.4.1. Сортировка простым выбором
- •9.4.2. Пирамидальная сортировка
- •9.5. Сравнительный анализ сортировок
- •9.6. Контрольные вопросы
- •Приложения
- •Приложение А
- •Приложение Б
- •Приложение В
- •Приложение Г
- •ЛИТЕРАТУРА
1.2. Порядок выполнения работы
Изучить структуру интегрированной среды Delphi, свойства основного компонента Form и выполнить контрольные примеры.
Контрольный пример 1.1
Создать простейшее приложение Windows на основе компонента Form. Изучить основные свойства этого компонента.
Решение
1.Открыть новый проект Delphi: File – New Application.
2.В Object Inspector изменить свойство Caption компонента Form1 с 'Form1' на 'Простейшее приложение'.
3.Запустить проект на компиляцию и выполнение с помощью клавиши F9 .
4.Закрыть приложение, нажав на значок
.
5.C помощью Object Inspector для компонента Form1 изменить свойство Color,
задавая ему различные значения, например clRed, clBlue и т.д.
6. Изменить свойства Height и Width компонента Form1, задавая этим свойствам различные значения, например:
Height = 480, 350, 130;
Width = 120, 200, 400.
7. Задавая различные значения свойствам BorderIcons и BorderStyle, запустить проект на компиляцию и выполнение и проанализировать изменения во внешнем виде окна приложения, например:
BorderStyle = bsSizeable, bsSingle, bsDialog, bsToolWindow; BorderIcons:
biSystemMenu = true, false; biMinimize = = true, false; biMaximize = true, false;
8. Аналогично, изменяя свойства FormStyle , Position и WindowState , запустить
проект на выполнение и проанализировать изменения во внешнем виде окна приложения, например:
FormStyle = fsNormal, fsStayOnTop
Position = poDefault, poDesigned, poScreenCenter WindowState = wsNormal, wsMaximized
13
Контрольный пример 1.2
Составить программу для вычисления площади круга произвольного радиуса.
Решение
1.Открыть новый проект Delphi: File – New Application.
2.Поместить на форму четыре компонента: Label1, Label2, Edit1 и Button1
(рис. 1.3).
Рис. 1.3. Вид формы для контрольного примера 1.2
При помещении компонентов на форму можно сразу же задавать их размеры. Для этого после выбора компонента в Палитре компонентов следует указать на форме прямоугольную область, которую займет компонент. Левый угол области определяется щелчком левой клавиши мыши, затем, не отпуская клавиши мыши, нужно переместить указатель мыши в правый нижний угол области.
3.В Object Inspector изменить свойство Caption компонента Form1 с 'Form1' на «Вычисление площади круга».
4.Изменить размеры формы. Для этого можно подвести курсор мыши к любому краю формы и, не отпуская левой клавиши мыши, изменить размеры формы. При этом автоматически будут изменяться свойства Height (Высота) и Width (Ширина), находящиеся в Инспекторе объектов. Положить указанные свойства равными соответственно 350 и 400 (пикселей).
14
Свойства Left и Top задают расстояние от левого верхнего угла монитора до левого верхнего угла формы соответственно. Установить их значения равными 300 и 200 (пикселей) соответственно. В результате форма будет находиться примерно на середине экрана.
5. Установить следующие свойства компонентов Label1 и Label2:
|
Label1 |
Label2 |
Height |
57 |
Любое число |
Width |
129 |
Любое число |
Left |
131 |
100 |
Top |
34 |
218 |
Как и для формы, эти значения можно установить, перемещая компоненты по форме и изменяя их размеры при помощи мыши, либо прибегнув к помощи Инспектора объектов. Кроме того, можно воспользоваться панелью инструментов Align.
Свойство Caption является главным для метки и содержит отображаемый ею текст. Для метки Label1 установить свойство Caption равным «Введите радиус круга и нажмите кнопку Счет». Для метки Label2 свойство Caption будет определяться на этапе выполнения программы.
Свойство AutoSize метки определяет, будет ли размер метки устанавливать автоматически, в зависимости от длины символьной строки, помещенной туда.
Свойство WordWrap (Перенос слов) разрешает, либо запрещает перенос слов, если строка не помещается в метку и свойство AutoSize равно False.
Свойство Aligment (Выравнивание) определяет, как будет выровнен текст внутри метки: по левому краю, по центру или по правому краю.
|
Label1 |
Label2 |
AutoSize |
False |
True |
WordWrap |
True |
False |
Aligment |
taCenter |
taLeftJustify |
15
Для того чтобы установить характеристики шрифта, выбрать свойство Font в Инспекторе объектов. Щелкнуть по кнопке с тремя точками, появившейся в правой колонке. На экране появится окно «Выбор шрифта».
При помощи этого окна установить следующие характеристики шрифтов для меток Label1 и Label2:
|
Label1 |
Label2 |
Шрифт |
Times New Roman |
Arial |
Начертание |
Полужирный |
Курсив |
Размер |
10 |
11 |
6. Установить в Инспекторе объектов для компонентов Edit1 и Button1
следующие значения свойств Height, Width, Left и Top:
|
Edit1 |
Button1 |
Height |
21 |
25 |
Width |
193 |
75 |
Left |
31 |
285 |
Top |
146 |
146 |
Свойство Text является основным для компонента Edit1 и предназначено для ввода (или вывода) символьных строк. Задать в качестве значения этого свойства пустую строку.
Для компонента Button1 в качестве значения свойства Caption положить символьную строку Счет.
7. Все использующиеся в программе компоненты обладают именами, задаваемыми в имеющемся у них свойстве Name (Имя). Имена компонентов генерируются автоматически интегрированной средой Delphi при создании компонента, например при размещении компонента на форме. Для образования имени компонента используется имя класса с отброшенной первой буквой Т. В конце имени добавляется цифра, указывающая под каким порядковым номером в своем классе появился на свет компонент.
16
8. Чтобы создать заготовку обработчика события OnClick, необходимо выполнить двойной щелчок мышью по кнопке Button1. В результате окно редактора кода станет активным и будет содержать заготовку обработчика события.
Добавить в заготовку код для вычисления площади круга:
procedure TForm1.Button1Click(Sender: TObject); var r,s:real;
begin r:=StrToFloat(Edit1.Text); s:=pi*sqr(r);
Label2.Caption:='Площадь круга равна' + FloatToStrF(s,ffGeneral,7,2);
end;
9.Перед запуском программы ее необходимо сохранить. Для этого выполнить команду главного меню: File – Save All.
10.Сохранив проект, запустить его на выполнение. В случае отсутствия ошибок, на экране монитора появится окно программы (рис. 1.4).
Рис. 1.4. Результат выполнения программы для контрольного примера 1.2
17
