如何将Delphi Copy操作转换为.Net Substring操作?

时间:2012-01-04 21:28:54

标签: .net vb.net delphi

我正在尝试将代码从Delphi转换为.Net。我被困在一条线上:

//Delphi code
ss := Copy(ss, Length(ss), 1) + Copy(ss, 1,Length(ss) - 1); 

'vb.net code
ss = ss.Substring(0, ss.Length - 1) + ss.Substring(1, ss.Length - 1)

Delphi结合了两个子串,而.Net只是将它们连接起来就像一个副本。

2 个答案:

答案 0 :(得分:3)

你犯了同样的错误previous question。你需要

ss.Substring(ss.Length-1, 1) + ss.Substring(0, ss.Length-1)

转换此类代码所需要做的就是考虑Delphi字符串和.net字符串之间基于1的基于0的索引差异。

答案 1 :(得分:0)

这是Delphi / Lazarus Code中subString的一个例子。

    function subString(input : String; first : Integer; last : Integer): String;
    begin
      Result := Copy(input, first + 1, (last - first));
    end;