1.下面的函數(shù)可以來測試類型本身的信息：
Dec //將例程中的參數(shù)值遞減1或一個(gè)特定的值说墨，其中特定值可在第二個(gè)可選參數(shù)中定義
Inc //將例程中的參數(shù)值增加1或一個(gè)特定的值
Odd //如果參數(shù)為奇數(shù)返回真
Pred //根據(jù)參數(shù)在其數(shù)據(jù)類型定義中的序列，返回參數(shù)值的前驅(qū)值
Succ //返回參數(shù)值的后繼值
Ord //返回參數(shù)值在其數(shù)據(jù)類型值集合中的序號(hào)
Chr //取得 AscII 碼對應(yīng)的字符
Low //返回參數(shù)對應(yīng)的有序數(shù)據(jù)類型的最小取值
High //返回參數(shù)對應(yīng)的有序數(shù)據(jù)類型的最大取值
SizeOf //取得類型或?qū)ο笏嫉膬?nèi)存字節(jié)數(shù)
2.打開IDE彤恶，進(jìn)行測試，新建一個(gè)Vcl應(yīng)用,在窗體上添加一個(gè)Button1， 一個(gè)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 ,是奇數(shù)
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
