symbian-qemu-0.9.1-12/python-2.6.1/Lib/lib-tk/tkMessageBox.py
changeset 1 2fb8b9db1c86
equal deleted inserted replaced
0:ffa851df0825 1:2fb8b9db1c86
       
     1 # tk common message boxes
       
     2 #
       
     3 # this module provides an interface to the native message boxes
       
     4 # available in Tk 4.2 and newer.
       
     5 #
       
     6 # written by Fredrik Lundh, May 1997
       
     7 #
       
     8 
       
     9 #
       
    10 # options (all have default values):
       
    11 #
       
    12 # - default: which button to make default (one of the reply codes)
       
    13 #
       
    14 # - icon: which icon to display (see below)
       
    15 #
       
    16 # - message: the message to display
       
    17 #
       
    18 # - parent: which window to place the dialog on top of
       
    19 #
       
    20 # - title: dialog title
       
    21 #
       
    22 # - type: dialog type; that is, which buttons to display (see below)
       
    23 #
       
    24 
       
    25 from tkCommonDialog import Dialog
       
    26 
       
    27 #
       
    28 # constants
       
    29 
       
    30 # icons
       
    31 ERROR = "error"
       
    32 INFO = "info"
       
    33 QUESTION = "question"
       
    34 WARNING = "warning"
       
    35 
       
    36 # types
       
    37 ABORTRETRYIGNORE = "abortretryignore"
       
    38 OK = "ok"
       
    39 OKCANCEL = "okcancel"
       
    40 RETRYCANCEL = "retrycancel"
       
    41 YESNO = "yesno"
       
    42 YESNOCANCEL = "yesnocancel"
       
    43 
       
    44 # replies
       
    45 ABORT = "abort"
       
    46 RETRY = "retry"
       
    47 IGNORE = "ignore"
       
    48 OK = "ok"
       
    49 CANCEL = "cancel"
       
    50 YES = "yes"
       
    51 NO = "no"
       
    52 
       
    53 
       
    54 #
       
    55 # message dialog class
       
    56 
       
    57 class Message(Dialog):
       
    58     "A message box"
       
    59 
       
    60     command  = "tk_messageBox"
       
    61 
       
    62 
       
    63 #
       
    64 # convenience stuff
       
    65 
       
    66 # Rename _icon and _type options to allow overriding them in options
       
    67 def _show(title=None, message=None, _icon=None, _type=None, **options):
       
    68     if _icon and "icon" not in options:    options["icon"] = _icon
       
    69     if _type and "type" not in options:    options["type"] = _type
       
    70     if title:   options["title"] = title
       
    71     if message: options["message"] = message
       
    72     res = Message(**options).show()
       
    73     # In some Tcl installations, Tcl converts yes/no into a boolean
       
    74     if isinstance(res, bool):
       
    75         if res: return YES
       
    76         return NO
       
    77     return res
       
    78 
       
    79 def showinfo(title=None, message=None, **options):
       
    80     "Show an info message"
       
    81     return _show(title, message, INFO, OK, **options)
       
    82 
       
    83 def showwarning(title=None, message=None, **options):
       
    84     "Show a warning message"
       
    85     return _show(title, message, WARNING, OK, **options)
       
    86 
       
    87 def showerror(title=None, message=None, **options):
       
    88     "Show an error message"
       
    89     return _show(title, message, ERROR, OK, **options)
       
    90 
       
    91 def askquestion(title=None, message=None, **options):
       
    92     "Ask a question"
       
    93     return _show(title, message, QUESTION, YESNO, **options)
       
    94 
       
    95 def askokcancel(title=None, message=None, **options):
       
    96     "Ask if operation should proceed; return true if the answer is ok"
       
    97     s = _show(title, message, QUESTION, OKCANCEL, **options)
       
    98     return s == OK
       
    99 
       
   100 def askyesno(title=None, message=None, **options):
       
   101     "Ask a question; return true if the answer is yes"
       
   102     s = _show(title, message, QUESTION, YESNO, **options)
       
   103     return s == YES
       
   104 
       
   105 def askyesnocancel(title=None, message=None, **options):
       
   106     "Ask a question; return true if the answer is yes, None if cancelled."
       
   107     s = _show(title, message, QUESTION, YESNOCANCEL, **options)
       
   108     # s might be a Tcl index object, so convert it to a string
       
   109     s = str(s)
       
   110     if s == CANCEL:
       
   111         return None
       
   112     return s == YES
       
   113 
       
   114 def askretrycancel(title=None, message=None, **options):
       
   115     "Ask if operation should be retried; return true if the answer is yes"
       
   116     s = _show(title, message, WARNING, RETRYCANCEL, **options)
       
   117     return s == RETRY
       
   118 
       
   119 
       
   120 # --------------------------------------------------------------------
       
   121 # test stuff
       
   122 
       
   123 if __name__ == "__main__":
       
   124 
       
   125     print "info", showinfo("Spam", "Egg Information")
       
   126     print "warning", showwarning("Spam", "Egg Warning")
       
   127     print "error", showerror("Spam", "Egg Alert")
       
   128     print "question", askquestion("Spam", "Question?")
       
   129     print "proceed", askokcancel("Spam", "Proceed?")
       
   130     print "yes/no", askyesno("Spam", "Got it?")
       
   131     print "yes/no/cancel", askyesnocancel("Spam", "Want it?")
       
   132     print "try again", askretrycancel("Spam", "Try again?")