|
Выполнение действий при наведении курсора на компонент
Автор: OlegGG
Исходная ссылка: - - -
Чтобы выполнить какие-либо действия при наведении курсора на визуальный компонент, надо определить обработчик события OnMouseEnter этого компонента.
Следующий код меняет цвет текста элемента Label1 на синий при наведении на него мышиного курсора:
void __fastcall TForm1::OnLabel1MouseEnter(TObject * Sender) {
Label1->Font->Color = clBlue;
}
А чтобы выполнить некоторые действия когда курсор покидает элемент управления, надо определить обработчик OnMouseLeave
Следующий код меняет цвет текста элемента Label1 на черный в тот момент, когда мышиный курсор покидает его:
void __fastcall TForm1::OnLabel1MouseEnter(TObject * Sender) {
Label1->Font->Color = clBlack;
}
|