逗号分开的字符串

Question

500350,105564.71,0,0这是 用逗号分开的4个float数字
我想分别将4个数，读到4个变量里
如：
a：=500350 
b:=105564.71
c：=0 
d：=0
请问如何实现?

Answer 1

可以用TStrings
比如说
strs.Delimiter := ',';
strs.DelimitedText := '500350,105564.71,0,0';
然后StrToFloat(strs[每个元素遍历]);

Answer 2

用tstringlist就可以了
var
 cardlist:tstringlist; 
 f1,f2:double; 
begin
  cardList:=tstringlist.Create;
  cardList.CommaText:='500350,105564.71,0,0';
  f1:=StrToFloat(cardlist.Strings[0]);
  f2:=StrToFloat(cardlist.Strings[1]);
  cardlist.free;
end;