tk_messageBox

Выводит окно сообщения и ждет ответа пользователя.

СИНТАКСИС

      tk_messageBox ?параметр значение...?
    

ОПИСАНИЕ

Эта процедура создает и выводит на экран окно сообщения, в котором находится определяемое приложением сообщение, пиктограмма и набор кнопок. Каждая из кнопок в окне сообщения отождествляется с уникальным символическим именем (см. параметры -type). После появления окна сообщения команда tk_messageBox ожидает, пока пользователь не выберет одну из кнопок. После того, как выбор сделан, команда возвращает символическое имя выбранной кнопки. Команда поддерживает следующие пары параметр-значение:

-default имя
Параметр имя задает символическое имя кнопки по умолчанию для окна сообщения ('ok', 'cancel' и т.п.). Список возможных символических имен см. в описании параметра -type. Если в окне сообщения лишь одна кнопка, то она автоматически делается кнопкой по умолчанию; если же кнопок несколько, а параметр -default не задан, то кнопки по умолчанию не будет.
-icon изобрПикт
Задает выводимую пиктограмму. Параметр изобрПикт может иметь одно из следующих значений: error, info, question или warning. Если параметр не указан, то пиктограмма не выводится.
-message строка
Задает сообщение, выводимое в окне сообщений.
-parent окно
Делает окно логическим родителем окна сообщений. Окно сообщения выводится поверх своего родительского окна.
-title строкаЗаголовка
Задает текстовую строку, которая выводится в качестве заголовка в окне сообщения. Значением параметра по умолчанию является пустая строка.
-type предопределенныйТип
Устанавливает предопределенный набор кнопок в окне. Параметр предопределенныйТип может иметь следующие значения:
abortretryignore
Выводит три кнопки с символическими именами abort, retry и ignore.
ok
Выводит одну кнопку с символическим именем ok.
okcancel
Выводит две кнопки с символическими именами ok и cancel.
retrycancel
Выводит две кнопки с символическими именами retry и cancel.
yesno
Выводит две кнопки с символическими именами yes и no.
yesnocancel
Выводит три кнопки с символическими именами yes, no и cancel.

ПРИМЕР

      set answer [tk_messageBox -message "Really quit?" -type yesno -icon question]
      case  {
        yes exit
        no {tk_messageBox -message "I know you like this application!" -type ok}
      }