Delphi中处理字符串，LastDelimiter相当于C#中的LastIndexOf

在Delphi中处理字符串时，想获取该字符串中某一个符号最后出现的位置，可用LastDelimiter(substr,str);此函数在SysUtils包中，参数substr为要查找最后位置的子字符串，str为要处理的字符串。
例如，有一文件路径字符串要处理： D:/Delphi/DelphiProject/MultiMedioProject/4.swf
在此想获取此Flash文件的号数，即4.
则可以这样处理：
var
  StartPos:Integer;
  EndPos:Integer;
  len:Integer;
  str:string;
begin
  str:='D:/Delphi/DelphiProject/MultiMedioProject/4.swf';
  StartPos:=LastDelimiter('/',str);//最后一个/的位置
  EndPos:=LastDelimiter('.',str);//最后一个.的位置
  len:=EndPos-StartPos-1;//总共要取的子字符数
  str:=Copy(str,StartPos+1,len);//获取子字符串
end;
完成。