func init // adds using namespace sys.add_use('System.ComponentModel') // initialize instance this.setfield('obj', sys.get_typed_field(this.codename, 'Instance', 20)) if(this.obj == this.codename) sys.add_object(this.obj, 'Component') end // makes implementation methods for properties sys._prop_init('Container', 1, 0, 0) sys._prop_init('Site', 1, 1, 0) // makes implementation of methods as properties sys._mtd_as_prop_init('ToString()') sys._mtd_as_prop_init('Component') // makes implementation of simple methods sys._method_init('Dispose') // initialize properties this.init_props(blk_init) end func init_props(blk_out) sys.blk_init_store(blk_out) // initialize events if(not (this.onDisposed == 'defined')) sys.event_imp('onDisposed') end sys.event_add('onDisposed') sys.blk_init_restore(blk_out) end func doConstructor() blk.println(this.obj, ' = new Component();') this.init_props(blk) end func doComponent(data) blk.println(this.obj, ' = ', d("Value"), ';') end