一个截取字符串函数,参数列表（源字符串，开始字符串，结束字符串）
2008-05-15 09:36
288 查看
经常用，不想再费脑筋
function TForm1.GetStr(StrSource, StrBegin, StrEnd: string): string;
var
in_star,in_end:integer;
strtmp:string;
begin
in_star:=AnsiPos(strbegin,strsource)+length(strbegin);
strtmp:=copy(strsource,in_star,length(strsource));
in_end:=AnsiPos(strend,strtmp);
result:=copy(strsource,in_star,in_end-1);
end;
function TForm1.GetStr(StrSource, StrBegin, StrEnd: string): string;
var
in_star,in_end:integer;
strtmp:string;
begin
in_star:=AnsiPos(strbegin,strsource)+length(strbegin);
strtmp:=copy(strsource,in_star,length(strsource));
in_end:=AnsiPos(strend,strtmp);
result:=copy(strsource,in_star,in_end-1);
end;
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- 指定开始字符串和结束字符串,截取中间的字符
- 截取字符串方法（传入开头和结束参数）
- PHP rtrim第二个参数删除的是一个字符列表而不是整个字符串
- 截取开始字符串 结束字符串的中间字符串并返回
- 写一个函数，2 个参数，1 个字符串，1 个字节数，返回截取的字符串，要 求字符串中的中文不能出现乱码
- 写一个函数， 2个参数， 1个字符串， 1个字节数，返回截取的字符串，要 求字符串中的中文不能出现乱码： 如 （ “ 我ABC”， 4） 应该截为 “ 我AB”，输入（ “ 我 ABC汉DEF”， 6
- PHP采集利器：根据开始字符串和结束字符串截取需要的采集内容数据
- 写一个字符串函数，这个字符串参数必须包含一个或者多个数字，函数应该把这些数字字符转换为整数并返回这个整数。
- 编写一个函数，删除字符串中的一段字符，函数原型为： int fun(char *p,int start,int end); 返回值为删除字符数， start 开始位置，end 结束位置。
- 截取字符串方法（传入开头和结束参数）
- 求一个数组相邻数的最大和，并且得到开始编号和结束编号（原创）
- 黄聪：C#用正则表达式获得指定开始和结束字符串中间的一段文本
- 【bash】倒转一个字符串列表
- 关于C#正则表达式十万火急 截取一个字符串中的子串 高手进了呀！！！！！
- c# 判断一个字符串列表中是否已经包括指定字符
- 如何得到任意一个存储过程的参数列表的
- 编写一个截取字符串的函数
- iOS如何用一个字符串截取另一个字符串
- 由一个异常开始思考springmvc参数解析
- 爱 一个微笑开始 一滴眼泪结束