func init // adds using namespace sys.add_use('System.IO') sys.add_use('HiAsm') // adds assembly include("SDK") // initialize instance params = this.props('Constructor').value if(params == 'Constructor') // add widget sys.add_widget('SDKToolBox') // initialize properties this.init_props(blk_init) else sys.add_var(this.name, 'SDKToolBox') end // makes implementation methods for properties sys._prop_init('AllowEndUserDocking', 1, 1, 104) sys._prop_init('AutoHidePortion', 1, 1, 7) sys._prop_init('CloseButton', 1, 1, 104) sys._prop_init('CloseButtonVisible', 1, 1, 104) sys._prop_init('DockAreas', 1, 1, 0) sys._prop_init('.DockState', 1, 1, 0) sys._prop_init('HideOnClose', 1, 1, 104) sys._prop_init('ShowHint', 1, 1, 0) sys._prop_init('TabPageContextMenu', 1, 1, 0) sys._prop_init('TabPageContextMenuStrip', 1, 1, 0) sys._prop_init('TabText', 1, 1, 2) sys._prop_init('ToolTipText', 1, 1, 2) // makes implementation of methods as properties sys._mtd_as_prop_init('SDKToolBox') // makes implementation of simple methods sys._method_init('Show') end func init_props(blk_out) sys.blk_init_store(blk_out) // initialize properties sys.set_typed_field(104, 'AllowEndUserDocking') sys.set_typed_field(104, 'CloseButton') sys.set_typed_field(104, 'CloseButtonVisible') sys.set_typed_field(104, 'HideOnClose') sys.set_typed_field(14, 'ShowHint', '', 'DockState') sys.set_typed_field(104, 'ShowIcon') sys.set_typed_field(20, 'TabPageContextMenu') sys.set_typed_field(20, 'TabPageContextMenuStrip') sys.set_typed_field(2, 'TabText') sys.set_typed_field(2, 'ToolTipText') if(not isdef("DockAreas")) a = this.props("DockAreas").value flg = ((a _and_ 1) ? '|DockAreas.Float' : '') + ((a _and_ 2) ? '|DockAreas.DockLeft' : '') + ((a _and_ 4) ? '|DockAreas.DockRight' : '') + ((a _and_ 8) ? '|DockAreas.DockTop' : '') + ((a _and_ 16) ? '|DockAreas.DockBottom' : '') + ((a _and_ 32) ? '|DockAreas.Document' : '') blk_out.println(this.codename, '.DockAreas = 0', flg, ';') end // initialize events if(not (this.onDockStateChanged == 'defined')) sys.event_imp('onDockStateChanged') end sys.event_add('onDockStateChanged') // initialize common events and properties include("Control-init") sys.blk_init_restore(blk_out) end func doDraw(data) blk.println(this.codename, '.show(', d("SDKView", 20), ');') end func doShow2(data) blk.println(this.codename, '.Show(', sys.get_frame_above(), ', ', d("rect"), ');') end func doShow3(data) blk.println(this.codename, '.Show(', sys.get_frame_above(), ', ', d('DockState', 20, data), ');') end include("Control")