Mercurial > octave-libtiff
comparison scripts/gui/questdlg.m @ 30195:a7981aa5822b
event-manager: Add function to signal valid implementation of GUI dialogs (bug #60980).
The event-manager is also enabled when starting with --no-gui-libs. But not all
implementations of the event-manager have dialogs (only Qt at the moment which
isn't used when starting with --no-gui-libs). Add functions that return if the
event-manager has implemented dialogs.
* libinterp/corefcn/event-manager.h (interpreter_events::have_dialogs,
event_manager::have_dialogs): Add new function "have_dialogs".
(event_manager::file_dialog, event_manager::input_dialog,
event_manager::list_dialog, event_manager::question_dialog): Guard with
"have_dialogs".
* libinterp/corefcn/event-manager.cc (F__event_manager_have_dialogs__): Add new
function.
* libgui/src/qt-interpreter-events.h (qt_interpreter_events::have_dialogs): Add
new function.
* scripts/gui/inputdlg.m, scripts/gui/listdlg.m, scripts/gui/msgbox.m,
scripts/gui/questdlg.m, scripts/gui/uigetdir.m, scripts/gui/uigetfile.m,
scripts/gui/uiputfile.m: Check "____event_manager_have_dialogs__" instead of
"__event_manager_enabled__".
* scripts/gui/private/__get_funcname__.m: Try to use dialog functions specific
to the current graphics toolkit if the event-manager doesn't have implemented
dialogs.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Sun, 19 Sep 2021 15:36:19 +0200 |
parents | 7854d5752dd2 |
children | 796f54d4ddbf |
comparison
equal
deleted
inserted
replaced
30194:d603f1229301 | 30195:a7981aa5822b |
---|---|
122 error (defbtn_error_msg); | 122 error (defbtn_error_msg); |
123 endif | 123 endif |
124 | 124 |
125 endswitch | 125 endswitch |
126 | 126 |
127 if (__event_manager_enabled__ ()) | 127 if (__event_manager_have_dialogs__ ()) |
128 btn = __event_manager_question_dialog__ (msg, title, options{1}, options{2}, | 128 btn = __event_manager_question_dialog__ (msg, title, options{1}, options{2}, |
129 options{3}, options{4}); | 129 options{3}, options{4}); |
130 else | 130 else |
131 error ("questdlg is not available in this version of Octave"); | 131 error ("questdlg is not available in this version of Octave"); |
132 endif | 132 endif |
133 | 133 |
134 endfunction | 134 endfunction |