


Tk:message-box(n)         STk procedure         Tk:message-box(n)


NAME
       Tk:message-box  - pops up a message window and waits for user response.

SYNOPSIS
       (Tk:message-box ?option value ...?)


DESCRIPTION
       This procedure creates and displays a message window with  an  applica-
       tion-specified message, an icon and a set of buttons.  Each of the but-
       tons in the message window is identified by a unique symbolic name (see
       the :type options).  After the message window is popped up, Tk:message-
       box waits for the user to select one of the buttons.  Then  it  returns
       the symbolic name of the selected button.

       The following option-value pairs are supported:

       :default name
              Name gives the symbolic name of the default button for this mes-
              sage window ('ok', 'cancel', and so on). See :type for a list of
              the  symbolic  names.  If the message box has just one button it
              will automatically be made the default, otherwise if this option
              is not specified, there won't be any default button.

       :icon iconImage
              Specifies  an icon to display. IconImage must be one of the fol-
              lowing: error, info, question or warning. If this option is  not
              specified, then no icon will be displayed.

       :message string
              Specifies  the  message  to display in this message box.  :title
              titleString Specifies a string to display as the  title  of  the
              message box. The default value is an empty string.

       :type predefinedType
              Arranges  for  a  predefined set of buttons to be displayed. The
              following values are possible for predefinedType:

              AbortRetryIgnore  Displays three buttons  whose  symbolic  names
                                are abort, retry and ignore.

              Ok                Displays one button whose symbolic name is ok.

              OkCancel          Displays two buttons whose symbolic names  are
                                ok and cancel.

              RetryCancel       Displays  two buttons whose symbolic names are
                                retry and cancel.

              YesNo             Displays two buttons whose symbolic names  are
                                yes and no.

              YesNoCancel       Displays  three  buttons  whose symbolic names
                                are yes, no and cancel.



STk                            4.2                              1





Tk:message-box(n)         STk procedure         Tk:message-box(n)


EXAMPLE
       (let ((answer (Tk:message-box :message "Really quit?"
                                     :type 'YesNo
                                     :icon 'question)))
         (case answer
           ((yes) (exit))
           (else  (Tk:message-box :message "I know you like this application!"
                                  :type 'Ok))))

SEE ALSO
       make-dialog














































STk                            4.2                              2


