Министерство образования и науки Украины

Криворожский колледж НАУ

Программирование

(Delphi)

Методические рекомендации по выполнению лабораторных работ

для курсантов специальности 6.050102

«Компьютерные системы и сети»

г.Кривой Рог

2007г.

Разработал преподаватель Терешина С.С.

Рецензент Андрусевич Н.В.

Программирование (Delphi)

Методические рекомендации по выполнению лабораторных работ

для курсантов специальности 6.050102

«Компьютерные системы и сети». Кривой Рог 2007г

Лабораторная работа №1

Создание объектов в среде Delphi. Изменение свойств объектов.

Цель занятия:

Освоение принципов создания простейших объектов в среде Delphi.

Изучение свойств инспектора объектов.

Получение практических навыков работы объектно-ориентированного программирования.

Вопросы для коллоквиума.

1. Укажите основные составные части Delphi.

2. Дайте определение Редактору форм.

3. Укажите назначение палитры компонент.

4. Для чего предназначен Редактор кода.

Порядок выполнения работы.

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

1. Откройте новый проект, выбрав пункт меню File | New Project. Затем положите на форму объекты TMemo, TButton, и TListBox, как показано на рис.1.

Рис.1: Простой объект TForm с компонентами TMemo, TButton, и TListBox.

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

3. Установите значение свойства AutoSize False. Вернитесь на форму и установите начальный вид.

4. Нажмите клавишу <Shift> и щелкните на TMemo и затем на TListBox. Теперь оба объекта имеют по краям маленькие квадратики, показывающие, что объекты выбраны.

5. Рассмотрим изменение свойств объектов на примере свойства Color. Есть три способа изменить его значение в Инспекторе Объектов. Первый - просто напечатать имя цвета (clRed) или номер цвета. Второй путь - нажать на маленькую стрелку справа и выбрать цвет из списка. Третий путь - дважды щелкнуть на поле ввода свойства Color. При этом появится диалог выбора цвета.

6. Свойство Font работает на манер свойства Color. Чтобы это посмотреть, сначала выберите свойство Font для объекта TMemo и дважды щелкните мышкой на поле ввода. Появится диалог настройки шрифта. Выберите, например, шрифт New Times Roman и установите какой-нибудь очень большой размер, например 72. Затем измените цвет фона с помощью ComboBox’а в нижнем правом углу окна диалога. Когда Вы нажмете кнопку OK, Вы увидите, что вид текста в объекте TMemo радикально изменился.

7. Дважды щелкните на свойство Items объекта ListBox. Появится диалог, в котором Вы можете ввести строки для отображения в ListBox. Напечатайте несколько слов, по одному на каждой строке, и нажмите кнопку OK. Текст отобразится в ListBox’е.

8. Сохраните программу. Первый шаг - создать поддиректорию для программы. После создания поддиректории для хранения Вашей программы нужно выбрать пункт меню File | Save Project. Сохранить нужно будет два файла. Первый - модуль (unit), над которым Вы работали, второй - главный файл проекта, который "владеет" Вашей программой. Сохраните модуль под именем Lab1.PAS и проект под именем Lab1.DPR. (Любой файл с расширением PAS и словом “unit” в начале является модулем. Второй способ сохранения программы – наведите курсор мыши на пиктограмму Save All и щелкните по ней. Далее все как в первом способе.

9. С оздайте новый проект. Поместите на форму объект TMemo, а затем TEdit так, чтобы он наполовину перекрывал TMemo, как показано на рис.2. Теперь выберите пункт меню Edit | Send to Back, что приведет к перемещению TEdit вглубь формы, за объект TMemo. Это называется изменением Z-порядка компонент. Буква Z используется потому, что обычно математики обозначают третье измерение буквой Z. Так, X и Y используются для обозначения ширины и высоты, и Z используется для обозначения глубины. Если Вы “потеряли” на форме какой-то объект, то найти его можно в списке Combobox’а, который находится в верхней части Инспектора Объектов.

10. Поместите кнопку TButton в нижнюю часть формы. Теперь растяните Инспектор Объектов так, чтобы свойства Name и Caption были видны одновременно на экране. Теперь измените имя кнопки на Terminate. Заметьте, что заголовок (Caption) поменялся в тот же момент. Такое двойное изменение наблюдается только если ранее не изменялось свойство Caption. Текст, который Вы видите на поверхности кнопки - это содержимое свойства Caption, свойство Name служит для внутренних ссылок, Вы будете использовать его при написании кода программы. Если Вы откроете сейчас окно Редактора, то увидите следующий фрагмент кода:

TForm1 = class(TForm)

Edit1: TEdit;

Memo1: TMemo;

Terminate: TButton;

private

{ Private declarations }

public

{ Public declarations }

end;

В этом фрагменте кнопка TButton называется Terminate из-за того, что Вы присвоили это название свойству Name. Заметьте, что TMemo имеет имя, которое присваивается по умолчанию.

2. Сделаете двойной щелчок по кнопке, и соответствующий фрагмент кода автоматически заносится в Редактор. Запишите в редактор код, состоящий из одного слова Close:

procedure TForm1.TerminateClick(Sender: TObject);

begin

Close;

end;

Когда этот код исполняется, то главная форма (значит и все приложение) закрывается.

2. Для проверки кода запустите программу и нажмите кнопку Terminate. Если все сделано правильно, программа закроется и Вы вернетесь в режим дизайна.

3. Выполнить пример представленной программы:

Даны числа А,В,С по возрастанию таким образом, чтобы переменной А соответствовало самое маленькое число, В – среднее, С – наибольшее.

14. Создайте новый проект. Установить на форме 1 следующие компоненты:

• из вкладки Standart выбрать и установить компоненты Edit для ввода данных a,b,c. Навести курсор на компонент Edit, установленный на форме и в свойствах Text убрать появившуюся надпись Edit1(2…).

• Установить на форме 1 сверху над компонентами Edit компоненты Label, выбрав их из вкладки Standart. В свойствах компонента Caption изменить надпись Label1(2..) на имя переменной a,b,c и т.д.

• Установите на форме компонент Button – кнопка для запуска и выполнения программы, в свойстве Caption кнопки укажите – «Выполнить». Точно также создайте кнопки с надписями «Очистить» и «Выход». В результате должна получится форма следующего вида:

15. Ввести составленную программу следующим образом: