01type
02  IIntegerInfo = interface(ITypeInfo)
03    ['{9003B25E-926D-42AE-A907-813DF3A8343E}']
04    function Get_MaxValue: Integer; safecall;
05    function Get_MaxValueUsed: WordBool; safecall;
06    function Get_MinValue: Integer; safecall;
07    function Get_MinValueUsed: WordBool; safecall;
08    property MaxValue: Integer read Get_MaxValue;
09    property MaxValueUsed: WordBool read Get_MaxValueUsed;
10    property MinValue: Integer read Get_MinValue;
11    property MinValueUsed: WordBool read Get_MinValueUsed;
12  end;