送给大虾50分 如何将下面一组数读出来

Question

如何将一组数读出来
在存储是我是将一组数中间用逗号隔开存储的，现在想将他们一个个分别多出来
例如将1到5存为1、2、3、4、5
现在想读出五个数分别是 1  
                       2
                       3
                       4
                       5

Answer 1

var
   s:='1、2、3、4、5';
   tls:=TStringList;
   i:Integer;
begin
   tls:=TStringList.Create;
   try
      tls.Text:=StringReplace(s,'、',#13#10,[rfReplaceAll]);
      for i:=0 to tls.Count-1 do
      begin
         //在这里面取tls.Strings[i];
      end;
   finally
      tls.Free;
   end;
end;

Answer 2

str=1、2、3、4、5
str[1]
str[3]
str[5]
str[7]
str[9]

Answer 3

我有些不明白 xiaoxiao 的意思
在实际的程序中存储并不是12345这样简单的字符，并确数目也不确定，没一小项的长度也不确定。

Answer 4

xiaoxiao的方法可以呀，长度length(str)
str:=1、2、3、4、5；
直接取str[0],str[2],str[4],直到length(str)

Answer 5

str:='1、2、3、4、5';
length(str)判断下奇数偶数就好了