classInherits['a]select :('a -> string) -> (string -> 'a) -> 'a -> 'a list ->object..end
val mutable option_list : (AXOWidgets.common_wrap * 'a) listval mutable current : 'amethod get_value : 'amethod set_value : 'a -> unitmethod private set_value_ : string -> unitmethod add_option : 'a -> unitmethod private remove_by : (AXOWidgets.common_wrap * 'a -> bool) -> unitmethod remove_option : 'a -> unitmethod set_editable : bool -> unit