class button :Inherits?align:align -> ?icon:icon -> ?label:string -> ?border:bool -> ?tooltip:string -> unit ->
object
..end
method set_icon : icon -> unit
method set_label : string -> unit
method set_border : bool -> unit
method default : unit -> unit