func init // adds using namespace sys.add_use('System.Windows.Forms') // initialize properties sys.set_typed_field(20, 'CurrentCulture') sys.set_typed_field(20, 'CurrentInputLanguage') sys.set_typed_field(2, 'SafeTopLevelCaptionFormat') sys.set_typed_field(104, 'UseWaitCursor') sys.set_typed_field(14, 'VisualStyleState', '', 'System.Windows.Forms.VisualStyles.VisualStyleState') // makes implementation methods for properties sys._prop_init('AllowQuit', 1, 0, 104, 'Application') sys._prop_init('CommonAppDataPath', 1, 0, 2, 'Application') sys._prop_init('CommonAppDataRegistry', 1, 0, 0, 'Application') sys._prop_init('CompanyName', 1, 0, 2, 'Application') sys._prop_init('CurrentCulture', 1, 1, 0, 'Application') sys._prop_init('CurrentInputLanguage', 1, 1, 0, 'Application') sys._prop_init('ExecutablePath', 1, 0, 2, 'Application') sys._prop_init('LocalUserAppDataPath', 1, 0, 2, 'Application') sys._prop_init('MessageLoop', 1, 0, 104, 'Application') sys._prop_init('OpenForms', 1, 0, 0, 'Application') sys._prop_init('ProductName', 1, 0, 2, 'Application') sys._prop_init('ProductVersion', 1, 0, 2, 'Application') sys._prop_init('RenderWithVisualStyles', 1, 0, 104, 'Application') sys._prop_init('SafeTopLevelCaptionFormat', 1, 1, 2, 'Application') sys._prop_init('StartupPath', 1, 0, 2, 'Application') sys._prop_init('UserAppDataPath', 1, 0, 2, 'Application') sys._prop_init('UserAppDataRegistry', 1, 0, 0, 'Application') sys._prop_init('UseWaitCursor', 1, 1, 104, 'Application') sys._prop_init('VisualStyleState', 1, 1, 0, 'Application') // initialize events sys.event_add('onApplicationExit', '', '', '', 'Application') sys.event_imp('onApplicationExit') sys.event_add('onEnterThreadModal', '', '', '', 'Application') sys.event_imp('onEnterThreadModal') sys.event_add('onIdle', '', '', '', 'Application') sys.event_imp('onIdle') sys.event_add('onLeaveThreadModal', '', '', '', 'Application') sys.event_imp('onLeaveThreadModal') sys.event_add('onThreadException', 'ThreadExceptionEventHandler', '', '', 'Application') sys.event_imp('onThreadException', '', '', '', 'Object sender, ThreadExceptionEventArgs args') sys.event_add('onThreadExit', '', '', '', 'Application') sys.event_imp('onThreadExit') end func doAddMessageFilter(data) blk.println('Application.AddMessageFilter(', d("value"), ');') end func doDoEvents() blk.println('Application.DoEvents();') end func doEnableVisualStyles() blk.println('Application.EnableVisualStyles();') end func doExit() blk.println('Application.Exit();') end func doExit2(data) blk.println('Application.Exit(', d("e"), ');') end func doExitThread() blk.println('Application.ExitThread();') end func doFilterMessage(data) if(linked("onFilterMessage")) event("onFilterMessage", 'Application.FilterMessage(' + 'ref ' + d("message") + ')') else blk.println('Application.FilterMessage(', 'ref ', d("message"), ');') end end func OleRequired return('Application.OleRequired()') end func doOnThreadException(data) blk.println('Application.OnThreadException(', d("t"), ');') end func doRaiseIdle(data) blk.println('Application.RaiseIdle(', d("e"), ');') end func doRegisterMessageLoop(data) blk.println('Application.RegisterMessageLoop(', d("callback"), ');') end func doRemoveMessageFilter(data) blk.println('Application.RemoveMessageFilter(', d("value"), ');') end func doRestart() blk.println('Application.Restart();') end func doRun() blk.println('Application.Run();') end func doRun2(data) blk.println('Application.Run(', d("context"), ');') end func doRun3(data) blk.println('Application.Run(', d("mainForm"), ');') end func doSetCompatibleTextRenderingDefault(data) blk.println('Application.SetCompatibleTextRenderingDefault(', d("defaultValue"), ');') end func doSetSuspendState(data) if(linked("onSetSuspendState")) event("onSetSuspendState", 'Application.SetSuspendState(' + d("state") + ', ' + d("force") + ', ' + d("disableWakeEvent") + ')') else blk.println('Application.SetSuspendState(', d("state"), ', ', d("force"), ', ', d("disableWakeEvent"), ');') end end func doSetUnhandledExceptionMode(data) blk.println('Application.SetUnhandledExceptionMode(', d("mode"), ');') end func doSetUnhandledExceptionMode2(data) blk.println('Application.SetUnhandledExceptionMode(', d("mode"), ', ', d("threadScope"), ');') end func doUnregisterMessageLoop() blk.println('Application.UnregisterMessageLoop();') end