Основные категории событий - презентация, доклад, проект скачать

Нажмите для полного просмотра!

Содержание ▲

Вы можете ознакомиться и скачать презентацию на тему Основные категории событий. Доклад-сообщение содержит 69 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации

Слайд 1

Описание слайда:

Слайд 2

Описание слайда:

Слайд 3

Описание слайда:

Слайд 4

Описание слайда:

Слайд 5

Описание слайда:

Слайд 6

Описание слайда:

Слайд 7

Описание слайда:

Слайд 8

Описание слайда:

Слайд 9

Описание слайда:

Слайд 10

Описание слайда:

Слайд 11

Описание слайда:

Слайд 12

Описание слайда:

Слайд 13

Описание слайда:

Слайд 14

Описание слайда:

Слайд 15

Описание слайда:

Слайд 16

Описание слайда:

Слайд 17

Описание слайда:

Слайд 18

Описание слайда:

Слайд 19

Описание слайда:

Слайд 20

Описание слайда:

Слайд 21

Описание слайда:

Обработчики событий клавиатуры. Обработчики событий клавиатуры. При нажатии клавиши вызываются два обработчика событий: OnKeyDown OnKeyUp. Они взаимосвязаны и всегда вызываются попарно, так как всякая нажатая клавиша рано или поздно отпускается. Кроме того, для каждой нажатой клавиши с символом ASCII вызывается еще один обработчик события: OnKeyPress.

Слайд 22

Описание слайда:

Слайд 23

Описание слайда:

Слайд 24

Описание слайда:

Слайд 25

Описание слайда:

Слайд 26

Описание слайда:

Слайд 27

Описание слайда:

Слайд 28

Описание слайда:

Слайд 29

Описание слайда:

Пример 3. При установке для Form1 свойства KeyPreview = True процедура-обработчик события OnKeyDown обеспечит перемещение формы в верхний левый угол экрана при нажатии клавиши [Home]: Пример 3. При установке для Form1 свойства KeyPreview = True процедура-обработчик события OnKeyDown обеспечит перемещение формы в верхний левый угол экрана при нажатии клавиши [Home]:

Слайд 30

Описание слайда:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_HOME then begin Left :=0; Top :=0; end; end; Здесь Left, Top - свойства TForm, определяющие экранные координаты верхнего левого угла формы.

Слайд 31

Описание слайда:

Слайд 32

Описание слайда:

Слайд 33

Описание слайда:

Слайд 34

Описание слайда:

Слайд 35

Описание слайда:

Слайд 36

Описание слайда:

Обработка исключительных ситуаций Обработка исключительных ситуаций При работе программы возможно возникновение различных нестандартных ситуаций (деление на нуль, попытка работы с несуществующим файлом и т.п.) с нежелательными последствиями. Такие ситуации называются исключительными. Возможно программно отслеживать возникновение исключительных ситуаций – обрабатывать исключительные ситуации.

Слайд 37

Описание слайда:

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

Слайд 38

Описание слайда:

Исключительные ситуации могут формироваться: Исключительные ситуации могут формироваться: процессором, операционной системой, средой Delphi, самой программой – пользовательской частью, стандартными подпрограммами. Можно создавать собственные исключения, активизировать и обрабатывать их.

Слайд 39

Описание слайда:

Структура исключения Структура исключения Исключение с точки зрения языка Object Pascal представляет собой класс, являющийся потомком класса исключений Exception, который определяется в стандартном модуле SysUtils (системные вспомогательные средства). Модуль SysUtils подключается автоматически.

Слайд 40

Описание слайда:

type type Exception = class(TObject) private FMessage: string; FHelpContext: integer; public constructor Create(const Msg: string); constructor CreateFmt(const Msg: string; const Args: array of const);

Слайд 41

Описание слайда:

constructor CreateRes(Ident: integer); constructor CreateRes(Ident: integer); constructor CreateResFmt(Ident: integer; const Args: array of const); constructor CreateHelp(const Msg: string; AHelpContext: integer); constructor CreateFmtHelp(const Msg: string; const Args: array of const; AHelpContext: integer);

Слайд 42

Описание слайда:

constructor CreateResHelp(Ident: integer; constructor CreateResHelp(Ident: integer; AHelpContext: integer); constructor CreateResFmtHelp(Ident: integer; const Args: array of const; AHelpContext: integer); destructor Destroy; property HelpContext: integer; property Message: string; end;

Слайд 43

Описание слайда:

Свойства класса Свойства класса Message - текст сообщения, которое появляется в окне сообщения при возникновении исключительной ситуации. HelpContext - содержит контекст справочной системы. В файле проекта справочной системы можно задать контексты, указывающие на определенные тексты справки. Фактически, это ссылка на текст справки, предъявляемый в конкретной ситуации - контекстно.

Слайд 44

Описание слайда:

Генерация исключительной ситуации Генерация исключительной ситуации При необходимости можно создавать исключение любым из конструкторов, или создать свой конструктор. Для стандартных ситуаций в модуле SysUtils и ряде других имеется достаточное число уже разработанных исключений, входящих в семейство класса Exception. Приведенные восемь конструкторов класса отличаются способом формирования сообщения.

Слайд 45

Описание слайда:

Создание исключения Создание исключения Объект-исключение можно создать с помощью одного из представленных конструкторов. Создание соответствующего объекта и вызов нужного конструктора выполняется с помощью зарезервированного слова raise (вызывать): raise вызов конструктора;

Слайд 46

Описание слайда:

Пример Пример Необходимо получать сообщение об исключительной ситуации, суть которой в том, что некая переменная меньше 1: ….. if N < 1 then raise Exception.Create (‘Значение N меньше 1’); {вызов конструктора} …..

Слайд 47

Описание слайда:

Примеры стандартных классов исключительных ситуаций Примеры стандартных классов исключительных ситуаций В библиотеках Delphi имеется достаточно классов, ответственных за обработку различных исключительных ситуаций. Замечание. В отличие от прочих типов, названия которых принято начинать с буквы Т, имена этих классов начинаются с буквы Е (Exception).

Слайд 48

Описание слайда:

Имя класса Когда возникает Имя класса Когда возникает EAbstractError Попытка выполнения абстрактного метода EAccessViolation Обращение к недоступной области памяти (например, при выходе индекса за границы массива) EConvertError Попытка неверного преобразования типов (например, StrToInt(‘asd’) EZeroDivide Деление на ноль для вещественных чисел

Слайд 49

Описание слайда:

EExternal Некорректное EExternal Некорректное функционирование системы Windows EInOutError Ошибка файлового ввода/вывода EIntError Базовый класс для классов исключительных ситуаций при работе с целыми числами

Слайд 50

Описание слайда:

EIntOverflow Недопустимо EIntOverflow Недопустимо большое значение при работе с целыми числами EOverflow Переполнение при работе с числами с плавающей запятой EOutOfMemory Нехватка памяти

Слайд 51

Описание слайда:

Контроль над исключительными ситуациями Контроль над исключительными ситуациями Язык Object Pascal предоставляет следующую конструкцию для контроля возникновения исключительных ситуаций: try Операторы; except Обрабатываемые классы исключительных ситуаций else оператор end;

Слайд 52

Описание слайда:

Порядок выполнения операторов: Порядок выполнения операторов: Последовательно выполняются операторы, расположенные между try и except. В случае возникновения при выполнении какого-либо из них исключительной ситуации происходит обращение к списку классов, перечисленных между except и else. Выполняется действие, указанное для соответствующего класса. Если возникшая ситуация не относится ни к одному из явно обрабатываемых классов, то управление передается оператору секции else. Управление передается оператору, стоящему сразу после end.

Слайд 53

Описание слайда:

Примечание. Секция else необязательна (сокращенная форма): try Операторы; except Обрабатываемые классы исключительных ситуаций end;

Слайд 54

Описание слайда:

Конструкция try except end - Конструкция try except end - структурированный оператор. Как и любой оператор, try except end можно поместить внутри другого структурированного оператора, в том числе и аналогичного: try …... try except end except end

Слайд 55

Описание слайда:

Запись классов, предназначенных для обработки: Запись классов, предназначенных для обработки: оn имя класса do операторы; Таких классов может быть несколько. Поиск класса подходящей исключительной ситуации осуществляется в последовательном порядке. Если возникшую ошибку можно отнести к нескольким классам, то будет вызван обработчик для класса, расположенного первым в секции except.

Слайд 56

Описание слайда:

Пример. Выполняется сложение целых чисел Y, Z: Пример. Выполняется сложение целых чисел Y, Z: try X := Y + Z; except on EIntError do P1; on EIntOverflow do P2; end;

Слайд 57

Описание слайда:

Если при выполнении оператора X := Y + Z возникнет ошибка переполнения EIntOverflow, то, тем не менее, будет вызвана P1. Если при выполнении оператора X := Y + Z возникнет ошибка переполнения EIntOverflow, то, тем не менее, будет вызвана P1. Эта ошибка относится также и к классу EIntError, который указан первым в секции except. Т.е. нужно: except on EIntOverflow do P2; on EIntError do P1; end;

Слайд 58

Описание слайда:

В ряде случаев удобно использовать единый обработчик для любой исключительной ситуации. В ряде случаев удобно использовать единый обработчик для любой исключительной ситуации. Блок try примет вид: try Операторы; except Операторы; end;

Слайд 59

Описание слайда:

Например: Например: try X := Y + Z; except MyErrorProc; end; В случае возникновения любой исключительной ситуации при выполнении оператора X := Y + Z вызывается процедура MyErrorProc.

Слайд 60

Описание слайда:

Если реализованной программистом обработки ошибки недостаточно, можно передать управление соответствующему стандартному обработчику Delphi с помощью зарезервированного слова raise. Если реализованной программистом обработки ошибки недостаточно, можно передать управление соответствующему стандартному обработчику Delphi с помощью зарезервированного слова raise.

Слайд 61

Описание слайда:

Пример. Выполняется деление: Пример. Выполняется деление: try X := 100 div Y ; except on EDivByZero do begin ShowMessage (‘Ошибка’); raise; end; end; После выдачи сообщения “Ошибка” исполнится стандартный обработчик ошибки EDivByZero.

Слайд 62

Описание слайда:

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

Слайд 63

Описание слайда:

Например: Например: try X := Y + Z; except on EIntError do raise EIntOverflow.Create (‘Возможно переполнение’); end; Если при сложении Y, Z возникнет какая-то арифметическая ошибка (базовый класс EIntError), то в обработчике этой ошибки будет сгенерирована другая исключительная ситуация - EIntOverflow, а обработка EIntError завершится.

Слайд 64

Описание слайда:

Выполнение завершающих действий Выполнение завершающих действий В некоторых случаях программисту не нужен собственный обработчик ошибок но требуется, чтобы даже в случае исключительной ситуации программа гарантированно выполняла те или иные действия.

Слайд 65

Описание слайда:

Для программирования подобных алгоритмов используется конструкция вида: Для программирования подобных алгоритмов используется конструкция вида: try Операторы; finally Заключительные операторы; end; Заключительные действия будут выполнены в любом случае, независимо от возникновения исключительной ситуации при выполнении операторов секции try.

Слайд 66

Описание слайда:

Пример. Освобождение памяти, выделенной для динамического массива, происходит независимо от успешности его обработки: Пример. Освобождение памяти, выделенной для динамического массива, происходит независимо от успешности его обработки: var DynArr: array of integer; … try SetLength(DynArr, 100000); ….. {обработка массива} …. finally DynArr := NIL end;

Слайд 67

Описание слайда:

Передача объектов, связанных с исключительными ситуациями Передача объектов, связанных с исключительными ситуациями При возникновении исключительной ситуации специальный обработчик создает соответствующий ей объект. Для получения доступа к этому объекту требуется видоизменить конструкцию секции except:

Слайд 68

Описание слайда:

оn E: имя класса do операторы; оn E: имя класса do операторы; Е – это произвольный идентификатор переменной (описывать ее не нужно), в которую запишется соответствующий объект. К ней можно обращаться в этой же секции, например, для изменения ее свойств.

Слайд 69

Описание слайда:

Например: Например: on E: EAccessViolation do begin E.Message := ‘Одна из самых непонятных ошибок’; raise; end; С помощью свойства Message определен нестандартный текст сообщения о соответствующей исключительной ситуации.