Class Wpane.dialog

class [[> `APPLY | `CANCEL ]] dialog : title:string -> window:GWindow.window -> ?resize:bool -> unit -> object .. end

• signal Emitted when the dialog is closed.

method add_row : GObj.widget -> unit

method add_block : GObj.widget -> unit

method button : action:([> `APPLY | `CANCEL ] as 'a) action ->
       ?label:string -> ?icon:Widget.icon -> ?tooltip:string -> unit -> unit

method select : 'a -> unit

method run : unit -> unit