-- Autogenerated by MSIL2Ada v. 2
-- By: Martin C. Carlisle
--     Department of Computer Science
--     US Air Force Academy
--     carlislem@acm.org
pragma Extensions_Allowed(On);
with MSSyst.Object;
with MSIL_Types;
use MSIL_Types;
with type MSSyst.EventHandler.Ref is access;
with type MSSyst.Threading.ThreadExceptionEventHandler.Ref is access;
with type MSSyst.Windows.Forms.IMessageFilter.Ref is access;
with type MSSyst.Object.Ref is access;
with type MSSyst.String.Ref is access;
with type Microsoft.Win32.RegistryKey.Ref is access;
with type MSSyst.Globalization.CultureInfo.Ref is access;
with type MSSyst.Windows.Forms.InputLanguage.Ref is access;
with type MSSyst.Type_k.Ref is access;
with MSSyst.Threading.ApartmentState;
with type MSSyst.Exception_k.Ref is access;
with type MSSyst.Windows.Forms.ApplicationContext.Ref is access;
with type MSSyst.Windows.Forms.Form.Ref is access;
with MSSyst.Object;
package MSSyst.Windows.Forms.Application is
   type Typ;
   type Ref is access all Typ'Class;
   type Ref_addrof is access all Ref;
   type Ref_Arr is array(Natural range <>) of Ref;
   type Ref_Array is access all Ref_Arr;
   type Ref_Array_addrof is access all Ref_Array;
   type Typ is new MSSyst.Object.Typ with record
      null;
   end record;
   procedure add_ApplicationExit(
      value : MSSyst.EventHandler.Ref);
   procedure add_Idle(
      value : MSSyst.EventHandler.Ref);
   procedure add_ThreadException(
      value : MSSyst.Threading.ThreadExceptionEventHandler.Ref);
   procedure add_ThreadExit(
      value : MSSyst.EventHandler.Ref);
   procedure AddMessageFilter(
      value : MSSyst.Windows.Forms.IMessageFilter.Ref);
   procedure DoEvents;
   procedure Exit_k;
   procedure ExitThread;
   function get_AllowQuit return Standard.Boolean;
   function get_CommonAppDataPath return MSSyst.String.Ref;
   function get_CommonAppDataRegistry return Microsoft.Win32.RegistryKey.Ref;
   function get_CompanyName return MSSyst.String.Ref;
   function get_CurrentCulture return MSSyst.Globalization.CultureInfo.Ref;
   function get_CurrentInputLanguage return MSSyst.Windows.Forms.InputLanguage.Ref;
   function get_ExecutablePath return MSSyst.String.Ref;
   function get_LocalUserAppDataPath return MSSyst.String.Ref;
   function get_MessageLoop return Standard.Boolean;
   function get_ProductName return MSSyst.String.Ref;
   function get_ProductVersion return MSSyst.String.Ref;
   function get_SafeTopLevelCaptionFormat return MSSyst.String.Ref;
   function get_StartupPath return MSSyst.String.Ref;
   function get_UserAppDataPath return MSSyst.String.Ref;
   function get_UserAppDataRegistry return Microsoft.Win32.RegistryKey.Ref;
   function OleRequired return MSSyst.Threading.ApartmentState.Valuetype;
   procedure OnThreadException(
      t : MSSyst.Exception_k.Ref);
   procedure remove_ApplicationExit(
      value : MSSyst.EventHandler.Ref);
   procedure remove_Idle(
      value : MSSyst.EventHandler.Ref);
   procedure remove_ThreadException(
      value : MSSyst.Threading.ThreadExceptionEventHandler.Ref);
   procedure remove_ThreadExit(
      value : MSSyst.EventHandler.Ref);
   procedure RemoveMessageFilter(
      value : MSSyst.Windows.Forms.IMessageFilter.Ref);
   procedure Run(
      context : MSSyst.Windows.Forms.ApplicationContext.Ref);
   procedure Run(
      mainForm : MSSyst.Windows.Forms.Form.Ref);
   procedure Run;
   procedure set_CurrentCulture(
      value : MSSyst.Globalization.CultureInfo.Ref);
   procedure set_CurrentInputLanguage(
      value : MSSyst.Windows.Forms.InputLanguage.Ref);
   procedure set_SafeTopLevelCaptionFormat(
      value : MSSyst.String.Ref);
private
   pragma Convention(MSIL,Typ);
   pragma Import(MSIL,add_ApplicationExit,"add_ApplicationExit");
   pragma Import(MSIL,add_Idle,"add_Idle");
   pragma Import(MSIL,add_ThreadException,"add_ThreadException");
   pragma Import(MSIL,add_ThreadExit,"add_ThreadExit");
   pragma Import(MSIL,AddMessageFilter,"AddMessageFilter");
   pragma Import(MSIL,DoEvents,"DoEvents");
   pragma Import(MSIL,Exit_k,"Exit");
   pragma Import(MSIL,ExitThread,"ExitThread");
   pragma Import(MSIL,get_AllowQuit,"get_AllowQuit");
   pragma Import(MSIL,get_CommonAppDataPath,"get_CommonAppDataPath");
   pragma Import(MSIL,get_CommonAppDataRegistry,"get_CommonAppDataRegistry");
   pragma Import(MSIL,get_CompanyName,"get_CompanyName");
   pragma Import(MSIL,get_CurrentCulture,"get_CurrentCulture");
   pragma Import(MSIL,get_CurrentInputLanguage,"get_CurrentInputLanguage");
   pragma Import(MSIL,get_ExecutablePath,"get_ExecutablePath");
   pragma Import(MSIL,get_LocalUserAppDataPath,"get_LocalUserAppDataPath");
   pragma Import(MSIL,get_MessageLoop,"get_MessageLoop");
   pragma Import(MSIL,get_ProductName,"get_ProductName");
   pragma Import(MSIL,get_ProductVersion,"get_ProductVersion");
   pragma Import(MSIL,get_SafeTopLevelCaptionFormat,"get_SafeTopLevelCaptionFormat");
   pragma Import(MSIL,get_StartupPath,"get_StartupPath");
   pragma Import(MSIL,get_UserAppDataPath,"get_UserAppDataPath");
   pragma Import(MSIL,get_UserAppDataRegistry,"get_UserAppDataRegistry");
   pragma Import(MSIL,OleRequired,"OleRequired");
   pragma Import(MSIL,OnThreadException,"OnThreadException");
   pragma Import(MSIL,remove_ApplicationExit,"remove_ApplicationExit");
   pragma Import(MSIL,remove_Idle,"remove_Idle");
   pragma Import(MSIL,remove_ThreadException,"remove_ThreadException");
   pragma Import(MSIL,remove_ThreadExit,"remove_ThreadExit");
   pragma Import(MSIL,RemoveMessageFilter,"RemoveMessageFilter");
   pragma Import(MSIL,Run,"Run");
   pragma Import(MSIL,set_CurrentCulture,"set_CurrentCulture");
   pragma Import(MSIL,set_CurrentInputLanguage,"set_CurrentInputLanguage");
   pragma Import(MSIL,set_SafeTopLevelCaptionFormat,"set_SafeTopLevelCaptionFormat");
end MSSyst.Windows.Forms.Application;
pragma Extensions_Allowed(Off);
pragma Import(MSIL,MSSyst.Windows.Forms.Application,
   ".ver 1:0:3300:0 .publickeytoken=( b7 7a 5c 56 19 34 e0 89 )",
   "[System.Windows.Forms]System.Windows.Forms.Application");
