Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как определить, нажата ли правая кнопка мыши? 
:(
    Опции темы
Нитонисе
Дата 4.2.2012, 18:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: 2
Всего: 2
Двигаю мышью по компоненту TImage. В событии OnMouseMove этого компонента нужно выполнять определенные действия, но только если мышь перемещается с нажатой ПКМ. Как это отследить?
PM MAIL   Вверх
Dem_max
Дата 5.2.2012, 09:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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

Код

void __fastcall TMain::Image1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)
{
  if(Button == mbLeft)
  {
    // Нажата левая кнопка мыши
  }

     if(Button == mbRight)
  {
    // Нажата правая кнопка мыши
  }
}



--------------------
Американские программисты долго не могли понять, почему русские при зависании Windоws всё время повторяют "Твой зайка написал" ("Yоur bunnу wrоte")
PM MAIL   Вверх
Нитонисе
Дата 5.2.2012, 11:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: 2
Всего: 2
И каким образом мне поможет событие OnMouseDown, если мне нужно OnMouseMove?
PM MAIL   Вверх
586
Дата 5.2.2012, 11:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

Репутация: 57
Всего: 146
Заведи переменную.
В OnMouseDown, если нажата правая кнопка, устанавливай переменную в true.
В OnMouseUp, если нажата правая кнопка, устанавливай переменную в false.
А в OnMouseMove обращайся к этой переменной.

Добавлено @ 11:41
Вот так ещё можно:
Код
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
    if(Shift.Contains(ssRight))
    {
        Beep(255,50);
    }
}


Это сообщение отредактировал(а) 586 - 5.2.2012, 11:42
PM   Вверх
Dem_max
Дата 5.2.2012, 11:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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

но только если мышь перемещается с нажатой ПКМ. Как это отследить?

тогда расшифруй что ты написал тут, какие то непонятные сокращения


--------------------
Американские программисты долго не могли понять, почему русские при зависании Windоws всё время повторяют "Твой зайка написал" ("Yоur bunnу wrоte")
PM MAIL   Вверх
Dem_max
Дата 5.2.2012, 12:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

Репутация: 14
Всего: 39
еще можно так
Код

void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y)
{
    if(Shift.Contains(ssRight)) ............................
}



--------------------
Американские программисты долго не могли понять, почему русские при зависании Windоws всё время повторяют "Твой зайка написал" ("Yоur bunnу wrоte")
PM MAIL   Вверх
586
Дата 5.2.2012, 12:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

Репутация: 57
Всего: 146
Я это и имел ввиду.
PM   Вверх
Нитонисе
Дата 5.2.2012, 14:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: 2
Всего: 2
Цитата(586 @  5.2.2012,  11:37 Найти цитируемый пост)
Заведи переменную.В OnMouseDown, если нажата правая кнопка, устанавливай переменную в true.В OnMouseUp, если нажата правая кнопка, устанавливай переменную в false.А в OnMouseMove обращайся к этой переменной.

Интересный и понятный вариант. Спасибо.


Цитата(586 @  5.2.2012,  11:37 Найти цитируемый пост)
Вот так ещё можно:

А вот по поводу Shift.Contains(ssRight) - думал это относится к контролю нажатости кнопки Shift, разве нет? И чем тогда отличаются TMouseButton и TShiftState?
PM MAIL   Вверх
586
Дата 5.2.2012, 19:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

Репутация: 57
Всего: 146
Цитата(Нитонисе @  5.2.2012,  15:59 Найти цитируемый пост)
А вот по поводу Shift.Contains(ssRight) - думал это относится к контролю нажатости кнопки Shift, разве нет? И чем тогда отличаются TMouseButton и TShiftState? 

В том, что параметр Shift показывает состояние сразу трёх кнопок мыши, с помощью него можно определить нажатие нескольких кнопок мыши сразу. А чтобы определить, нажатие какой кнопки привело к возникновению события OnMouseDown, используется параметр Button.

Это сообщение отредактировал(а) 586 - 5.2.2012, 19:16
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1022 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.