Шупрута В.В. - Delphi 2005 - Учимся программировать, страница 9

2.8 приведены основные события, которые происходят во время выполнения программы.Создаем первый проект для Microsoft .NET Framework^&WТаблица 2.8 т Основные события, возникающие при работе программСобытиеМомент возникновения событияClickПри щелчке кнопкой мышиDblClickПри двойном щелчке кнопкой мышиMouseDownПри нажатии кнопки мышиMouseupПри отпускании кнопки мышиMouseMoveПри перемещении указателя мышиKeyDownПри нажатии клавиши. Сразу за данным событием следует событие Keypress.При удерживании нажатой клавиши эта пара событий повторяется, пока не будетотжата клавиша.

При отжатии клавиши формируется событие КеуирПри нажатии клавиши сразу за событием KeyDownПри отпускании нажатой ранее клавишиПри появлении окна программы в начале работы, при появлении части окна, котораябыла закрыта другими окнами, при активизации окна программы из неактивногосостоянияKeyPressKeyUpPaintEnterПри получении элементом управления фокусаLeaveПри потере элементом управления фокусаLoadВ момент загрузки формыClosingПри нажатии на системную кнопку Закрыть программыClosedСразу после события C l o s i n gПри возникновении события программе необходимо знать, что нужносделать, - соответственно реакцией на событие должно быть какое-то действие программы.

Следует заметить, что число событий достаточно велико, поэтому нет необходимости описывать все события - описывать необходимо только те, на которые должна реагировать программа (в нашемслучае программа должна среагировать только на два события C l i c k - нажатие на кнопку Вычислить и Завершение работы соответственно). В Delphi такая реакция называется процедурой обработки события (Event handler). Таким образом, чтобы программа знала, какие действия ей выполнятьпри возникновении определенного события, программист должен написать такую процедуру. Ниже будет подробно рассмотрен перечень действий при разработке процедуры обработки события C l i c k для кнопкиВычислить.Чтобы приступить к созданию процедуры обработки события, необходимо:1.

Выбрать компонент, для которого мы будем писать процедуру (в нашемслучае это B u t t o n l , то есть кнопка Вычислить).2. В окне Object Inspector выбрать вкладку Events.ГЛАВА 2 • Создаем первые проекты в Borland Delphi 20053. В левой колонке перечислены события, которые могут быть воспринятыэтим компонентом; как видите, их количество достаточно велико. Выберите нужное нам событие (Click), возникающее при нажатии кнопки.4. Введите имя процедуры обработки события, например C a l c u l a t e , и нажмите клавишу Enter.В результате в программу будет вставлена процедура обработки события истанет активным окно редактора кода, в котором нам предстоит воспользоватьсянашими знаниями языка Delphi (рис.

2.11).Щ Welcome Page92 I93£3p*ocedure TUinForm.Calculate(sendee: System.Object; e: System.EventArgs);9-1 | begin9S.end;97 !93 Lend.\9BРис. 2.11 т Создание процедуры обработки события ClickМожно создать процедуру обработки и другим способом - достаточновыбрать нужное событие и выполнить двойной щелчок мышью вместо вводаимени процедуры. В этом случае имя процедуры будет сгенерированоавтоматически - первая часть имени идентифицирует компонент, вторая событие. Например, для нашего случая будет создана процедура с именемTWinForm.Buttonl_Click.Еще один способ создания обработчика события - это двойной щелчок посамому компоненту. В этом случае среда сформирует обработчик события поумолчанию и привяжет его к нужному событию. Например, для кнопкисобытием по умолчанию является событие Click.

Как и в предыдущем случае,имя обработчика события будет сформировано аналогичным образом.У процедуры обработки имеется два параметра. Первый - S e n d e r идентифицирует объект, вызвавший событие. Второй - E v e n t A r g s используется для передачи в процедуру обработки информации о событии.Какая информация может быть передана в процедуру? При нажатииклавиши, например, пересылается код нажатой клавиши. При обработкедвижения указателя мыши могут передаваться его координаты. Соответственно, набор передаваемых параметров зависит от типа компонентаи типа события.В листинге 2.1 приведен текст процедуры обработки события Cl i c k на кнопкеВычислить (Buttonl).

Приведенный листинг показывает, как отображаетсяСоздает первый проект для Microsoft .NET Frameworkтекст программы в редакторе кода, - ключевые слова выделяются полужирнымшрифтом, комментарии - курсивом.Листинг 2.1 т Процедура обработки события C l i c kprocedure TWinForml.Buttonl_Click(sender:System.Object;e: System.EventArgs);varA,B,C: single;D: r e a l ;XI,X2: r e a l ;'begin// Ввод исходных данных.A := System.Convert.ToSingle(TextBoxl.Text);В := System.Convert.ToSingle(TextBox2.Text);С := System.Convert.ToSingle(TextBox3.Text);// Вычисление дискриминанта.D := B*B-4*A*C;// Вычисление корней уравнения.if D < 0 then// Если дискриминант отрицателен, то выводим сообщениеII о том, что уравнение не имеет корней.beginLabel5.Text : = 'Уравнение не имеет действительных корней';end// Если дискриминант больше или равен 0, тоII вычисляем корни уравнения.elsebeginXI := (-B-sqrt(D))/(2*A);Х2 := (-B+sqrt(D))/(2*А);// Выводим рассчитанные значения корней.Label5.Text := 'XI = '+Х1.ToString+', Х2 = '+Х2.ToString;end;end;Теперь разберем приведенный в листинге исходный код.Процедура обработки TWinForm.Buttonl_Click выполняет вычислениекорней квадратного уравнения и выводит результат в метку Label 5.

Исходныеданные о коэффициентах при неизвестном вводятся из полей редактированияTextBoxl, TextBox2 и TextBox3. После ввода данных пользователемзначение свойств Text этих компонентов меняется на те, что ввелпользователь. Для преобразования введенных пользователем строк в числаиспользуется функция T o S i n g l e , которая входит в пространство именГЛАВА 2 • Создаем первые проекты в Borland Delphi 2005System.Convert (о пространстве имен мы подробно поговорим несколькопозднее).

Результатом этой функции является число, полученное из введеннойпользователем строки. Поэтому если пользователь введет какой-либо текст,который невозможно перевести в число, то будет выдано сообщение обошибке. Таким образом, функция ToSingle сработает только в том случае,если передаваемое число записано в верном формате, то есть предполагаетсяввод целого числа либо дробного, с использованием запятой в качестверазделителя.Немного о пространстве имен.

Пространство имен - это модуль, предоставляющий использующей его программе свои объекты (функции, константы и т.п.). Во время написания программы Delphi предоставляет нам своимодули различного назначения. Например, при создании формы мы использовали компоненты типа TextBox, Label и Button. Все эти компонентысодержатся в модуле (пространстве имен) System.Windows .Forms. В противном случае нам пришлось бы самим писать исходный код для подобныхобъектов. Так что наша задача существенно упрощается, так как программистыBorland предоставили нам возможность использовать все то, что былонаписано до нас (в самом деле, совершенно незачем заниматься изобретениемвелосипеда). Таким образом, любой объект относится к тому или иномупространству имен.Пространства имен, которые использует программа, перечислены в секцииUses (см.

окно редактора кода). Пространство имен System доступно поумолчанию и поэтому в этой секции указывать его нет необходимости.Вычисленные значения корней выводятся в поле L a b e l 5 путем присваивания значения свойству Text. Для обратного преобразования числа встроку'используется метод T o S t r i n g .

Его параметром является символьнаяконстанта, характеризующая формат отображения числа. Функция ToStringможет использоваться и без параметра.Ниже в табл. 2.9 приведены основные форматы отображения чисел.Таблица 2.9 • Основные форматы отображения чиселКонстанта Формат отображенияПример отображенияс, сДенежный формат - Currency. Используется дляотображения денежных величин. При использованииэтого формата отображения необходимо учитывать,что обозначение денежной единицы, разделитель группразрядов и способ отображения отрицательных чиселопределяются настройками операционной системы1200,54 р:f, FЧисло с фиксированной точкой. Служит для представлениядробных чисел.

Количество цифр дробной части, а такжесимвол-разделитель целой и дробной частей определяютсянастройками операционной системы1200,54Создаем первый проект для Microsoft .NET FrameworkТаблица 2.9 т Основные форматы отображения чисел (окончание)Константа Формат отображенияе, Еп, Ng, Gг,вНаучный формат - E x p o n e n t i a l . Применяется дляпредставления очень маленьких или очень больших чиселЧисловой формат - Number.