Содержание | Последнее обновление: 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; } |