delphi里象asp的split的分割函数是什么?急!!!!!!!!!

解决方案 »

  1.   

    // Split
    procedure TForm1.Button1Click(Sender: TObject);
    const
      t : string = '1,29,A,22,4';
    var
      sl : TStringList;
    begin
      sl := TStringList.Create;
      sl.CommaText  := t;
      showmessage(sl.Strings [2]);
      sl.free;
    end;
      

  2.   

    Copy和pos
    直接使用
    s :='123,456';
    str :=Copy(s, Pos(',', s) + 1, length(s));
    这样str就是'456'
      

  3.   

    Linux2001(我想买手提电脑啊!) 说得对建议搂主不要太墨守成规,一种语言的函数在另一种语言里不一定有,但是肯定能实现,
    只是3*3和4+5的问题
      

  4.   

    有,ExtractStrings
    详细见delphi的Classes单元