delphi截取字符串


本文整理自网络,侵删。

 //delphi截取字符串

function 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_star + in_end-in_star -1);
end;

相关阅读 >>

Delphi研究之驱动开发篇(六)--利用section与用户模式程

Delphi http协议验证访问datasnap rest 服务器

Delphi xe8安卓下汉字转gb2312 urlencode代码

Delphi 有关pchar.strcopy的实验

Delphi文件操作的一些函数

Delphi获取优盘的id

Delphi 操作 pdf -- 使用 acrobat sdk 初探

Delphi twebbrowser静音

Delphi idhashmessagedigest 获取文件md5

Delphi idhashmessagedigest md5用法

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...

    正在狠努力加载,请稍候...