#=============================================================== # #--------------------------------------------------------------- Class rListbox { inherit rWidget Listbox public geo_x 50 public geo_y 10 public geo_text "Listbox" public geo_height 10 public geo_width 10 protected _geo_bg "" protected _geo_active_bg "" protected _geo_highlight_bg "" protected _geo_selected_bg "" protected _geo_selected_fg "" protected _geo_selected_bw "" protected _geo_fg "" protected _geo_rPad "" protected _res_list "geo_bg geo_rPad geo_active_bg geo_highlight_bg geo_relief geo_borderwidth" protected _geo_relief "" public int_moveable "Y" public int_show_attr "Y" constructor { config } { set geo_text "Listbox" } } ;# end of class