class interface DIALOG_COMMAND creation make (dlg: MODELESS_DIALOG) -- Create and associate with a valid dialog box. require valid: dlg /= Void and then dlg.is_valid ensure keep_reference: dialog = dlg feature(s) from GUI_COMMAND execute -- Command end of DIALOG_COMMAND