func init // adds using namespace sys.add_use('System.Windows.Forms') // initialize instance sys.add_widget('StatusStrip') // makes implementation methods for properties sys._prop_init('CanOverflow', 1, 1, 104) sys._prop_init('Dock', 1, 1, 0) sys._prop_init('GripStyle', 1, 1, 0) sys._prop_init('LayoutStyle', 1, 1, 0) sys._prop_init('ShowItemToolTips', 1, 1, 104) sys._prop_init('SizeGripBounds', 1, 0, 0) sys._prop_init('SizingGrip', 1, 1, 104) sys._prop_init('Stretch', 1, 1, 104) // makes implementation of methods as properties sys._mtd_as_prop_init('StatusStrip') // 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, 'Dock', '', 'System.Windows.Forms.DockStyle') sys.set_typed_field(14, 'GripStyle', '', 'System.Windows.Forms.ToolStripGripStyle') sys.set_typed_field(14, 'LayoutStyle', '', 'System.Windows.Forms.ToolStripLayoutStyle') sys.set_typed_field(104, 'ShowItemToolTips') sys.set_typed_field(104, 'SizingGrip') sys.set_typed_field(104, 'Stretch') // initialize common events and properties include("ToolStrip-init") include("ScrollableControl-init") include("Control-init") sys.blk_init_restore(blk_out) end func doConstructor() blk.println(this.codename, ' = new StatusStrip();') this.init_props(blk) end include("ToolStrip") include("ScrollableControl") include("Control")