我正在尝试将代码从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只是将它们连接起来就像一个副本。
答案 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;