delphi中有没有可以把字符串以某种格式转成数组的函数？以、那位高手有用过？

Question

我要将一串字符串如：“abc  1234.45   889.34 常州",转换成数组如:array("abc",1234.45,889.34,"常州")。其中的空格有一个格子或多个格子。谁有做过这样的转换？

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  s:TstringList;
  i:integer;
begin
  s:=TstringList.Create ;
  s.CommaText :='abc  1234.45   889.34 常州';
  for i:=1 to s.Count do
  begin
    showmessage(s.Strings[i-1]);
  end;
  s.Free;
end;

Answer 2

大家请注意对以上方法的使用，非常的方便，象VB里的SPLITE一样，简直；

Answer 3

OK了，谢谢outer2000(天外流星)。

Answer 4

outer2000(天外流星) 是对的。我同意他的方法。