• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
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
25from tkinter.commondialog import Dialog
26
27#
28# constants
29
30# icons
31ERROR = "error"
32INFO = "info"
33QUESTION = "question"
34WARNING = "warning"
35
36# types
37ABORTRETRYIGNORE = "abortretryignore"
38OK = "ok"
39OKCANCEL = "okcancel"
40RETRYCANCEL = "retrycancel"
41YESNO = "yesno"
42YESNOCANCEL = "yesnocancel"
43
44# replies
45ABORT = "abort"
46RETRY = "retry"
47IGNORE = "ignore"
48OK = "ok"
49CANCEL = "cancel"
50YES = "yes"
51NO = "no"
52
53
54#
55# message dialog class
56
57class 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
67def _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, yes/no is converted into a boolean.
74    if isinstance(res, bool):
75        if res:
76            return YES
77        return NO
78    # In others we get a Tcl_Obj.
79    return str(res)
80
81
82def showinfo(title=None, message=None, **options):
83    "Show an info message"
84    return _show(title, message, INFO, OK, **options)
85
86
87def showwarning(title=None, message=None, **options):
88    "Show a warning message"
89    return _show(title, message, WARNING, OK, **options)
90
91
92def showerror(title=None, message=None, **options):
93    "Show an error message"
94    return _show(title, message, ERROR, OK, **options)
95
96
97def askquestion(title=None, message=None, **options):
98    "Ask a question"
99    return _show(title, message, QUESTION, YESNO, **options)
100
101
102def askokcancel(title=None, message=None, **options):
103    "Ask if operation should proceed; return true if the answer is ok"
104    s = _show(title, message, QUESTION, OKCANCEL, **options)
105    return s == OK
106
107
108def askyesno(title=None, message=None, **options):
109    "Ask a question; return true if the answer is yes"
110    s = _show(title, message, QUESTION, YESNO, **options)
111    return s == YES
112
113
114def askyesnocancel(title=None, message=None, **options):
115    "Ask a question; return true if the answer is yes, None if cancelled."
116    s = _show(title, message, QUESTION, YESNOCANCEL, **options)
117    # s might be a Tcl index object, so convert it to a string
118    s = str(s)
119    if s == CANCEL:
120        return None
121    return s == YES
122
123
124def askretrycancel(title=None, message=None, **options):
125    "Ask if operation should be retried; return true if the answer is yes"
126    s = _show(title, message, WARNING, RETRYCANCEL, **options)
127    return s == RETRY
128
129
130# --------------------------------------------------------------------
131# test stuff
132
133if __name__ == "__main__":
134
135    print("info", showinfo("Spam", "Egg Information"))
136    print("warning", showwarning("Spam", "Egg Warning"))
137    print("error", showerror("Spam", "Egg Alert"))
138    print("question", askquestion("Spam", "Question?"))
139    print("proceed", askokcancel("Spam", "Proceed?"))
140    print("yes/no", askyesno("Spam", "Got it?"))
141    print("yes/no/cancel", askyesnocancel("Spam", "Want it?"))
142    print("try again", askretrycancel("Spam", "Try again?"))
143