你正盯着Delphi代码发愁吗？明明想给字符串加个引号，结果程序突然报错，红色波浪线刺得眼睛生疼。这时候你抓耳挠腮地想：为什么别人写的SQL语句都整整齐齐包着单引号，而我每次手动加引号都会出错？别慌，今天咱们要聊的这个函数，就是专门治这种毛病的灵丹妙药。
一、这个神秘函数是干什么的？
说白了吧，QuotedStr就是个专门给字符串”穿外套”的家伙。比如你要把”apple”这个单词存到数据库里，直接写会变成apple，但数据库需要的是’apple’。这时候QuotedStr(‘apple’)就会自动给你包上单引号，变成”’apple”’（注意Delphi里单引号要写两个）。
举个栗子： delphi ShowMessage(QuotedStr(‘Hello’)); // 显示’Hello’
二、为什么不用自己拼接引号？
这时候你可能会想：我直接写”+变量+”不就行了？比如： delphi str := ‘张三’; sql := ‘SELECT * FROM users WHERE name = ”’ + str + ””; 看着就头疼对不对？更可怕的是如果str本身包含单引号，比如用户输入了”O’Neil”，这时候程序直接原地爆炸给你看。QuotedStr这时候就会自动处理这些麻烦的引号，相当于给字符串穿了个防弹衣。
三、实战中的正确打开方式
假设我们要构建SQL查询语句，对比两种写法： 1. 错误示范： delphi sql := ‘WHERE name = ‘ + NameEdit.Text; // 用户输入带引号就完蛋 2. 正确姿势： delphi sql := ‘WHERE name = ‘ + QuotedStr(NameEdit.Text);
再来看处理空字符串的情况： delphi // 普通写法会得到” // 用QuotedStr处理空字符串得到”” if Edit1.Text = ” then ShowMessage(QuotedStr(Edit1.Text));
四、新手常踩的五个坑
忘记处理数值类型：数字不需要引号，直接拼就行，别画蛇添足 在已经带引号的字符串上重复使用：比如QuotedStr(‘”hello”‘)会变成'”hello”‘反而破坏结构 混淆单双引号：这个函数固定加单引号，要双引号得自己处理 处理日期时不配合FormatDateTime：日期要先转成字符串格式再处理 在多层嵌套时乱用：比如JSON字符串里可能需要转义，这时候要改用其他方法五、灵魂拷问环节
问：这个函数和Format函数里的%s有什么区别？ 答：Format函数里的%s只是占位符，不负责安全处理。比如： delphi Format(‘名字=%s’, [QuotedStr(Name)]); // 安全 Format(‘名字=%s’, [Name]); // 危险！
问：为什么我的QuotedStr返回三个单引号？ 答：当传入空字符串时，函数会返回””, 这是为了在SQL中正确表示空值。这时候要检查业务逻辑是否需要特殊处理。
问：处理带换行的文本怎么办？ 答：这时候光用QuotedStr还不够，得配合字符串替换： delphi QuotedStr(StringReplace(Memo1.Text, #13#10, ‘\n’, [rfReplaceAll]))
小编观点：Delphi老司机们的经验之谈——凡是要往数据库里塞字符串的地方，先条件反射式地敲出QuotedStr再说。这习惯能帮你避开至少30%的运行时错误，特别是当用户在你精心设计的输入框里突然输入个单引号的时候…（别问我是怎么知道的）
本站文章由SEO技术博客撰稿人原创，作者:阿君创作，如若转载请注明原文及出处：https://www.ainiseo.com/hosting/17553.html
