Delphi string 自動分割為數組



var 

inputList: TStrings;

text:String

text:=GSP*PL*0001*123*456

  inputList := TStringList.Create;
            inputList.Delimiter:='*'  ;
            inputList.DelimitedText:=STRINGREPLACE(text,' ','*',[rfReplaceAll]);

使用:
            inputList.Strings[1]+''','''+inputList.Strings[2]+''','''+inputList.Strings[3]+''','''+inputList.Strings[4]+
        




你可能感兴趣的:(DELPHI)