Компонент Delphi ApplicationEvents

Компонент Delphi  ApplicationEvents располагается на странице Additional Палитры компонентов.Его назначение создание обработчиков событий.

Создадим приложение в котором подсказка над кнопкой будет высвечиваться на зеленом фоне. На форме расположим компоненты ApplicationEvents и Button1, как показано на рисунке.

пример с компонентом

 Выделите компонент  ApplicationEvents и в инспекторе объектов зайдя на вкладку Events и двойным щелчком на свойстве onShowHint создадим следующий обработчик:

procedure TForm1.ApplicationEvents1ShowHint(var HintStr: String;
  var CanShow: Boolean; var HintInfo: THintInfo);
begin
   if (HintInfo.HintControl = Button1) then
     HintInfo.HintColor := clGreen;
    CanShow:=True;
end;

Свойство кнопки ShowHint должно быть TRUE и в свойстве Hint напишем - "Важная кнопка". Запустив приложение и наведя мышку на кнопку мы увидим зеленую подсказку, которую мы написали.

 

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *