Delphi:调用Delete(...)分割字符串时出现"实际参数太多"错误

0 delphi split delphi-7

我得到太多实际参数的错误

Procedure TSub.ReadUsers;
var
  iPos , i : integer;
begin
  ReadLine;
  iPos := 0;
  for i := 1 to Counter do
    iPos := pos('#',sLine);
  arrUsers[i] := copy(sLine, 1, ipos-1);
  delete(sLine,1,iPos);//error in this line
  iPos := pos('#',sLine);
end;
Run Code Online (Sandbox Code Playgroud)

Saj*_*ray 15

如果没有看到其余代码或知道您正在使用的Delphi版本,您对Delete的调用可能不会引用System.Delete(您可能Delete在范围内有另一种方法,可能在类中TSub).尝试使用以下代码,看看是否清除它:

System.Delete(sLine,1,iPos);
Run Code Online (Sandbox Code Playgroud)