новая папка 1 / Ministerstvo_obrazovania_i_nauki_Rossyskoy_Fed

Министерство образования и науки Российской Федерации

ФЕДЕРАЛЬНОЕ ГОСУДАРСТВЕННОЕ БЮДЖЕТНОЕ

ОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ

ВЫСШЕГО ПРОФЕССИОНАЛЬНОГО ОБРАЗОВАНИЯ

«ОРЕНБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ»

Факультет информационных технологий

Кафедра информатики

ОТЧЕТ

по лабораторной работе № 1

по дисциплине «Программирование»

Знакомство с графическим интерфейсом интегральной среды программирования Delphi и разработка простейших элементов интерфейса среды Delphi

Руководитель

преподаватель

Е.А. Мучкаева

«___» ______________ 2015г.

Исполнитель

студент группы 14ПО(ба)Ин

А.М.Зобова

«___» ______________ 2015г.

Оренбург 2015

Цель: Знакомство с графическим интерфейсом среды Delphi и обучение применению основных объектов среды программирования Delphi в написании простейшего интерфейса.

Задание. Создать приложение, в котором при щелчке пользователя по кнопке появится надпись «Это мое первое приложение!».

Теоретическая часть:

1. Запустите программу Delphi,откройте новое приложение, для этого необходимо выполнить команду File | New.

2. На пустую форму, которая открылась, перенесите кнопку типа TButton со страницы Standard палитры компонентов. Для этого выделите пиктограмму кнопки и затем щелкните курсором мыши в нужном месте формы. На форме появится кнопка, которой Delphi присвоит имя по умолчанию — Button1.

3. Аналогичным образом перенесите на форму с той же страницы Standard палитры компонентов метку Label - . Delphi присвоит ей имя Label 1 - . В этой метке в процессе выполнения приложения будет появляться текст при нажатии пользователем кнопки .

4. Выделите на форме компонент Button1 —один раз щелкните мышью. Перейдите в Инспектор Объектов и измените ее свойство Caption (надпись), которое по умолчанию равно Button1 на «Пуск».

Рис 9. Окно Инспектора Объектов

6. Укажите метке Label1, что надписи на ней надо делать жирным шрифтом. Для этого выделите метку, в окне Инспектора Объектов раскройте двойным щелчком свойство Font (шрифт), затем так же двойным щелчком раскройте подсвойство Style (стиль) и установите в true свойство fsBold (жирный).

7. Сотрите текст в свойстве Caption метки Label1, чтобы он не высвечивался, пока пользователь не нажмет кнопку приложения.

Теперь вам осталось только написать оператор, который заносил бы в свойство Caption метки Label1 нужный текст в нужный момент. Этот момент определяется щелчком пользователя на кнопке. При щелчке в кнопке генерируется событие OnClick. Следовательно, обработчик этого события вы и должны написать.

8. Выделите кнопку Button1 на форме, перейдите в Инспектор Объектов, откройте в нем страницу событий (Events), найдите событие кнопки OnClick и сделайте двойной щелчок в окне справа от имени этого события. Это стандартный способ задания обработчика любых событий. Вы окажетесь в окне Редактора Кода – Unit1.pas, в котором будет текст (см. рис. 12).

Рис 12. Окно Редактора кода

Заголовок этой процедуры складывается из имени класса вашей формы (TFormI), имени компонента (Button1) и имени события без префикса On (Click).

9. Напишите в обработчике оператор задания надписи метки Label1. Полностью обработчик события имеет вид:

Практическая часть:

Для изменения надписи на метке TButton я использовала Инспектор Объектов и изменила ее свойство Caption,которое по умолчанию равно Button1.

Для того, чтобы в метке Label1 надписи были жирным шрифтом необходимо выделить эту метку в окне Инспектор Объектов,раскрыть двойным щелчком свойство Front,затем так же раскрыть подствойство Style и установить true в свойство fsBold.

Так же использовался стандартный способ задания обработчика любых событий,для этого выделяем кнопку Button1 на форме и в Инспекторе Объектов открываем страницу событий,находим кнопку OnClick и делаем двойной щелчок в окне справа от данного события.

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Caption:='Это моe первое приложение!';

end;

end.

Вывод:

В работе были использованы следующие объекты, их свойства, события:

Объекты: TForm–Окно формы,TLabel–Текст, метка,TButton – Кнопка

Свойства:

Caption – Заголовок окна или надпись на кнопке или метке,Font – Шрифт объекта,Color -Цвет объекта,Name – Имя объекта

События:OnClick-Событие возникает при нажатии кнопки TButton или при щелчке мышью на объекте