func init // adds using namespace sys.add_use('GongSolutions.Shell') // adds widget assembly sys.add_assembly('GongShell', 'GongShell.dll') // add widget sys.add_widget('ShellComboBox') // initialize properties if(not isdef('RootFolder')) blk_init.println(this.codename, '.RootFolder = new ShellItem(', d("RootFolder"), ');') end if(not isdef('SelectedFolder')) blk_init.println(this.codename, '.SelectedFolder = new ShellItem(', d("SelectedFolder"), ');') end sys.set_typed_field(104, 'Editable') sys.set_typed_field(20, 'ShellView') sys.set_typed_field(104, 'ShowFileSystemPath') // make methods for properties sys._prop_init('Editable', 1, 1, 104) sys._prop_init('ShellView', 1, 1, 0) sys._prop_init('ShowFileSystemPath', 1, 1, 104) // makes implementation of methods as properties sys._mtd_as_prop_init('ShellComboBox') // initialize events sys.event_imp('onFilterItem', '', '', '', 'Object sender, FilterItemEventArgs args') sys.event_add('onFilterItem', 'FilterItemEventHandler') sys.event_imp('onChanged') sys.event_add('onChanged') // initialize common events and properties include("Control-init") end func doRootFolder(data) blk.println(this.codename, '.RootFolder = new ShellItem(', d("RootFolder"), ');') end func RootFolder return(this.codename + '.RootFolder.FileSystemPath') end func doSelectedFolder(data) blk.println(this.codename, '.SelectedFolder = new ShellItem(', d("Path"), ');') end func SelectedFolder return(this.codename + '.SelectedFolder.FileSystemPath') end include("Control")