-- 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.Windows.Forms.NativeMethods.LOGFONT.Ref is access;
with type MSSyst.Object.Ref is access;
with type MSSyst.Type_k.Ref is access;
with type MSSyst.String.Ref is access;
with MSSyst.Object;
package MSSyst.Windows.Forms.NativeMethods.NONCLIENTMETRICS 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
      cbSize : Integer;
      pragma Import(MSIL,cbSize,"cbSize");
      iBorderWidth : Integer;
      pragma Import(MSIL,iBorderWidth,"iBorderWidth");
      iScrollWidth : Integer;
      pragma Import(MSIL,iScrollWidth,"iScrollWidth");
      iScrollHeight : Integer;
      pragma Import(MSIL,iScrollHeight,"iScrollHeight");
      iCaptionWidth : Integer;
      pragma Import(MSIL,iCaptionWidth,"iCaptionWidth");
      iCaptionHeight : Integer;
      pragma Import(MSIL,iCaptionHeight,"iCaptionHeight");
      lfCaptionFont : MSSyst.Windows.Forms.NativeMethods.LOGFONT.Ref;
      pragma Import(MSIL,lfCaptionFont,"lfCaptionFont");
      iSmCaptionWidth : Integer;
      pragma Import(MSIL,iSmCaptionWidth,"iSmCaptionWidth");
      iSmCaptionHeight : Integer;
      pragma Import(MSIL,iSmCaptionHeight,"iSmCaptionHeight");
      lfSmCaptionFont : MSSyst.Windows.Forms.NativeMethods.LOGFONT.Ref;
      pragma Import(MSIL,lfSmCaptionFont,"lfSmCaptionFont");
      iMenuWidth : Integer;
      pragma Import(MSIL,iMenuWidth,"iMenuWidth");
      iMenuHeight : Integer;
      pragma Import(MSIL,iMenuHeight,"iMenuHeight");
      lfMenuFont : MSSyst.Windows.Forms.NativeMethods.LOGFONT.Ref;
      pragma Import(MSIL,lfMenuFont,"lfMenuFont");
      lfStatusFont : MSSyst.Windows.Forms.NativeMethods.LOGFONT.Ref;
      pragma Import(MSIL,lfStatusFont,"lfStatusFont");
      lfMessageFont : MSSyst.Windows.Forms.NativeMethods.LOGFONT.Ref;
      pragma Import(MSIL,lfMessageFont,"lfMessageFont");
   end record;
   function new_NONCLIENTMETRICS(
      This : Ref := null) return Ref;
private
   pragma Convention(MSIL,Typ);
   pragma MSIL_Constructor(new_NONCLIENTMETRICS);
end MSSyst.Windows.Forms.NativeMethods.NONCLIENTMETRICS;
pragma Extensions_Allowed(Off);
pragma Import(MSIL,MSSyst.Windows.Forms.NativeMethods.NONCLIENTMETRICS,
   ".ver 1:0:3300:0 .publickeytoken=( b7 7a 5c 56 19 34 e0 89 )",
   "[System.Windows.Forms]System.Windows.Forms.NativeMethods/NONCLIENTMETRICS");
