我通过ini读取一段字符串如  "+,-,*,/,%"
请问在delphi 中如何分离,类似与 vb 中的 split 函数功能,返回一个数组储存每个字符。。谢谢。

解决方案 »

  1.   

    对任一字符串,可以用pos函数定位,用copy函数提取。你看看帮助,很详细的。
      

  2.   

    類似如下吧:
    var I: integer;
     s, s1, s2: string;
    begin
     s := '218.67.66.88';
     i := pos('.', s);
     s1 := Copy(s, 1, i-1);
     showMessage(s1);
     delete(s, 1, i);
     i := pos('.', s);
     s2 := Copy(s, 1, i-1);
     showMessage(s2);
     delete(s, 1, i);
    ...
      

  3.   

    更方便的请试试下面的代码
    procedure do;
    var
      i : integer ;
      aa : TStringList ;
    begin
      aa := TStringList.Create ;
      aa.DelimitedText := '123,456,789';
      aa.Delimiter := ',';
      for i := 0 to aa.count - 1 do
        showmessage(aa[i]);
      // do what you want to do ...
      aa.free;
    end;