1.下面的函数可以来测试类型本身的信息：
Dec //将例程中的参数值递减1或一个特定的值，其中特定值可在第二个可选参数中定义
Inc //将例程中的参数值增加1或一个特定的值
Odd //如果参数为奇数返回真
Pred //根据参数在其数据类型定义中的序列，返回参数值的前驱值
Succ //返回参数值的后继值
Ord //返回参数值在其数据类型值集合中的序号
Chr //取得 AscII 码对应的字符
Low //返回参数对应的有序数据类型的最小取值
High //返回参数对应的有序数据类型的最大取值
SizeOf //取得类型或对象所占的内存字节数
2.打开IDE，进行测试，新建一个Vcl应用,在窗体上添加一个Button1， 一个Memo1，双击Button1，输入以下代码：：

procedure TForm1.Button1Click(Sender: TObject);
var
  i:Integer;
begin
  i:=99;
  memo1.Lines.Add(i.ToString);          //显示：99
  Dec(i,1);
  memo1.Lines.Add(i.ToString);          //显示：98
  Inc(i,1);
  memo1.Lines.Add(i.ToString);          //显示：99
  memo1.Lines.Add(odd(i).ToString);          //显示：-1 ,是奇数
  memo1.Lines.Add(Pred(i).ToString);          //显示：98
  memo1.Lines.Add(Succ(i).ToString);          //显示：100
  memo1.Lines.Add(ord(i).ToString);          //显示：99
  memo1.Lines.Add(chr(i));          //显示：c
  memo1.Lines.Add(Low(i).ToString);          //显示：-2147483648
  memo1.Lines.Add(High(i).ToString);          //显示：2147483647
  memo1.Lines.Add(Sizeof(i).ToString);          //显示：4
end;

以上代码在Delphi 10.4中测试通过。

Delphi10.4.gif