delphi - 如何在字符串中添加撇号？

Question

我有一个宽字符串 StringABC 我有一个数组 ArrayABC，该数组的元素是

ArrayABC[0]='A';
ArrayABC[1]='B';
ArrayABC[2]='C';

现在我必须将 stringABC 设为 StringABC := ''A','B','C'';

我正在尝试这样做

StringABC := '';
for (i:=0 to 2) do
begin
StringABC := StringABC + ArrayABC[i] + ',';
if i = 2
stringABC := StringABC + ArrayABC[i];
end

我得到的结果为 stringABC = 'A,B,C' 但不是 ''A','B','C'' 我的代码应该改进什么？

Answer 1

StringABC := '';
for (i:=0 to 2) do
begin
StringABC := StringABC + '''' + ArrayABC[i] + ''',';
if i = 2
stringABC := StringABC + '''' + ArrayABC[i] + '''';
end

虽然我只是用逗号连接所有 i，然后最后删除最后的逗号。