QuotedStr()函数是Delphi中一个用于添加引号的字符串函数。以下是使用QuotedStr()函数的几种方法:
var
str: string;
begin
str := QuotedStr('Hello World');
ShowMessage(str); // 显示结果为:'Hello World'
end;
var
str: string;
begin
str := QuotedStr('Hello "World"');
ShowMessage(str); // 显示结果为:'Hello "World"'
end;
var
arr: array of string;
i: Integer;
begin
SetLength(arr, 3);
arr[0] := 'Hello';
arr[1] := 'World';
arr[2] := 'Delphi';
for i := 0 to Length(arr) - 1 do
arr[i] := QuotedStr(arr[i]);
ShowMessage(Format('[%s]', [string.Join(', ', arr)])); // 显示结果为:['Hello', 'World', 'Delphi']
end;
注意:QuotedStr()函数只是在字符串前后添加引号,不会转义字符串中的特殊字符。如果需要转义特殊字符,可以使用双引号来表示引号本身,例如:QuotedStr(‘Hello ““World””’)。