a='123456123456'
那么pos('12',a)=0;
请问如何从第6个位置开始搜索。谢谢!!!!
那么pos('12',a)=0;
请问如何从第6个位置开始搜索。谢谢!!!!
解决方案 »
- jf接到4000分,庆贺一下
- delphi 连接access数据库sql语句如何写?
- 如何获取EXCEL中工作表的名称?
- 用Query查询然后修改显示格式
- 用ADOTable 怎么从数据库取数据?
- 如何测试某字段是否在当前数据集中?
- 数据库添加数据出现错误,菜鸟求救!!
- 用Application.Terminate能够安全并且彻底地退出应用程序吗?
- 我想在WINDOWS下退出我的程序后能驻留DLL,使HOOK仍生效。该怎么做?
- 我想在DBGRID的ONKEYDOWN或ONKEYPRESS事件中实现功能组合键的功能,怎么实现?
- 急!如何将一串十六进制的字符转换为含有字母,数字的字符串?
- 有没有办法让 隐藏的label 在整段代码执行完之前,先显示出来?
或者
i:= pos('12',copy(a,6, MAXINT));
if i> 0 then
i:= i+ 6;
ib:integer;//找到次数
i:integer;
str:string;
begin
ib:=0;
str:=''
i:=pos('12',a)
while i>0
begin
ib:=ib+1;
str:=copy(a,i,length(a)-i));
i:=pos('12',str)
end;
end;
end;
但我上面是个例子啊,在程序中要查的是不可能这么简单的,其实我是把一个java的函数复制在delphi上的
原来的是这样写的
next = attrs.indexOf(separator, start);
//attrs就是个字符串,separator是要搜索的内容,start就是开始搜索的位置期待高手回答
rightstr(str,5,length(str)-6);