Delphi 使用Pred函数获取顺序类型表达式的前驱

Delphi 使用Pred函数获取顺序类型表达式的前驱，这个是一个Pred的练习，求前驱的例子，同样也是很简单的，学习Pred的用法，你可参考以下代码： 
　　procedure TForm1.SpeedButton1Click(Sender: TObject); 
　　var 
　　 x1,x2,x3:string; 
　　begin 
　　 x1:=pred('b'); 
　　 x2:=pred('9'); 
　　 x3:=pred(','); 
　　 Edit1.Text := '字符 b 的前驱为：'+x1; 
　　 Edit2.Text := '字符 9 的前驱为：'+x2; 
　　 Edit3.Text := '字符 , 的前驱为：'+x3; 
　　end;