Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.22;
Скачать: CL | DM;

Вниз

Как лучше сделать ?   Найти похожие ветки 

 
SemFLY ©   (2002-08-09 14:55) [0]

Задача такая...
У меня есть Label и мне надо в то время, когда курсор мыши находится на нём, чтобы Label светился белым, а когда не на нём светился серым. Прописать изменение цвета в событие OnMouseMove конечно можно, но тогда на прилегающих объектах к Label мне надо прописывать изменение цвета на серый.
Вопрос: Есть ли какой-нибудь другой способ решения этой задачи ?
Кроме события OnMouseMove.

Спасибо !
- - - - - - - - - - - - -
P.S. Если не трудно, то можно пример.


 
Skier ©   (2002-08-09 14:57) [1]

>SemFLY


> Есть ли какой-нибудь другой способ решения этой задачи ?
>


Сообщения CM_MOUSELEAVE и CM_MOUSEENTER


 
SemFLY ©   (2002-08-09 15:16) [2]

Skier, Я так понимаю, что это API-шные функции, глянул в Help"e Windows SDK (в делфийском Help"е тоже смотрел, а вдруг... ;)), там таких нет, поробовал изменить написание, тоже не нашел. Может они не так называются ?


 
Skier ©   (2002-08-09 15:20) [3]

>SemFLY
Всё так. см. Controls.pas
В частности :


procedure TControl.CMMouseEnter(var Message: TMessage);
begin
if FParent <> nil then
FParent.Perform(CM_MOUSEENTER, 0, Longint(Self));
end;

procedure TControl.CMMouseLeave(var Message: TMessage);
begin
if FParent <> nil then
FParent.Perform(CM_MOUSELEAVE, 0, Longint(Self));
end;


 
Opuhshii ©   (2002-08-09 15:26) [4]

это VCLные мессаджи,..
CM_BASE = $B000;
CM_MOUSEENTER = CM_BASE + 19;
CM_MOUSELEAVE = CM_BASE + 20;



Страницы: 1 вся ветка

Текущий архив: 2002.08.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
14-71380
Alexgorlov
2002-07-27 23:48
2002.08.22
Защита приложения


3-71069
Nameless
2002-07-29 09:53
2002.08.22
Почему запрос достает из блоб-поля только 32 килобайта?


1-71242
RedWood
2002-08-09 12:00
2002.08.22
Delphi-3 и Delphi-5(6)


1-71160
DeniM
2002-08-13 14:24
2002.08.22
программирование штрих-кода в печатной форме... (+)


1-71097
Aleksandr
2002-08-12 16:45
2002.08.22
Как свернуть программу, чтобы в ТаскБаре не светилась?