Android的Delphi，使首字母大写问题。但不是在VCL上

Question

我尝试查看一些使单词自动成为第一个字母大写字母的步骤。我曾经在VCL上使用过它，并且效果很好，但是为什么在移动应用程序上它不能正常工作。我使用此代码，但是在edit2中，结果是我丢失了第一个字母，并且单词以我在edit1中输入的第二个字母开头，即使它以大写字母开头。也许有人可以帮助我。非常感谢

    var i, j : integer;
        s, edt2 : string;
Procedure
         j := length(edt1.Text);
            s := '';
            for i := 2 to j do
            begin
              s := s + LowerCase(edt2.Text[i]);
            end;
            edt2 := UpperCase(edtProduk.Text[1]) + s;

Answer 1

在Delphi移动平台中，您必须了解字符串是从零开始的（就像数组一样）。

为避免问题，如果要跨平台安全地访问字符串的第一个索引和最后一个索引，请在字符串上使用System.Low和System.High内部函数。