Подсказки в строке состояния

Задача: При наведении мыши на определенный контрол, выводить подсказку о его назначении в строке состояния (StatusBar). Решение: С первого взгляда на проблему хочется тут же взяться и начать писать обработчики событий OnMouseEnter и OnMouseLeave вроде этих: void __fastcall TForm::SomeControlMouseEnter(TObject *Sender) { // Выводим сообщение в строку состояния StatusBar1->SimpleText = «Вы навели мышь на вот этот…