Delphi - System.Copy 良好实践

Question

据我所知，Delphi 中的字符串为 1，长度为 0。我负责一个用D5和D2006编写的庞大的应用程序，它正在使用从0索引开始复制的复制功能，现在几个同事也在这样编码。因为这是一个Delphi的“魔术”功能，我相信即使使用Copy从0索引复制字符串，在幕后它也会从位置1复制它。

对我来说，一个好的做法是从第一个位置复制一个字符串，而不是从 0 位置，即使结果是一样的。

现在，我的问题是，通过使用从 0 位置的复制功能而不是用于从 1 位置复制来传递到其他 Delphi 版本时，应用程序是否会受到影响？

Answer 1

当将 0 作为 Index 参数传递给字符串的 Copy 时，Delphi RTL 会忽略您。当您为Index 传递0 或更少时，RTL 使用1 的值。因此，您所做的是良性的，因为在传递 1 或任何小于 1 的值之间没有明显的行为差异。但是，在 Delphi 中使用 0 作为字符串索引肯定会令人困惑，我建议不要这样做.

在伪代码中，Copy 的实现是这样开始的：

function Copy(s: string; Index, Count: Integer): string;
begin
  if Index<1 then
    Index := 1;
  dec(Index);//convert from 1-based to 0-based indexing
  ....continues

实际上实际的实现稍微复杂一些，但上面的伪代码给出了正确的语义。

您对存储在索引 0 处的长度的评论对于旧式短字符串是正确的。但对于长字符串则不是这样。事实上，正是这一事实导致了一种相当奇怪的情况，即字符串是从 1 开始的，而动态数组、列表等是从 0 开始的。