从一个字符串中随机取出一组值？


这样的一个字符串，形如：

Delphi(Pascal) code

str := '620,6146;480,6083;706,6049;593,6049;1006,5856;869,5832;809,5832;755,5832;695,5832;' ;

str中间用分号分隔开的，是一组数值（包含两个数字），

现在要做的是随机取出其中的一组数值，然后，再分别赋给另外的两个变量，

x := 数值中的第一个数
Y := 数值中的第二个数

求写法，



[解决办法]
来晚了。。。。 都被楼上回答了。。 好详细，，代码都有。