请教pos的用法

hu1dao 2003-10-15 12:07:09
a='123456123456'
那么pos('12',a)=0;
请问如何从第6个位置开始搜索。谢谢!!!!
...全文
252 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
47522341 2003-10-15
  • 打赏
  • 举报
回复
要不先连第六个字符以后的字符串取出来;
rightstr(str,5,length(str)-6);
hu1dao 2003-10-15
  • 打赏
  • 举报
回复
先 谢谢 pazee(耙子)
但我上面是个例子啊,在程序中要查的是不可能这么简单的,

其实我是把一个java的函数复制在delphi上的
原来的是这样写的
next = attrs.indexOf(separator, start);
//attrs就是个字符串,separator是要搜索的内容,start就是开始搜索的位置

期待高手回答
tiexinliu 2003-10-15
  • 打赏
  • 举报
回复
var
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;
耙子 2003-10-15
  • 打赏
  • 举报
回复
自己写一个了
或者
i:= pos('12',copy(a,6, MAXINT));
if i> 0 then
i:= i+ 6;
耙子 2003-10-15
  • 打赏
  • 举报
回复
没有java那样的函数,要么自己写,要么做个变通。
hu1dao 2003-10-15
  • 打赏
  • 举报
回复
好吧,看来是没有java那样一条就能得出结果的命令了,

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧