字符串问题? Length(Subtring)+Pos(Substring,String)其中String为你的字符串,Substring为你的子字符串 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 当然,如果你的意思是'aabbabababb',要返回'ab'最后出现的位置,就有点麻烦了不过你可以这样做不断的从String中取Substring的位置,然后把String中Substring前的字符都去掉,然后再去下一个,直到取到没有了,就是你要的位置了。 x:= 0;for i:= length(s) downto 1 do if s[i] = ch then begin x:= i; break; end; netlib(河外孤星) : 你的那个RPos不是标准函数吧?怎么实现的? ansistrrscan(str:pchar;chr:char):pchar; while Pos('s1','s2')>0 MyPos:=Pos('s1','s2')循环结束,MyPos就是你想要的结果。 SupermanTm(小超) 和wei_wang() 所得出的结果都是一个字符(注意:不是字符串)在另一个串中的最后位置,而不是人家想要的字符串! 郁闷了,BusinessSkinForm中Button的怪事情,请教 一个这样的企业,应该怎么样架构系统? delphi Tdataset问题 怎样把Unicode码转变成汉字 告急!AdvStringGrid的树形结构怎么用? 同志们 蒙冤 散分 dbExpress连接sql server2000,把datasource和tdbgrid关联时老是说什么"此项操作不能应用在单向的数据集"。。。 難!更新數據的問題! DBgrid 的OnDrawDataCell 是什么时候发生的 如何用stringgrid画表头? 一简单问题 100分求教! adocmdset
'aabbabababb',要返回'ab'最后出现的位置,就有点麻烦了
不过你可以这样做
不断的从String中取Substring的位置,然后把String中Substring前的字符都去掉,然后再去下一个,直到取到没有了,就是你要的位置了。
for i:= length(s) downto 1 do
if s[i] = ch then
begin
x:= i; break;
end;
你的那个RPos不是标准函数吧?怎么实现的?
MyPos:=Pos('s1','s2')循环结束,MyPos就是你想要的结果。