Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.78/18: Рейтинг темы: голосов - 18, средняя оценка - 4.78
7 / 7 / 1
Регистрация: 22.12.2012
Сообщений: 173

Правый клик мыши

29.06.2013, 21:38. Показов 3394. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Пытаюсь сделать игру "Сапер". Столкнулся с двумя проблемами:
1. Как сделать чтоб различались действия при нажатии правой и левой клавиши мыши?
2. Как сделать чтоб при открытии пустой клетки открывались все соединенные с ней до появления первых цифр?
уже несколько часов пытаюсь что-то придумать, пробовал через рекурсию... но что-то не получается.
Помогите плз

Добавлено через 37 минут
Цитата Сообщение от gorus95 Посмотреть сообщение
2. Как сделать чтоб при открытии пустой клетки открывались все соединенные с ней до появления первых цифр?
С этим уже разобрался. Всё-таки сделал через рекурсию.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
29.06.2013, 21:38
Ответы с готовыми решениями:

Программный клик мыши
Как сделать так, чтобы программа кликнула мышкой? Пример: нажима готово в проге, она передвигает курсор на эту же кнопку и программа...

Как в паскале определить двойной клик мыши?
Как в паскале определить двойной клик мыши?

Правый клик мыши работает, как левый клик
Привет, уж очень достает момент, когда на сайтах или на компе нажимаешь на правую кнопки мыши с целью открыть меню\подменю, то почему-то...

3
38 / 38 / 13
Регистрация: 09.03.2013
Сообщений: 114
Записей в блоге: 2
29.06.2013, 22:01
Если у тебя кнопки, то через событие MouseDown
Аргументы этого события (System.Windows.Forms.MouseEventArgs) содержат кнопку мыши

Если непонятно, вот небольшой пример
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses system.Windows.forms;
 
var b:Button; f:Form;
 
procedure onMouseDown(sender:object;e:system.windows.forms.MouseEventArgs);
begin
writeln('Event catched!');
writeln('Кнопка: '+e.Button);
end;
 
begin
f:=new Form;
b:=new Button;
f.controls.add(b);
b.MouseDown+=onMouseDown;
application.run(f);
end.
Аргументы MouseEventArgs используются для событий MouseDown MouseMove MouseUp
0
Почетный модератор
 Аватар для КонецСвета
7966 / 3937 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
29.06.2013, 22:02
Pascal
1
2
3
4
5
procedure MouseDown(x,y,mb: integer);
begin
 if mb=1 then //действие по щелчку левой кнопкой
    else //действие по щелчку правой
end;
подойдет? )
0
7 / 7 / 1
Регистрация: 22.12.2012
Сообщений: 173
29.06.2013, 22:08  [ТС]
Цитата Сообщение от gorus95 Посмотреть сообщение
1. Как сделать чтоб различались действия при нажатии правой и левой клавиши мыши?
уже и с этим разобрался)

Добавлено через 18 секунд
@КонецСвета, да, я уже сам нашел) спасибо)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
29.06.2013, 22:08
Помогаю со студенческими работами здесь

Правый клик по кнопке
Создал диалоговое приложение (MFC), в нем кнопка. Хотел сделать обработчик на правый клик по этой кнопки, но не получается. Подскажите...

Правый клик по ячейке таблицы
Народ такой вопрос. Если клик левой кнопки мыши обрабатывается так: void MainWindow::on_tableWidget_clicked(const QModelIndex &index)...

Awesomium запретить правый клик
Здраствуйте, ребят может кто то работал с Awesomium, подскажите, как в коде реализовать запрет на нажатие правой клавишы ну т.е сделать что...

Правый клик на Node в VirtualStringTree
Есть дерево 2х уровневое. Задача - при клике на Node вызывать менюшку popup, но РАЗНУЮ для родительских и дочерних Node'ов. Есть...

OnAction на правый клик (Excel, Vba)
Здравствуйте! На листе разные Shapes. При клике работает определенная процедура (OnAction) . Все работает, но нужен совет: При правом...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru