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