Перейти к содержанию
Fire Monkey от А до Я
  • 0

Анимация scrollbar


mixi

Вопрос

На простой вопрос не смог найти простой ответ.

Форма, на ней SmallScrollBar1: TSmallScrollBar и привязанный к свойству Height TFloatAnimation.

В анимации -
 

Trigger : IsMouseOver=true 
Triggerinverse: IsMouseOver=false 
StartValue: 8 
StopValue: 16 

При наведении мыши - никакой реакции.

Положил на форму Label. Обработал
 

procedure TForm1.SmallScrollBar1MouseEnter(Sender: TObject);
begin  
  Label1.Text:='enter';
end; 

procedure TForm1.SmallScrollBar1MouseLeave(Sender: TObject); 
begin   
  Label1.Text:='leave';
end;

Снова никакой реакции. В VCL нет анимации, но события обрабатываются.

Собственно вопрос - кто перехватил обработку? Может стилевые элменты?

Ну и как получить анимацию увеличения высоты скрола при наведении мыши?

Ссылка на комментарий

Рекомендуемые сообщения

Ответов пока нет

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

×
×
  • Создать...