使用此过程时,我收到一个抽象错误(仅此而已)。我在其他项目中使用此程序,这是我第一次遇到它。我不确定它是否与输入字符串的语法有关。
procedure SplitString(const Delimiter: Char; Input: string; const Strings: TStrings);
begin
//Delimits or splits the received string, returns TStrings array
Assert(Assigned(Strings)) ;
Strings.Clear;
Strings.Delimiter := Delimiter;
Strings.StrictDelimiter := True; //needed otherwise whitespace is used to delimit
Strings.DelimitedText := Input;
end;
应用程序调用如下:
try
LBOMPartLine := TStrings.Create;
SplitString(',','C:\DATA\Parts\PART4.PS.0,10,10',LBOMPartLine);
...
我删除了一些调试代码,这些代码突出了程序失败的事实,之后或之前都没有。我可以不使用逗号作为分隔符吗?