在Delphi中，QuotedStr是一個函數，用于將字符串用引號括起來。
QuotedStr函數接受一個字符串參數，并返回引號括起來的字符串。
使用QuotedStr函數的一種常見場景是在構建SQL語句時將字符串值引用起來，以確保字符串的值正確傳遞給數據庫。例如，如果要將一個名字為John的用戶插入到數據庫中，可以使用以下代碼：
var
name: string;
sql: string;
begin
name := 'John';
sql := 'INSERT INTO users (name) VALUES (' + QuotedStr(name) + ')';
// 執行sql語句...
end;
在上面的例子中，QuotedStr函數將變量name的值John引號括起來，構建了一個包含引號的字符串。
需要注意的是，在使用QuotedStr函數時，如果字符串中包含引號，需要對引號進行轉義。例如，如果要將一個包含引號的字符串插入到數據庫中，可以使用以下代碼：
var
value: string;
sql: string;
begin
value := 'This is a "quoted" value';
value := StringReplace(value, '"', '""', [rfReplaceAll]); // 轉義引號
sql := 'INSERT INTO table (column) VALUES (' + QuotedStr(value) + ')';
// 執行sql語句...
end;
