在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;
完成。