5,392
社区成员
发帖
与我相关
我的任务
分享请教--------------如何取得长字符串中的一段字符?
比如,要取得memo1中,
开始为:<A>
结束为:</A>
之间的字符串? (只要考虑开始和结束字符只出现一次就OK了)
有没效率高一点的方法?
请各位帮看看..谢了..
...全文
请发表友善的回复…
发表回复
dgxlaen 2008-01-18
- 打赏
- 举报
记住 别忘 uses StrUtils 这个单元
kugoo_2006 2008-01-16
- 打赏
- 举报
楼上的方法好
lqwxfdwj 2008-01-14
- 打赏
- 举报
就楼上的方法了.
阿发伯 2008-01-10
- 打赏
- 举报
uses StrUtils;
var
a, b: Integer;
s: string;
begin
a := PosEx('<A>', Memo1.Text, 1);
Inc(a, 3);
b := PosEx('</A>', Memo1.Text, a);
s := Copy(Memo1.Text, a, b - a);
ShowMessage(s);
end;
