Question

Delphi截取字符串最简单的办法是什么？

如str:='1/2/3/4/5'，把这5个数字保存到一个数组里，求最简答的办法

Answer 1

用pos函数定位"/"，将其记录到一维数组中，并将找到的"/"替换为“#”，继续直到找出所有的“/";
利用上述一维数组循环逐个取出字符串数值，并用val函数转换为数值型数值保存。