Dialog.dialog
method window : Stk.Window.window
method content_area : Stk.Bin.bin
method action_area : unit Stk.Pack.box
method add_text_button : ?class_:string ->
?return:(unit -> 'a0 option) ->
?ks:Stk.Key.keystate ->
string ->
Stk.Button.button