Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проблемы с процедурами Enter и Leave [Delphi, Windows]


Мякс ©   (2003-08-24 13:30:00) 

Я хочу сделать, чтобы при наведении мыши на строку, цвет её шрифта менялся, а при покидании мыши становился прежним. Код такой:

procedure Tform1.Label1MouseEnter(Sender: PObj);
begin
 Label1.Font.Color:=clYellow;
end;

procedure Tform1.Label1MouseLeave(Sender: PObj);
begin
 Label1.Font.Color:=clLime;
end;

В итоге проиходит следующее: первая процедура выполняется всего один раз, а вторая - ни разу, как мышью не елозь. Не могу понять в чём дело, помогите, пожалуйста.


Мякс   (2003-08-27 11:57:00) [1]

2Кладов: Win98, Delphi 7, Kol 1.70

2Gandalf: Если можно, напишите поподробнее.

Спасибо всем. Странно, но иногда эти процедуры работают корректно, а потом без всякой видимой причины начинают глючить.


Gandalf   (2003-08-25 14:49:00) [2]

Такое было в старом KOL, вызови InitCommonControls....


Кладов   (2003-08-24 14:34:00) [3]

у меня работает. ОС? Delphi? KOL? версии?


Наверх

Титульная страница Поиск, карта сайта Написать письмо