我要得到 一个子字符串在主字符串中最后出现的位置!
example: weij(tjj)safdjsdf(tjj)asdf(tjj)
tjj出现了三次.我要得到最后一个字符串tjj 怎么实现?求教.
example: weij(tjj)safdjsdf(tjj)asdf(tjj)
tjj出现了三次.我要得到最后一个字符串tjj 怎么实现?求教.
解决方案 »
- 为何在程序中修改DBEdit的DataSource时,老出错?
- 关于全文搜索指定字符串
- orchidbing(米饼) 、zhlwyy(海龙) 、linzhengqun(风) 、sunnycool() 、pandarus(Delphi/Asp里流浪的云) 请进!
- vsflexgrid 为何不能使用
- 请问谁有《Delphi5开发人员指南》的CD源代码,高分相赠
- 函數 wnetaddconnection2 用法
- 什么是MIDAS?什么是COM+?什么是MTS?什么CORBA?
- 谁用过财务控件SNC?就是在dbgrid的Title上显示万、千、百、十、元、角、分的那个控件
- 急,小问题但搞不定!!!
- Delphi如何捕获Windows访问一个驱动器的消息?
- 分布式系统中客户端如何刷新数据
- 一个难题,如何根据句柄获取窗体的额外字节cbWndExtra???
Length(s)-pos(ReverseString(s1),ReverseString(s))+Length(s1)
var i:integer;
begin
Result:=0;
for i:=Length(s) downto 1 do
begin
Result:=PosEx(SubStr,S,i);
if Result<>0 then break;
end;
end;