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””’)。
