VPF::Обрабатывая событие OnMouseMove у Panel

Нитонисе

Дата 12.3.2013, 23:52 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2

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

Dem_max

Дата 13.3.2013, 08:40 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1780
Регистрация: 12.4.2007

Репутация: 14
Всего: 39

Примерно так

Код


//---------------------------------------------------------------------------
void __fastcall TForm1::Panel1MouseEnter(TObject *Sender)
{
   Panel1->Color = clGreen;
   Panel1->ParentBackground = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Panel1MouseLeave(TObject *Sender)
{
    ///Panel1->Color = clBtnFace;
    Panel1->ParentBackground = true;//false;
}
//---------------------------------------------------------------------------
// Этот обработчик выбираем для всех компонентов лежащих на TPanel
void __fastcall TForm1::Label1MouseEnter(TObject *Sender)
{
    Panel1->Color = clGreen;
    Panel1->ParentBackground = false;
}

--------------------

Американские программисты долго не могли понять, почему русские при зависании Windоws всё время повторяют "Твой зайка написал" ("Yоur bunnу wrоte")

artsb

Дата 13.3.2013, 09:07 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64

Во-первых, можно выводить надписи средствами GDI.
Во-вторых, на Label'ы реагируют только стандартные обработчики класса (в данном конкретном случае). Если написать так:

Код


void __fastcall TForm1::NewWndProc(Messages::TMessage &Message)
{
    switch(Message.Msg)
    {
        case WM_MOUSEMOVE:
        {
            int r, g, b;

            randomize();

            r = rand() % 255;
            g = rand() % 255;
            b = rand() % 255;

            Panel1->Color = (TColor)RGB(r, g, b);

            break;
        }
        case WM_MOUSELEAVE:
        {
            Panel1->Color = clBtnFace;

            break;
        }
    }

    OldWndProc(Message);
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    OldWndProc = Panel1->WindowProc;
    Panel1->WindowProc = NewWndProc;
}
//---------------------------------------------------------------------------

то всё работает.

--------------------

Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.

Нитонисе

Дата 13.3.2013, 10:17 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2

Dem_max, спасибо. Использовал ваш способ.

artsb, ваш вариант не пробовал, на первый взгляд он выглядет более сложным smile

artsb

Дата 13.3.2013, 10:50 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64

Цитата(Нитонисе @ 13.3.2013, 10:17

)

ваш вариант не пробовал, на первый взгляд он выглядет более сложным smile

Да, чуть-чуть сложнее. Зато работает 100% smile

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »