请教 Delphi的一些基本问题(3)：字符串的处理

Question

str.substring(1,3)
str.substring(str.length-4,str.length)

Answer 1

Delphi有leftstr,rightstr函数，但是有时会出错，所以建议用copy函数
左边三个copy(s,1,3);
右边的5个copy(s,length(s)+1,5);

Answer 2

s[0]   左边一个
s[length[s]]   右边一个，
其它的用copy(str,[start],[length])

Answer 3

中间的4个,自己算一下这个可以这样copy(s,(length(s) div 2)-2+1,4)

Answer 4

cbdiy(从头开始)写的有误，应是s[1]   左边一个

Answer 5

不好意思。不过你的copy(s,length(s)+1,5);好象也有问题

Answer 6

copy(s,1,3);
copy(S,4,4);
copy(S,length(s)-4,5)

Answer 7

to:along603(阿三) Str.SubString中的Str是什么对象？？？

Answer 8

字符串操作函数在d5和d6中是有点差别的，用copy最通用了
左边三个copy(s,1,3);
右边的5个copy(s,length(s)- 4,length(s));

Answer 9

Copy函数测试通过，但是SubString函数究竟是谁的？

Answer 10

to:along603(阿三) 你怎样定义该Str的？ Str:String; // ????

Answer 11

for i:=1 to Length(s) do begin
  if s[i]='5' then s[i]='x';
end;其实如果不是很复杂的字符串操作，都可以自己方便的解决。C语言中有模式匹配的算法，可以参考。至于Delphi的函数，其实就是这些原理的应用。

Answer 12

i:integer;
while pos('5',s)>0 do
begin
  i:=pos('5',s);
  s[i]:='x';
end;

Answer 13

没有类似Replace的全部替换函数么？

Answer 14

hehe  字符串处理就是上面几位大侠说的，就是COPY，DEL 之类的。结帐吧，