这是本人自己制作的替换字符串中子串的函数,他可以从字符串中找出指定子串,并替换为另一子串。
function replacing(s,source,target:string):string;
var site,strlen:integer;
begin
{source在s中出现的位置}
site:=pos(source,s);
{source的长度}
strlen:=length(source);
{删除source字符串}
delete(s,site,strlen);
{插入target字符串到s中}
insert(target,s,site);
{返回新串}
replacing:=s;
end;
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器