Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
лекции D.DOC
Скачиваний:
2
Добавлен:
16.08.2019
Размер:
193.02 Кб
Скачать

4.5.3.События, на которые реагируют компоненты класса tControl.

  • On click

  • On Dbl. Click.

  • On mouse down

  • On mouse up

  • On mouse move.

  • On end drop

  • On start drag

  • On drag drop

  • On drag over

4.6.4.5. T Win Control.

4.6.1.Свойства:

  • Чтобы задать порядок прохода по компонентам формы, существует свойство Tab order: T Tab order (тип – диапазон целых чисел {0…n-1}, где n – это количество компонентов).

  • Tab Stop: Boolean – это свойство определяет, будет ли останавливаться маркер при передаче фокуса ввода.

  • Help Context: T Help Context – числовой идентификатор статьи справочного файла, подключенного к данному приложению.

4.6.2.События:

  • On enter (когда компонент получает фокус).

  • On exit (когда компонент теряет фокус ввода).

  • On key press

  • On key down

  • On key up

4.7.4.6. Процедуры обработки событий.

Обработчики разных событий имеют разный набор параметров.

4.7.1.Для следующих событий

  • On click

  • On dbl. Click

  • On enter

  • On exit

существует шаблон:

T Notify Event =procedure (Sender: T Object) of object;

Тип параметра Sender – T Object. Этот параметр – объект, для которого это событие происходило.

4.7.2.Для события On key press:

Procedure имя (Sender: T Object, var Key: Char);

То, какая именно клавиша нажата, определяется компьютером по ASCII коду.

Для клавиш, которые генерируют код, это событие выполняется, а для тех, которые не генерируют код, не выполняется.

Пример: Form 1: Caption:=Key + ’=’ + Int To Str(Ord(Key));

  1. Для событий On key down и On key up:

Procedure имя (Sender: T Object, var Key: Word, Shift: T Shift State);

Параметр Word – некоторое число, указывающее нажатую клавишу.

Пример: Form 1. Caption:=Int To Str(Key);

VK – виртуальные клавиши.

T Shift State = [ssShift, ssCtrl, ssAlt,…]

If Shift = [ ] then

If Shift = [ssAlt] then

………………………….

4.8.4.7. Методы T Win Control.

  1. function Can Focus: Boolean;

Function Focused: Boolean;

procedure Set Focus; (устанавливает фокус).

Лекция № 7

4.9.Обработка исключений.

Отлавливание семантических исключений.

2) Во время выполнения программы могут случаться некоторые исключения.

4.9.1.Понятие исключения.

Причины появления:

  • переполнение; 10: аппаратные.

  • по вводу- выводу;

  • логические ошибки ввода-вывода (попытка чтения после конца файла).

Основные методы защиты:

  • предварительные проверки.

  • перехват случившихся исключений.

4.9.2.Оператор try … finally.

try

ф1

п

….

оследовательность операторов, при которых если возникнет исключение, передать управление finally.

фN

finally

фF1

….

эти операторы выполняются в любом случае.

фFM

end.

Например, при обработке файла.

...

Var Bfil: file;

Begin

System. Assign (Bfil, ‘...’);

Reset (Bfil);

try

{оператор ввода-вывода с Bfil }

finally

System (close(Bfil));

end; {try}

end;

...

4.9.3.try … except …

try

Op1;

...

OpN;

except

on Exception1 do s1;

on ...

else SM;

end;

Классы исключений:

I/O EI и Out Error(ввод – вывод ошибок). Это группа исключений динамической памяти.

  • 1) Арифметические: integer – EIntError; float – EMathError;

  • 2) Преобразования: EConvertError

  • 3) Аппаратные исключения: EFault

1. EIntError

  • EDivideZero

  • ERangeError (ошибка диапазона)

  • EIntOverflow (целочисленное переполнение).

2. E Math Error

  • EZeroDivide

  • EOverflow

  • EUnderflow (маленькое)

  • EInvalidOP (неправильная операция).

EConvertError, например при выполнении функций:

  • IntToStr.

  • StrToInt

  • StrToFloat

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]