Системные события

   Слободской  государственный колледж педагогики и социальных отношений

  Дисциплина: Основы объектно-ориентрованного  программирования

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

Время на выполнение – 10 часов. 

Тема: Системные события

Цель: Совершенствование навыков использования компонентов в Delphi.

Основные  теоретические положения

 

     Компонент – это оформленный специальным  образом класс. Его свойства могут  меняться на этапе «сборки» программы  с помощью Инспектора объектов (Object Inspector). Все изменения сразу же отображаются на экране монитора, поэтому такой подход позволяет быстро создавать интерфейсную часть приложения. Как известно, эта часть занимает обычно до 80% работы программиста.

     Компоненты Delphi объединены в библиотеку VCL – Visual Component Library (библиотеку визуальных компонентов). Все компоненты Delphi можно разделить следующим образом (см. схему).

Невидимые компоненты представляют собой, как правило, компоненты, с  помощью которых осуществляется доступ к системным ресурсам, например, к системному таймеру. Они отображаются во время конструирования интерфейса, но не видны во время работы приложения.

     Элементы  управления дают возможность пользователю во время работы программы получать информацию и/или управлять работой  программы.

     Оконные элементы управления могут принимать фокус ввода (становятся выделенными), они являются окнами системы Windows и обладают всеми свойствами окна, т.е. имеют уникальный идентификатор Windows и получают сообщения от операционной системы.

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

     Иерархия  классов Delphi представляет собой удачно подобранную иерархию базовых классов. Во многом это объясняется тем, что традиционно в среде Windows было достаточно сложно реализовывать пользовательский интерфейс. Событийная модель в Windows всегда была сложна для понимания и отладки. Но именно разработка интерфейса в Delphi является самой простой задачей для программиста.

     Среда Delphi включает в себя полный набор  визуальных инструментов для быстрой разработки приложений (Rapid Application Development – RAD), поддерживающей разработку пользовательского интерфейса и подключение к корпоративным базам данных. VCL – библиотека визуальных компонент, включает в себя стандартные объекты построения пользовательского интерфейса, объекты управления данными, графические объекты, объекты мультимедиа, диалоги и объекты управления файлами, управление OLE.

     Палитра компонент позволяет выбрать нужные объекты для размещения их на Дизайнере форм. Для использования Палитры компонент просто первый раз щелкните мышкой на один из объектов в палитре компонент, и потом второй раз – на Дизайнере форм. Выбранный объект появится на проектируемом окне и им можно манипулировать с помощью мыши.

     Палитра компонент использует постраничную группировку объектов. Вверху палитры  находится набор закладок - Standard, Additional, Dialogs и т.д. Для выбора страницы палитры компонентов используются стрелки перемещения, расположенные в правом верхнем углу.

Компоненты  Label, Edit, Button

     Рассмотрим  некоторые компоненты, расположенные  на странице Standart.

     Используя всплывающую подсказку, найдите  компонент Button. Щелкните по нему мышью, затем щелкните мышью в Дизайнере форм.

     Примечание. Для того чтобы появились всплывающие  подсказки, вызовите контекстное меню Палитры компонентов и установите флажок Show Hints.

     В комбинированной панели выбора объекта  Инспектора объектов появился еще один объект – Button1. В Инспекторе объектов перечислены свойства, доступные во время проектирования приложения. Некоторые свойства (такие как Caption, Name, Left, Top, Width, Heigh, Cursor) Вам уже известны, они совпадают со свойствами формы.

     Перечислим  свойства компонента Button, которые будем использовать при создании приложений:

 

     События компонента Button:

     Положите на форму компонент Edit (окно редактирования, ). Компонент Edit используется для получения текста от пользователя и для его отображения.

     Свойства  компонента Edit:

     При изменении содержимого компонента Edit происходит событие OnChange.

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

     Свойства  компонента Label

     При необходимости узнать подробнее о свойствах, методах и событиях компонента можно воспользоваться справочной системой. Справочная система является контекстно-зависимой; при нажатии клавиши F1, открывается подсказка, соответствующая текущей ситуации. Например, находясь в Инспекторе Объектов, выберите какое-нибудь свойство и нажмите F1, отобразится справка о выделенном свойстве.

Задания для самостоятельного выполнения:  Проследите за изменением состояния компонентов Label, Edit и Button при изменении свойств, перечисленных выше.

 

   Задание. Напишите программу для перевода градусной меры угла в радианную.

Решение. Создайте новый проект. Сохраните новое приложение в своей папке – файл модуля под именем Main.pas, файл проекта – Calculate.dpr.

  1 этап. Создадим визуальный  интерфейс приложения.

  

  Измените  значения свойств формы следующим  образом:

   Поместите на форму компонент Label, измените значения свойств следующим образом:

   Поместите на форму компонент Edit, измените значения свойств следующим образом:

   Поместите на форму компонент Button, измените значения свойств следующим образом:

   Поместите на форму компонент Label, измените значения свойств следующим образом:

   Поместите на форму компонент Edit, измените значения свойств следующим образом:

   Измените  размеры формы в соответствии с расположенными компонентами.

   2 этап. Создание программного  кода.

   Создайте  обработчик события OnClick кнопки ExecuteBtn. Нужно взять информацию, введенную в компонент DegreeEdt преобазовать в соответствии с математической формулой (Радианная_мера_угла = Градусная_мера_угла * ПИ / 180) результат отобразить в компоненте RadianEdt.

   При выполнении этих манипуляций может  возникнуть проблема преобразования форматов данных. Исходные данные (градусная  мера угла – это вещественное число) представлена строкой, хранящейся в  компоненте DegreeEdt. Для преобразования строки в вещественное число воспользуемся процедурой val:

   procedure Val(S; var V; var Code: Integer), где s – строковое представление числа, v – параметр, через которое процедура возвращает число целого или вещественного типа, Code – если строка s не является представлением числа, то параметр Code содержит номер ошибочного символа.

   Итак, в обработчике события OnClick кнопки ExecuteBtn введем следующую последовательность операторов:

procedure TForm1.Button1Click(Sender: TObject);

var Angle_degree, Angle_radian: real;

    Error: Integer;

begin

  val(DegreeEdt.text, Angle_degree, Error);

  if Error = 0 Then Begin

    Angle_radian:= Angle_degree*Pi/180;

    RadianEdt.text:=FloatToStr(Angle_Radian);

  End

  Else Begin

    Application.MessageBox(‘Ошибка при вводе градусной меры угла', 'Ошибка', MB_OK);

    DegreeEdt.text:='0';

    RadianEdt.text:='0';

  End;

End;

   Поясним операторы обработчика события  OnClick.

   Первый  оператор преобразует введенную  в строковом формате градусную  меру угла в вещественное число.