Module Dialog

module Dialog: sig .. end
The dialog commands

val create : parent:'a Widget.widget ->
title:string ->
message:string ->
buttons:string list ->
?name:string -> ?bitmap:Tk.bitmap -> ?default:int -> unit -> int