Class Wpane.dialog

class [[> `APPLY | `CANCEL ]] dialog : title:string -> window:GWindow.window -> ?resize:bool -> unit -> object .. end
Inherits
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

Closes the dialog.

method select : 'a -> unit

Closes the dialog.

method run : unit -> unit

Opens the dialog (asynchronously).