Question

string split 的标识符是什么？ delphi中 谢谢~

split函数 找不到标识符，郁闷！

Answer 1

不明白什么意思。我这里有个字符串的分割函数：function TToolCls.Split(AString: string; AInvStr: string): TStringList;//参数：需要分割的字符串 ； 以什么符号为分割点
var
List: TStringList;
str, str1: string;
Label 1;
begin
List:=TStringList.Create;
if AString='' then goto 1;
if Pos(AInvStr, AString)=0 then
List.Add(AString);

while Pos(AInvStr, AString)>0 do begin
str:=Copy(AString,1,Pos(AInvStr, AString)-1);
List.Add(str);
Delete(AString,1,Pos(AInvStr, AString)+Length(AInvStr)-1);
if Pos(AInvStr, AString)=0 then begin
List.Add(AString);
Break;
end;
end;
1:Result:=List;
end;