Стр. 17 - Информатика. Программирование в среде Delphi. Часть 1

Информатика. Программирование в Delphi
17
Функции и процедуры объявляются в разделе объявления типов type –
тип. Пример объявления функции и процедуры:
type
TNewClass = class
FDig: Integer;
FText: String;
function PrimFunc(x: real): real;
procedure PrimProc;
end;
В этом примере объявляются:
− класс TNewClass;
− поле FDig целого типа;
− поле FText строчного типа;
− функция PrimFunc(), имеющая параметр х вещественного типа;
функция возвращает значение вещественного типа;
− процедура PrimProc .
После объявления метода к нему можно обращаться. Пример обращения
к методу (функции и процедуре):
var
PrimMethod: TNewClass;
a: real;
begin
a:= PrimMethod.PrimFunc(5,33);
PrimMethod.PrimProc;
end;
В этом примере:
− объявляется объект PrimMethod типа TNewClass, являющийся эк-
земпляром класса;
− объявляется переменная а вещественного типа;
− переменной а присваивается значение, возвращаемое функцией;
− выполняется процедура.
Событие
Event – событие – свойство процедурного типа. Значением события яв-
ляется указатель на метод. В среде программирования Delphi имеется набор со-
бытий, отображенный на листе событий Events инспектора объектов.
Примеры событий:
− OnClick – щелчок мышью, когда ее указатель находится на объекте;
− OnMouseMove – движение указателя мыши над объектом;
− OnMouseUp – нажатие на левую клавишу мыши, когда указатель