Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.92/13: Рейтинг темы: голосов - 13, средняя оценка - 4.92
3 / 6 / 0
Регистрация: 02.04.2009
Сообщений: 165
1

Работа с PopupMenu левой и правой кнопками мыши

07.09.2015, 17:41. Показов 2577. Ответов 1
Метки нет (Все метки)

В моем проекте требуется задать возможность менять пользователем названия осей координат (показаны зеленым цветом) с помощью всплывающего меню.
Например, оси X поставить в соответствие ось -Z.
В данном проекте всплывающее меню PopupMenu1 вызывается левой кнопкой мыши и название оси выбирается нажатием левой кнопки мыши.
При нажатии правой кнопки мыши всплывающее меню PopupMenu1 вызывается, но выбрать название оси левой кнопки мыши уже не удается.
Как можно это исправить? Т.е. предусмотреть возможность вызывать PopupMenu1 и левой и правой кнопками мыши так, чтобы можно было выбирать название оси левой кнопкой мыши.
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
procedure TFormShowBasis.SpeedButtonXClick(Sender: TObject);
// Вызывается только при нажатии левой клавиши мыши
var
    p: tpoint;
begin
    actBut := Sender;
    with Sender as TSpeedButton do
    begin
        p := Point(0, Height);
        p := ClientToScreen(p);
        if Assigned(PopupMenu) then
            PopupMenu.Popup(p.X, p.y);
    end;
end;
 
procedure TFormShowBasis.gfhhf1Click(Sender: TObject);
// Вызывается при выборе оси и правой и левой кнопкой мыши
begin
    TSpeedButton(actBut).caption := TMenuItem(Sender).caption;
    UpdateTag(Sender);
    Memo1.Visible := false;
end;
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Миниатюры
Работа с PopupMenu левой и правой кнопками мыши  
Вложения
Тип файла: rar FShowbasis.rar (4.1 Кб, 5 просмотров)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.09.2015, 17:41
Ответы с готовыми решениями:

Нажатие на пункт PopupMenu MenuItem по событию MenuItemClick правой или левой кнопкой мыши
Собственно никак не получается. Надо, чтобы по левой работал код пункта, а по правой только чекинг...

Работа с мышью: вывести квадрат нажатием левой кнопки мыши и спрятать его нажатием правой кнопки мыши
Ребят обьясните как вывести квадрат левым нажатием кнопки мыши и спрятав его правым нажатием кнопки...

При нажатии левой клавиши "мыши" отразить курсор в левой половине экрана, а при нажатии правой - в правой
При нажатии левой клавиши "мыши" отразить курсор в левой половине экрана, а при нажатии правой - в...

Имитация нажатия левой и правой кнопки мыши
Тут на форуме просто свалка из таких тем, и везде мегаметоды для этого писать надо, Подскажите...

1
678 / 501 / 231
Регистрация: 02.10.2012
Сообщений: 1,717
07.09.2015, 17:53 2
событие ContextPopup реагирует на правую, событие Click на левую, вызвать меню - PopupMenu.PopUp, используя обычный button или bitbtn
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.09.2015, 17:53

Получить координаты нажатий левой и правой кнопок мыши
вот надо получить координаты нажатий левой и правой кнопок мыши. меня вот что интересует после...

Тренажёр мыши, нажатие левой и правой кнопки поочерёдно
Вообщем проблема такая, мне нужно сделать тренажёр мыши. Я всё сделал вроде, но есть одна...

Подсчёт количества «кликов» левой, правой и средней кнопки мыши
Написать приложение, в котором ведётся подсчёт количества «кликов» левой, правой и средней кнопки...

Смена картинки в picturebox winforms по нажатию правой/левой кнопки мыши
как реализовать смену картинки по правому или левому/нажатию кнопки мыши? Помогите плиз


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.