func init // adds using namespace sys.add_use('System.Windows.Forms') // initialize instance sys.add_object(this.codename, 'StatusBarPanel') if(pos(sys.get_frame_above(), 'StatusBar', 0)==0) blk_init.println(sys.get_frame_above(), '.Panels.Add(', this.codename, ');') end // makes implementation methods for properties sys._prop_init('Alignment', 1, 1, 0) sys._prop_init('AutoSize', 1, 1, 0) sys._prop_init('BorderStyle', 1, 1, 0) sys._prop_init('Icon', 1, 1, 0) sys._prop_init('MinWidth', 1, 1, 1) sys._prop_init('Name', 1, 1, 2) sys._prop_init('Parent', 1, 0, 0) sys._prop_init('Style', 1, 1, 0) sys._prop_init('Tag', 1, 1, 0) sys._prop_init('Text', 1, 1, 2) sys._prop_init('ToolTipText', 1, 1, 2) sys._prop_init('Width', 1, 1, 1) // makes implementation of methods as properties sys._mtd_as_prop_init('ToString()') sys._mtd_as_prop_init('StatusBarPanel') // makes implementation of simple methods sys._method_init('BeginInit') sys._method_init('EndInit') // initialize properties this.init_props(blk_init) end func init_props(blk_out) sys.blk_init_store(blk_out) // initialize properties sys.set_typed_field(14, 'Alignment', '', 'System.Windows.Forms.HorizontalAlignment') sys.set_typed_field(14, 'AutoSize', '', 'System.Windows.Forms.StatusBarPanelAutoSize') sys.set_typed_field(14, 'BorderStyle', '', 'System.Windows.Forms.StatusBarPanelBorderStyle') sys.set_typed_field(6, 'Icon') sys.set_typed_field(1, 'MinWidth') sys.set_typed_field(2, 'Name') sys.set_typed_field(14, 'Style', '', 'System.Windows.Forms.StatusBarPanelStyle') sys.set_typed_field(20, 'Tag') sys.set_typed_field(2, 'Text') sys.set_typed_field(2, 'ToolTipText') sys.set_typed_field(1, 'Width') sys.blk_init_restore(blk_out) end func doConstructor() blk.println(this.codename, ' = new StatusBarPanel();') this.init_props(blk) end