Следует отметить, что событие OnKeyPress заведомо наступает, если нажимается только клавиша символа или клавиша символа при нажатой клавише Shift. Если же клавиша символа нажимается одновременно с какой-то из вспомогательных клавиш, то событие OnKeyPress может не наступить (произойдут только событияOnKeyDown при нажатии и OnKeyUp при отпускании) или если и наступит, то укажет на неверный символ. Например, при нажатой клавише Alt событие OnKeyPress при нажатии символьной клавиши не наступает, а при нажатой Ctrl событие OnKeyPress при нажатии символьной клавиши наступает, но символ не распознается. Событие OnKeyUp наступает, если компонент находится в фокусе при отпускании пользователем любой ранее нажатой клавиши, включая функциональные и вспомогательные, такие как Shift, Alt и Ctrl. В обработчик кроме параметра Sender, указывающего на компонент, в котором произошло событие, передаются также параметры Key и Shift, описанные выше. Событие OnKeyUp наиболее удобно для распознавания нажатых клавиш и комбинации клавиш. Необходимо обратить внимание на то, что параметр Key для обработчика данного события имеет тип word в отличие от типаchar для события OnKeyPress. Поэтому допускается параметр Key сравнивать с целым числом, соответствующим коду символа или применять к параметру Key функцию char, переводящую его в символ для сравнения с символами. К тому же надо учитывать, что виртуальный символьный код одинаков для символов в верхнем и нижнем регистре и для различной раскладки клавиатуры (русской или английской). Рассмотрим способ определения кода нажатой клавиши на примере небольшой программы. Создайте в среде разработки Borland C++ Builder 6 новое приложение и поместите на форму один компонент Label1. В инспекторе кодов для формы Form1 на закладке событий щелкните дважды по полю правее OnClick и введите в заготовку обработчика события программный код: Label1->Caption = "Было событие OnClick";
Этот код программы позволит изменять свойство Caption компонента на сообщение о возникновении событияOnClick на форме приложения. Аналогично введите для формы Form1 код обработки события KeyDown:
if(Shift.Contains(ssAlt)) Label1->Caption = "Alt"; if(Shift.Contains(ssCtrl)) Label1->Caption = "Ctrl"; if(Shift.Contains(ssShift)) Label1->Caption = "Shift"; switch (Key) { case VK_INSERT: Label1->Caption = "Insert"; break; case VK_CAPITAL: Label1->Caption = "CapsLock"; break; case VK_NUMLOCK: Label1->Caption = "NumLock"; break; }
и код обработки события KeyPress:
switch (Key) { case ' ': Label1->Caption = "Был нажат пробел"; break; default : Label1->Caption = Key; break; }
Теперь запустите приложение на выполнение и нажимайте любые клавиши на клавиатуре, а также пощелкайте левой кнопкой мышки по форме приложения. В результате вы увидите реакцию программы на ваши действия. Событие OnExit наступает в момент потери элементом фокуса при его переключении на другой элемент. Это событие не наступает при переключениях между формами или между приложениями. Значение свойства ActiveControl изменяется прежде, чем происходит событие OnExit. При переключениях между элементами, расположенными в разных контейнерах, например, на разных панелях, событие OnExit сначала наступает для элемента, а потом для содержащего его контейнера. Это противоположно последовательности событий OnEnter, которые при переключении из другого контейнера на компонент данного контейнера наступают сначала для контейнера, а потом для компонента. Создайте новое приложение и поместите на него три компонента Edit из закладки Standard. Создайте обработчик события OnEnter для компонента Edit2 и вставьте в него программный код:
ShowMessage("Фокус на элементе");
Теперь создайте обработчик события OnExit для этого же компонента и вставьте в него программный код:
ShowMessage("Фокус переключен");
Запустите приложение и нажимайте клавишу табуляции. Фокус будет переключаться между компонентами Edit, и при переходе через Edit2 на экране будет формироваться сообщение о состоянии фокуса. Далее рассмотрим события, связанные с работой мыши. Событие OnMouseDown наступает в момент нажатия пользователем клавиши мыши над компонентом. Имеется также парное к нему событие OnMouseUp, наступающее при отпускании нажатой кнопки мыши над объектом. Обработка событий OnMouseDown и OnMouseUp используется для операций, требуемых при нажатии и отпускании пользователем какой-либо кнопки мыши. Обработчики этих событий имеют параметры Sender, Shift, Button, X и Y. С первыми двумя параметрами мы уже знакомы из описания предыдущих событий. Значения параметра Button определяют, какая кнопка мыши нажата: mbLeft — левая, mbRight — правая, mbMiddle — средняя. Параметры X и Y определяют координаты указателя мыши в клиентской области компонента. Создайте новое приложение и поместите на его форму два компонента Label. Для формы Forml создайте обработчик события OnMouseDown и введите в него следующие строки программного кода:
if(Button == mbLeft) Label1->Caption = "Нажата левая кнопка мыши"; if(Button == mbRight) Label1->Caption = "Нажата правая кнопка мыши"; if(Button == mbMiddle) Label1->Caption = "Нажата средняя кнопка мыши"; Label2->Caption = "Координаты мыши: X="+string(X)+" Y="+String(Y);
Запустите приложение и пощелкайте разными кнопками мыши на его форме. Вы увидите сообщения программы о ваших действиях и координаты курсора мыши. Событие OnMouseMove наступает при перемещении курсора мыши над компонентом. Обработчик события OnMouseMove вставляется в программу, если необходимо произвести какие-то операции при перемещении курсора мыши над компонентом. Параметр Shift, являющийся множеством, содержит элементы, позволяющие определить, какие кнопки мыши и вспомогательные клавиши (Shift, Ctrl или Alt) нажаты в этот момент. Параметры X и Y определяют координаты указателя мыши в клиентской области компонента. Добавьте в предыдущую программу обработчик события OnMouseMove для формы Forml и вставьте в него следующую строку программного кода:
Label2->Caption = "Координаты мыши: X="+String(X)+" Y="+Strlng(Y);
Вновь запустите приложение и проверьте, как ведет себя программа, когда вы перемещаете курсор мыши над формой и другими компонентами. Следующие описываемые события относятся к графическим компонентам и перемещению объектов. Событие OnChange связано с графическим компонентом канвы (рамки) и наступает после изменения графического объекта. Обработчик события OnChange должен осуществить необходимые операции при изменении графического объекта и отразить его новые установки. Событие происходит сразу после изменения изображения на канве. При вызове любого метода рисования осуществляется следующая последовательность операций: • происходит событие OnChanging; • вызванный метод канвы TCanvas осуществляет изменения в изображении; • наступает событие OnChange. Событие канвы OnChange наступает при изменении именно самого изображения, а не свойств канвы. Такие свойства канвы, как объекты Font (шрифт). Brush (кисть) и Реп (перо), имеют свои собственные события OnChange. Событие OnPaint наступает, когда приходит сообщение Windows о необходимости перерисовать испорченное изображение. Изображение может испортиться из-за временного перекрытия данного окна другим окном того же или постороннего приложения. Обработчик данного события должен перерисовать изображение. При перерисовке изображения канвы Canvas можно использовать свойство ClipRect, которое указывает область канвы, внутри которой изображение испорчено. События OnProgress наступают во время медленных процессов изменения графического изображения, таких как загрузка, сохранение, трансформация. Заготовка его обработчика приведена ниже:
void __fastcall TForml:: Image1Progress(T0bject *Sender, TProgressStage Stage, BYTE PercentDone, bool RedrawNow, const TRect &R, const AnsiString Msg) { }
Эти события позволяют построить в приложении индикатор хода процесса, обеспечивающий обратную связь с пользователем. Разработчики новых компонентов могут генерировать события OnProgress, вызывая защищенный метод Progress. Параметр Stage указывает стадию процесса — начало, продолжение, окончание. Он может принимать значения psStarting, psRunning и psEnding соответственно. Если приложение предусматривает индикацию процесса, можно создавать индикатор при Stage = psStarting, изменять его показания, пока Stage = = psRunning, и закрывать при Stage = = psEnding. Параметр PercentDone показывает, какая примерно часть процесса выполнена. Этот параметр может использоваться в индикаторе процесса. Параметр RedrawNow указывает на то, возможно ли в данный момент успешно отобразить изображение на экране. Параметр R указывает область изображения, которая изменена и нуждается в перерисовке. Параметр Msg содержит краткую справку о протекающем процессе, например, Loading (загрузка), Storing (запоминание) или Reducing colours (уменьшение цветов). Строка Msg может быть и пустой. Событие OnDragDrop наступает в момент отпускания над компонентом другого перетаскиваемого компонента. В обработчике данного события необходимо описать, что в этот момент должно произойти. Параметр Source соответствует перетаскиваемому объекту, а параметр Sender — объекту, над которым другой объект был отпущен. Параметры X и Y содержат координаты позиции курсора мыши над компонентом в системе координат клиентской области этого компонента.
Событие OnDragOver происходит в момент, когда перетаскиваемый объект пересек границу данного компонента и оказался внутри его контура. Заканчивается событие, когда объект покидает компонент, пересекая его границу. Обработчик события OnDragOver используется для того, чтобы дать сигнал о готовности компонента принять перетаскиваемый объект в том случае, если пользователь отпустит его над данным компонентом. Если компонент готов принять объект, то в обработчике надо задать значение параметра Accept, равное True. Впрочем, это значение по умолчанию равно True, так что его можно не задавать. Обработчик может быть и пустым, что будет означать готовность компонента принять любой объект, но даже пустой обработчик нужен, поскольку иначе сообщения о приеме компонента приложение не получит. Во время перетаскивания над компонентом объекта, который может быть принят, форма курсора мыши может изменяться, сигнализируя пользователю о готовности компонента принять объект. Для обеспечения этого необходимо во время проектирования задать соответствующее значение свойства компонента DragCursor. Параметр Source обработчика события определяет перетаскиваемый объект, а параметр Sender — сам компонент. Параметры X и Y дают координаты точки экрана в пикселях. Параметр State типа TDragStateonределяет состояние перетаскиваемого объекта по отношению к другим объектам. Значения этого параметра приведены в табл. 4. Таблица 4Значение | Описание | dsDragEnter | Курсор мыши входит в пределы компонента | dsDragMove | Курсор мыши перемещается в пределах компонента | dsDragLeave | Курсор мыши выходит за пределы компонента | Событие OnStartDrag наступаем когда пользователь нажал левую кнопку мыши над объектом и, не отпуская ее> начал смещать курсор мыши, т. е. начал перетаскивание. Обработчик события OnStartDrag позволяет описать какие-либо специальные действия, необходимые перед началом перетаскивания. Параметр Sender является тем компонентом, который должен перетаскиваться или который содержит объект будущего перетаскивания. Переменная DragObject по умолчанию является пустой, т. е. имеет значение NULL. Это означает, что переноситься будет сам компонент или его объект, в этом случае автоматически создается объект типа TDragControlObject, с которым среда разработки Borland C++ Builder 6 осуществляет весь процесс перетаскивания. Обработчик может создавать и новый объект перетаскивания, в котором определен какой-нибудь особый вид курсора и т. п. Событие OnEndDrag наступает при любом окончании процесса перетаскивания компонента, которое может быть успешным (компонент перетащен в приемник) или безуспешным (компонент отпущен над формой или компонентом, неспособным его принять). Данное событие наступает в момент прерывания или окончания перетаскивания компонента, оно наступает в перетаскиваемом компоненте. Его обработка не требуется для осуществления процесса перетаскивания. Соответствующий обработчик может быть написан, если требуется какое-либо действие или сообщение, подтверждающее результат перетаскивания, или какая-то реакция в перетаскиваемом компоненте. Параметр Sender обработчика — это сам объект перетаскивания. Параметр Target является компонентом-приемником, если объект был им принят, или пустым, если перетаскивание закончилось неудачей. Параметры X и Y дают координаты экрана в пикселях.
|