在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;
