func init // adds using namespace sys.add_use('System.Windows.Forms') // initialize instance sys.add_widget('TextBox') // makes implementation methods for properties sys._prop_init('AcceptsReturn', 1, 1, 104) sys._prop_init('AutoCompleteCustomSource', 1, 1, 0) sys._prop_init('AutoCompleteMode', 1, 1, 0) sys._prop_init('AutoCompleteSource', 1, 1, 0) sys._prop_init('CharacterCasing', 1, 1, 0) sys._prop_init('Multiline', 1, 1, 104) sys._prop_init('PasswordChar', 1, 1, 106) sys._prop_init('ScrollBars', 1, 1, 0) sys._prop_init('Text', 1, 0, 2) sys._prop_init('TextAlign', 1, 1, 0) sys._prop_init('UseSystemPasswordChar', 1, 1, 104) // makes implementation of methods as properties sys._mtd_as_prop_init('TextBox') // 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(104, 'AcceptsReturn') sys.set_typed_field(20, 'AutoCompleteCustomSource') sys.set_typed_field(14, 'AutoCompleteMode', '', 'System.Windows.Forms.AutoCompleteMode') sys.set_typed_field(14, 'AutoCompleteSource', '', 'System.Windows.Forms.AutoCompleteSource') sys.set_typed_field(14, 'CharacterCasing', '', 'System.Windows.Forms.CharacterCasing') sys.set_typed_field(104, 'Multiline') sys.set_typed_field(106, 'PasswordChar') sys.set_typed_field(14, 'ScrollBars', '', 'System.Windows.Forms.ScrollBars') if(not (this.prop_Text == 'defined')) sys.set_typed_field(2, 'Text') this.setfield('prop_Text', 'defined') end sys.set_typed_field(14, 'TextAlign', '', 'System.Windows.Forms.HorizontalAlignment') sys.set_typed_field(104, 'UseSystemPasswordChar') // initialize events if(not (this.onChange == 'defined')) sys.add_event('onChange', 'TextChanged', this.codename + '.Text') end if(not (this.onTextAlignChanged == 'defined')) sys.event_imp('onTextAlignChanged') end sys.event_add('onTextAlignChanged') // initialize common events and properties include("TextBoxBase-init") include("Control-init") sys.blk_init_restore(blk_out) end func doText(data) blk.println(this.codename + '.Text = ', d("Data"), ';') end func doPaste(data) blk.println(this.codename, '.Paste(', d("Data"), ');') end include("TextBoxBase") include("Control")