func init // adds using namespace sys.add_use('System.Net') // initialize instance sys.add_object(this.codename, 'WebClient') // initialize properties sys.set_undef_field('BaseAddress') sys.set_typed_field(20, 'CachePolicy') sys.set_typed_field(20, 'Credentials') sys.set_typed_field(20, 'Encoding') sys.set_typed_field(20, 'Headers') sys.set_typed_field(20, 'Proxy') sys.set_typed_field(20, 'QueryString') sys.set_typed_field(104, 'UseDefaultCredentials') // makes implementation methods for properties sys._prop_init('BaseAddress', 1, 1, 2) sys._prop_init('CachePolicy', 1, 1, 0) sys._prop_init('Credentials', 1, 1, 0) sys._prop_init('Encoding', 1, 1, 0) sys._prop_init('Headers', 1, 1, 0) sys._prop_init('IsBusy', 1, 0, 104) sys._prop_init('Proxy', 1, 1, 0) sys._prop_init('QueryString', 1, 1, 0) sys._prop_init('ResponseHeaders', 1, 0, 0) sys._prop_init('UseDefaultCredentials', 1, 1, 104) // makes implementation of methods as properties sys._mtd_as_prop_init('WebClient') // initialize common events and properties include("Component-init") end