本文整理自网络,侵删。
function GetStringBetween(const FullStr, StrLeft, StrRight: String): string;vari,n:integer;begini:=pos(StrLeft,FullStr)+length(StrLeft);n:=pos(StrRight,FullStr)-length(StrLeft)-1;Result:=copy(FullStr,i,n);end;
相关阅读 >>
Delphi winapi: getmodulehandle - 获取一个模块(exe 或 dll)的句柄
Delphi 中的md5实现方法及Delphi2009和Delphi2010中用法
更多相关阅读请进入《Delphi》频道 >>