include("CommonDialog") include("FileDialog") func init // initialize instance sys.add_object(this.codename, 'SaveFileDialog') if(linked("DialogResult") and linked("doShowDialog")) sys.add_var('result', 'DialogResult') end // initialize properties sys.set_typed_field(104, 'AddExtension') sys.set_typed_field(104, 'CheckFileExists') sys.set_typed_field(104, 'CheckPathExists') sys.set_typed_field(104, 'CreatePrompt') sys.set_undef_field('DefaultExt') sys.set_typed_field(104, 'DereferenceLinks') sys.set_field('Filter') sys.set_undef_field('FilterIndex') sys.set_typed_field(104, 'OverwritePrompt') sys.set_typed_field(104, 'RestoreDirectory') sys.set_typed_field(104, 'ShowHelp') sys.set_typed_field(104, 'SupportMultiDottedExtensions') sys.set_typed_field(104, 'ValidateNames') sys.set_undef_field('Title') sys.set_undef_field('FileName') sys.set_field('InitialDirectory') // initialize events sys.add_event_type('onFileOk', 'FileOk', 'System.ComponentModel.CancelEvent', 'args') sys.add_event('onHelpRequest', 'HelpRequest', 'args') // initialize common events and properties include("FileDialog-init") include("CommonDialog-init") include("Component-init") end func doShowDialog blk.println((linked("DialogResult") ? this.result + ' = ' : ''), this.codename + '.ShowDialog();') end func doInitialDirectory(data) blk.println(this.codename, '.InitialDirectory = ', str(data), ';') end func doFileName(data) blk.println(this.codename, '.FileName = ', str(data), ';') end func doDefaultExt(data) blk.println(this.codename, '.DefaultExt = ', str(data), ';') end func doFilter(data) blk.println(this.codename, '.Filter = ', str(data), ';') end func doFilterIndex(data) blk.println(this.codename, '.FilterIndex = ', int(data), ';') end func doTitle(data) blk.println(this.codename, '.Title = ', str(data), ';') end func FileName return(this.codename + '.FileName') end func DialogResult if(linked("doShowDialog")) return(this.result) else return(this.codename + '.ShowDialog()') end end