17db96d56Sopenharmony_ci# tk common message boxes
27db96d56Sopenharmony_ci#
37db96d56Sopenharmony_ci# this module provides an interface to the native message boxes
47db96d56Sopenharmony_ci# available in Tk 4.2 and newer.
57db96d56Sopenharmony_ci#
67db96d56Sopenharmony_ci# written by Fredrik Lundh, May 1997
77db96d56Sopenharmony_ci#
87db96d56Sopenharmony_ci
97db96d56Sopenharmony_ci#
107db96d56Sopenharmony_ci# options (all have default values):
117db96d56Sopenharmony_ci#
127db96d56Sopenharmony_ci# - default: which button to make default (one of the reply codes)
137db96d56Sopenharmony_ci#
147db96d56Sopenharmony_ci# - icon: which icon to display (see below)
157db96d56Sopenharmony_ci#
167db96d56Sopenharmony_ci# - message: the message to display
177db96d56Sopenharmony_ci#
187db96d56Sopenharmony_ci# - parent: which window to place the dialog on top of
197db96d56Sopenharmony_ci#
207db96d56Sopenharmony_ci# - title: dialog title
217db96d56Sopenharmony_ci#
227db96d56Sopenharmony_ci# - type: dialog type; that is, which buttons to display (see below)
237db96d56Sopenharmony_ci#
247db96d56Sopenharmony_ci
257db96d56Sopenharmony_cifrom tkinter.commondialog import Dialog
267db96d56Sopenharmony_ci
277db96d56Sopenharmony_ci__all__ = ["showinfo", "showwarning", "showerror",
287db96d56Sopenharmony_ci           "askquestion", "askokcancel", "askyesno",
297db96d56Sopenharmony_ci           "askyesnocancel", "askretrycancel"]
307db96d56Sopenharmony_ci
317db96d56Sopenharmony_ci#
327db96d56Sopenharmony_ci# constants
337db96d56Sopenharmony_ci
347db96d56Sopenharmony_ci# icons
357db96d56Sopenharmony_ciERROR = "error"
367db96d56Sopenharmony_ciINFO = "info"
377db96d56Sopenharmony_ciQUESTION = "question"
387db96d56Sopenharmony_ciWARNING = "warning"
397db96d56Sopenharmony_ci
407db96d56Sopenharmony_ci# types
417db96d56Sopenharmony_ciABORTRETRYIGNORE = "abortretryignore"
427db96d56Sopenharmony_ciOK = "ok"
437db96d56Sopenharmony_ciOKCANCEL = "okcancel"
447db96d56Sopenharmony_ciRETRYCANCEL = "retrycancel"
457db96d56Sopenharmony_ciYESNO = "yesno"
467db96d56Sopenharmony_ciYESNOCANCEL = "yesnocancel"
477db96d56Sopenharmony_ci
487db96d56Sopenharmony_ci# replies
497db96d56Sopenharmony_ciABORT = "abort"
507db96d56Sopenharmony_ciRETRY = "retry"
517db96d56Sopenharmony_ciIGNORE = "ignore"
527db96d56Sopenharmony_ciOK = "ok"
537db96d56Sopenharmony_ciCANCEL = "cancel"
547db96d56Sopenharmony_ciYES = "yes"
557db96d56Sopenharmony_ciNO = "no"
567db96d56Sopenharmony_ci
577db96d56Sopenharmony_ci
587db96d56Sopenharmony_ci#
597db96d56Sopenharmony_ci# message dialog class
607db96d56Sopenharmony_ci
617db96d56Sopenharmony_ciclass Message(Dialog):
627db96d56Sopenharmony_ci    "A message box"
637db96d56Sopenharmony_ci
647db96d56Sopenharmony_ci    command  = "tk_messageBox"
657db96d56Sopenharmony_ci
667db96d56Sopenharmony_ci
677db96d56Sopenharmony_ci#
687db96d56Sopenharmony_ci# convenience stuff
697db96d56Sopenharmony_ci
707db96d56Sopenharmony_ci# Rename _icon and _type options to allow overriding them in options
717db96d56Sopenharmony_cidef _show(title=None, message=None, _icon=None, _type=None, **options):
727db96d56Sopenharmony_ci    if _icon and "icon" not in options:    options["icon"] = _icon
737db96d56Sopenharmony_ci    if _type and "type" not in options:    options["type"] = _type
747db96d56Sopenharmony_ci    if title:   options["title"] = title
757db96d56Sopenharmony_ci    if message: options["message"] = message
767db96d56Sopenharmony_ci    res = Message(**options).show()
777db96d56Sopenharmony_ci    # In some Tcl installations, yes/no is converted into a boolean.
787db96d56Sopenharmony_ci    if isinstance(res, bool):
797db96d56Sopenharmony_ci        if res:
807db96d56Sopenharmony_ci            return YES
817db96d56Sopenharmony_ci        return NO
827db96d56Sopenharmony_ci    # In others we get a Tcl_Obj.
837db96d56Sopenharmony_ci    return str(res)
847db96d56Sopenharmony_ci
857db96d56Sopenharmony_ci
867db96d56Sopenharmony_cidef showinfo(title=None, message=None, **options):
877db96d56Sopenharmony_ci    "Show an info message"
887db96d56Sopenharmony_ci    return _show(title, message, INFO, OK, **options)
897db96d56Sopenharmony_ci
907db96d56Sopenharmony_ci
917db96d56Sopenharmony_cidef showwarning(title=None, message=None, **options):
927db96d56Sopenharmony_ci    "Show a warning message"
937db96d56Sopenharmony_ci    return _show(title, message, WARNING, OK, **options)
947db96d56Sopenharmony_ci
957db96d56Sopenharmony_ci
967db96d56Sopenharmony_cidef showerror(title=None, message=None, **options):
977db96d56Sopenharmony_ci    "Show an error message"
987db96d56Sopenharmony_ci    return _show(title, message, ERROR, OK, **options)
997db96d56Sopenharmony_ci
1007db96d56Sopenharmony_ci
1017db96d56Sopenharmony_cidef askquestion(title=None, message=None, **options):
1027db96d56Sopenharmony_ci    "Ask a question"
1037db96d56Sopenharmony_ci    return _show(title, message, QUESTION, YESNO, **options)
1047db96d56Sopenharmony_ci
1057db96d56Sopenharmony_ci
1067db96d56Sopenharmony_cidef askokcancel(title=None, message=None, **options):
1077db96d56Sopenharmony_ci    "Ask if operation should proceed; return true if the answer is ok"
1087db96d56Sopenharmony_ci    s = _show(title, message, QUESTION, OKCANCEL, **options)
1097db96d56Sopenharmony_ci    return s == OK
1107db96d56Sopenharmony_ci
1117db96d56Sopenharmony_ci
1127db96d56Sopenharmony_cidef askyesno(title=None, message=None, **options):
1137db96d56Sopenharmony_ci    "Ask a question; return true if the answer is yes"
1147db96d56Sopenharmony_ci    s = _show(title, message, QUESTION, YESNO, **options)
1157db96d56Sopenharmony_ci    return s == YES
1167db96d56Sopenharmony_ci
1177db96d56Sopenharmony_ci
1187db96d56Sopenharmony_cidef askyesnocancel(title=None, message=None, **options):
1197db96d56Sopenharmony_ci    "Ask a question; return true if the answer is yes, None if cancelled."
1207db96d56Sopenharmony_ci    s = _show(title, message, QUESTION, YESNOCANCEL, **options)
1217db96d56Sopenharmony_ci    # s might be a Tcl index object, so convert it to a string
1227db96d56Sopenharmony_ci    s = str(s)
1237db96d56Sopenharmony_ci    if s == CANCEL:
1247db96d56Sopenharmony_ci        return None
1257db96d56Sopenharmony_ci    return s == YES
1267db96d56Sopenharmony_ci
1277db96d56Sopenharmony_ci
1287db96d56Sopenharmony_cidef askretrycancel(title=None, message=None, **options):
1297db96d56Sopenharmony_ci    "Ask if operation should be retried; return true if the answer is yes"
1307db96d56Sopenharmony_ci    s = _show(title, message, WARNING, RETRYCANCEL, **options)
1317db96d56Sopenharmony_ci    return s == RETRY
1327db96d56Sopenharmony_ci
1337db96d56Sopenharmony_ci
1347db96d56Sopenharmony_ci# --------------------------------------------------------------------
1357db96d56Sopenharmony_ci# test stuff
1367db96d56Sopenharmony_ci
1377db96d56Sopenharmony_ciif __name__ == "__main__":
1387db96d56Sopenharmony_ci
1397db96d56Sopenharmony_ci    print("info", showinfo("Spam", "Egg Information"))
1407db96d56Sopenharmony_ci    print("warning", showwarning("Spam", "Egg Warning"))
1417db96d56Sopenharmony_ci    print("error", showerror("Spam", "Egg Alert"))
1427db96d56Sopenharmony_ci    print("question", askquestion("Spam", "Question?"))
1437db96d56Sopenharmony_ci    print("proceed", askokcancel("Spam", "Proceed?"))
1447db96d56Sopenharmony_ci    print("yes/no", askyesno("Spam", "Got it?"))
1457db96d56Sopenharmony_ci    print("yes/no/cancel", askyesnocancel("Spam", "Want it?"))
1467db96d56Sopenharmony_ci    print("try again", askretrycancel("Spam", "Try again?"))
147