我正在尝试执行以下表达式,但我一直遇到这个异常,“找不到'chars'的属性设置器。”
这是表达式:
xstr, str : string;
for i := 1 to length(str) do
begin
if ((i mod 2)<>0) then
begin
xstr[i] := char(Ord(str[i]) xor $AA); <<<<------ Exception Raised
end
else
begin
xstr[i] := char(Ord(str[i]) xor $55); <<<<------ Exception Raised
end;
end;
“str”的值被传递到加密方法中。
这是加密方法的一部分。做这个的最好方式是什么?