Команда bind позволяет привязать выполнение скриптов Tcl к X событиям. Команда назначает событиям ввода от "Мыши" и клавиатуры (Х событиям) исполнение скрипта Tcl.
bind тег
bind тег последовательность
bind тег последовательность скрипт
bind тег последовательность +скрипт
Команда bind привязывает Tcl скрипты к X событиям. Если заданы все три аргумента команды, то при каждом наступлении события последовательность в окне (окнах), описанных тегом, будет выполняться скрипт (скрипт Tcl). Если аргументу скрипт предшествует знак +, то скрипт добавляется к уже существующим привязкам к последовательности; в противном случае он замещает все имеющиеся привязки. Если аргумент скрипт пуст, то все имеющиеся привязки к последовательности отменяются, и последовательность становится несвязанной. Если аргумент скрипт присутствует, то команда bind возвращает пустую строку.
Если при отсутствии аргумента скрипт аргумент последовательность задан, то команда возвращает скрипт, привязанный к данной последовательности, или, в случае отсутствия такого скрипта, пустую строку. Если не задан ни один из аргументов последовательность и скрипт, то команда возвращает список, элементами которого служат все последовательности, имеющие привязки к окну тег.
Аргумент тег перечисляет окна, к которым выполняется привязка. Если значение аргумента начинается с точки, скажем ".a.b.c", то оно должно представлять собой путь к окну; в противном случае оно может быть произвольной строкой. Каждому окну приписан некоторый список тегов, и привязка к данному окну осуществляется, если значение аргумента тег присутствует в этом списке. Команда bindtags позволяет приписать окну произвольный набор тегов привязки; кроме того, по умолчанию окнам приписаны следующие теги:
Аргумент последовательность представляет собой последовательность одного или нескольких образцов событий. Каждый образец может быть записан в одном из трех видов. В простейшем случае это символ ASCII, скажем a или |. Этот символ не может быть пробелом или знаком <. Этот вид образцов соответствует событию KeyPress для конкретной клавиши. Образцы второго вида длиннее, однако, этот вид носит более общий характер. Его синтаксис выглядит следующим образом:
<модификатор-модификатор-тип-детализация>
Образец события целиком заключен в угловые скобки. Внутри угловых скобок располагаются несколько модификаторов (быть может, ни одного), тип события и дополнительная порция информации (детализация), указывающая конкретную кнопку или комбинацию клавиш. Одно из полей тип или детализация должно обязательно присутствовать, остальные могут быть опущены. Поля разделяются пробелами или дефисами.
Третья форма образца используется для задания поименованного виртуального события, определенного пользователем. У нее следующий синтаксис:
<<имя>>
Образец события целиком заключен в двойные угловые скобки. Внутри этих скобок содержится определенное пользователем имя виртуального события. С виртуальным событием нельзя комбинировать модификаторы, такие как Shiftили Control. Привязки к виртуальному событию можно создавать до описания самого события; при динамическом изменении этого описания все окна, привязанные к событию, будут обращаться к новому описанию.
Модификаторы могут быть следующими:
Если в строке приведено несколько элементов, разделенных запятыми, то они взаимозаменяемы. У большинства модификаторов есть очевидное X значение. Например, модификатор Button1 требует нажатия кнопки 1 для наступления события. Чтобы привязка соответствовала данному событию, среди модификаторов события должны содержаться все модификаторы, заданные в образце события. Кроме того событие может содержать и другие модификаторы, не приведенные в описании привязки. Например, при нажатии кнопки 1 одновременно с нажатием клавиш Shift и Ctrl событие подойдет под образец <Control-Button-1>, но не подойдет под образец <Mod1-Button-1>. Если ни один из модификаторов не был задан, то в событии может присутствовать любая комбинация модификаторов.
Модификаторы Meta и M заменяют любой из идентификаторов от M1 до M5, ассоциированный с метаклавишами на клавиатуре (коды клавиш Meta_R и Meta_L). При отсутствии метаклавиш или в случае, если они не ассоциированы ни с каким модификатором, модификаторы Meta и M не будут соответствовать никакому событию. Аналогично модификатор Alt заменяет любой из модификаторов, ассоциированных с alt-клавишами на клавиатуре (коды клавиш Alt_L и Alt_R).
Модификаторы Doubleи Triple обеспечивают удобную обработку двойного щелчка .Мыши. и других повторяющихся событий. Они требуют, чтобы данное событие повторилось дважды или трижды, и накладывают ограничения на время и место его повторения: для того, чтобы последовательность событий подходила под образец Double или Triple, промежуток времени между событиями должен быть коротким, а "Мышь" не должна сдвигаться. Например, комбинация <Double-Button-1> эквивалентна паре <Button-1><Button-1> с дополнительными временными и пространственными ограничениями.
Значением поля тип может быть любой из стандартных типов X событий, а также некоторые дополнительные сокращения. Ниже приведен список всех допустимых значений. Два имени, составляющие пару, синонимичны.
Последней частью длинной спецификации события является детализация. Для типов ButtonPress и ButtonRelease это номер кнопки (1-5). Если номер кнопки задан, то под образец подойдет только событие на указанной кнопке; если номер кнопки не задан, то под образец подойдет событие на любой из кнопок. Замечание: задание номера кнопки отличается от задания модификатора кнопки: в первом случае требуется, чтобы кнопка была нажата или отжата; во втором чтобы какая-то другая кнопка была отжата при наступлении события. Если номер кнопки задан, то поле тип можно опустить: по умолчанию оно будет иметь значение ButtonPress. Например, спецификатор <1> эквивалентен спецификатору <ButtonPress-1>.
Для типов KeyPress и KeyRelease детализацию можно указать в виде описателя X клавиши. В их число входят все алфавитно-цифровые символы ASCII (например, описатель a служит для описания символа ASCII "a"), а также описатели для неалфавитно-цифровых символов (описатель comma для запятой) и описатели для всех не ASCII-клавиш клавиатуры (Shift_L для левой клавиши верхнего регистра, F1 для первой функциональной клавиши при ее наличии). Мы не приводим здесь полный список клавиш. Он меняется от системы к системе, и его можно найти в других частях X документации. При необходимости можно получить описатель клавиши с помощью обозначения %K, описанного ниже. Если приведена детализация описателя клавиши, то поле тип может отсутствовать, по умолчанию принимается значение KeyPress. Например, спецификатор <Control-comma> эквивалентен спецификатору <Control-KeyPress-comma>.
Аргумент скрипт команды bind должен быть скриптом Tcl; при каждом наступлении события происходит выполнение этого скрипта. Команда выполняется тем же интерпретатором, что и команда bind, причем интерпретация происходит на верхнем уровне (доступны только значения глобальных переменных). Если в скрипте есть символы %, то его исполнение не будет осуществляться непосредственно. Каждый символ % и символ, следующий за ним, заменяются данными о происшедшем событии, в результате чего генерируется новый скрипт. Подстановка осуществляется в соответствии с приводимым ниже списком символов. Если не оговорено противное, то подставляемая строка представляет собой десятичное содержимое указанного поля события. Некоторые подстановки допустимы только для событий определенных типов: при использовании их с событиями других типов результат подстановки не определен.
Для прочих событий подставляемая строка не определена.
Строка подстановки для %-замещения форматируется как обычный элемент списка Tcl. Это означает, что при наличии в строке пробелов она заключается в фигурные скобки, а специальным символам, таким как `$' и `{' может предшествовать обратная косая черта. Такая строка нормально обрабатывается синтаксическим анализатором Tcl при выполнении скрипта. Строки подстановки по большей части являются числами или корректно определенными строками как, например, Above; такие строки не нуждаются ни в каком специальном форматировании. Чаще всего форматирования требуют строки, замещающие %A. Если, например, скрипт имеет вид
insert %A
и вводимым символом является открывающая квадратная скобка, то реально исполняемым скриптом будет
insert \[
т.е. в качестве первого аргумента insert получит исходную строку подстановки (открывающую квадратную скобку). Если бы обратная косая черта не была добавлена, Tcl не смог бы правильно обработать скрипт.
Данному X событию может отвечать несколько привязок. Если эти привязки соответствуют различным тегам, то все они выполняются по очереди. По умолчанию сначала исполняется привязка для примитива, затем привязка класса, затем привязка верхнего уровня и привязка all. Этот порядок для конкретного окна можно поменять с помощью команды bindtags, которая позволяет также выполнить дополнительные привязки к окну.
Управление обработкой скриптов, отвечающих образцу, осуществляется командами continue и break в привязанном скрипте. При выполнении команды continue выполнение текущего привязанного скрипта прерывается и Tk переходит к выполнению скриптов, соответствующих остальным тегам. При выполнении команды break выполнение текущего привязанного скрипта прерывается и никакие другие скрипты не выполняются.
Если данному событию соответствует несколько привязок с одним и тем же тегом, то из них выбирается наиболее конкретная привязка и выполняется ее скрипт. Выбор наиболее конкретной привязки осуществляется по следующим критериям:
если последовательность отвечает двум или более виртуальным событиям, то из них выбирается какое-нибудь одно, однако порядок выбора не определен.
Если в подходящей последовательности событий больше одного события, то критерии 1 - 5 применяются ко всем событиям, начиная с самого последнего и до самого первого события последовательности. Если критерии не позволяют определить победителя, то победителем становится событие, зарегистрированное последним.
Если одна и та же последовательность осуществляет переключение к двум (или более) виртуальным событиям, и теги окон этих виртуальных событий совпадают, то переключение произойдет лишь к одному из этих виртуальных событий, выбранному случайным образом:
event add <<Paste>> <Control-y>
event add <<Paste>> <Button-2>
event add <<Scroll>> <Button-2>
bind Entry <<Paste>> {puts Paste}
bind Entry <<Scroll>> {puts Scroll}
При нажатии Control-y будет выполнена привязка <<Paste>>, а при нажатии кнопки 2 одна из привязок <<Paste>> или <<Scroll>>, причем определить какой именно будет эта привязка, невозможно.
Если X событие не подходит ни под одну из существующих привязок, то событие игнорируется. Наступление не привязанного события не считается ошибкой.
Если аргумент последовательность в команде bind состоит из нескольких образцов событий, то скрипт выполняется в случае, если последние события (включая самое последнее) подходят под данную последовательность. Это означает, например, что при неоднократном последовательном нажатии кнопки 1 каждое из нажатий, за исключением самого первого, отвечает образцу <Doudble-ButtonPress-1>. Если в последовательности событий происходят посторонние события, то они игнорируются, за исключением событий KeyPress и ButtonPress. Например, нажатия на кнопку 1 будут соответствовать образцу <Doudble-ButtonPress-1>, даже если их перемежают события ButtonRelease или Motion. Кроме того событию KeyPressможет предшествовать произвольная последовательность событий KeyPress для модификаторов, среди которых нет модификаторов, нарушающих соответствие образцу. Например, последовательности событий aB отвечает нажатие на клавишу a, отпускание клавиши a, нажатие на клавишу Shift и нажатие на клавишу b, так как нажатие на клавишу модификатора Shift игнорируется. И, наконец, если последовательно происходит несколько событий Motion, то для установления соответствия привязке берется последнее из них.
При возникновении ошибки в процессе исполнения привязанного скрипта для выдачи сообщения об ошибке используется механизм bgerror. Команда bgerror исполняется на верхнем уровне (вне контекста любой из процедур Tcl).