Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Скриптовые языки программирования > Perl
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.04.2010, 18:23   #1
Remisto
Новичок
Джуниор
 
Регистрация: 23.04.2010
Сообщений: 2
Вопрос Canvas Perl/Tk

Доброго времени суток, уважаемые.

Возник такой вопрос:
Можно ли как-то обработать клик на объекте Canvas?
Или даже так: можно ли узнать координаты точки, в которой только что кликнули мышкой?

Вообще делаю игру "Реверси" по Перлу, может у кого-то найдутся конструктивные предложения?
Remisto вне форума Ответить с цитированием
Старый 23.04.2010, 19:48   #2
UnderwooD
Пользователь
 
Регистрация: 25.03.2010
Сообщений: 15
По умолчанию

конечно можно. используй событие onMouseDown Canvas'а.
UnderwooD вне форума Ответить с цитированием
Старый 23.04.2010, 20:43   #3
Remisto
Новичок
Джуниор
 
Регистрация: 23.04.2010
Сообщений: 2
По умолчанию

Не могли ли бы вы показать, как вызывать это событие?
Да и вообще все события.
Сейчас разобрался только с тем, что у некоторых объектов есть свойство -command, где можно указать подпрограмму.

Также хотелось бы узнать координаты точки, куда кликнул пользователь...
Remisto вне форума Ответить с цитированием
Старый 24.04.2010, 22:23   #4
UnderwooD
Пользователь
 
Регистрация: 25.03.2010
Сообщений: 15
По умолчанию

У каждого объекта, используемого в программе, есть определенный список событий, на которые он может реагировать (Вкладка Events окна Object Inspector). Так вот, когда какое-нибудь из этих событий случается, срабатывает обработчик события, прописанный в соответствующей строке.
Событие OnMouseDown возникает при нажатии какой-либо кнопки мыши.
При этом в событие передается в параметрах X и Y координата нажатия, а в параметре Button - тип кнопки (левая, правая и т.д.). есть там еще какой-то параметр, но я его не помню=). Вот, вроде все!
UnderwooD вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Инсталировать PERL Stilet Perl 1 17.01.2008 19:35