Question

delphi 截取字符串

1.delphi 中是否有类似vb中的 mid right left 相同或类似的函数？

2.如果没有，如何截取字符串？ 如果有，请帮我转将以下vb命令转化为delphi命令：
a=mid("delphi",1,4)
b=mid("asdfg",3)
c=right("qwer",2)
b=mid("asdfg",3) 意思是从asdfg中第3个开始截取 直到最后一个字符
运行后b="dfg"。
在vb中此命令等价于：b=mid("asdfg",3,len("asdfg")-2)或right("asdfg",len("asdfg")-2)
不知在delphi中怎么写这条命令。。。

Answer 1

a := copy('delphi', 0, 4);
b := copy('asdfg', 1, 3);
c := copy('qwer', 2, 2);

在Delphi中，除了起始位置的标志方法与VB不一样外，其它的都一样的。
b := copy('asdfg',2, length('asdfg') - 2);
Delphi中索引值是从0开始的。

Answer 2

delphi可以通过Copy处理

最简单的方法就是引用StrUtils.pas单元,已提供这些函数