码迷,mamicode.com
首页 > 数据库 > 详细

FormatSQL

时间:2018-02-13 17:49:44      阅读:178      评论:0      收藏:0      [点我收藏+]

标签:class   test   ble   table   value   直接   提高   begin   cas   

核心提示:在一些论坛,常看到有人拼接SQL的时候,喜欢直接硬拼,结果就是出现一大堆加号和单引号,不仅写起来麻烦(你得小心该连续写多少个单引号),SQL的可读性也相当差。...稍微好一点的方法是,使用QuotedStr函数,这个函数用于输出一个单引号括着的字符串。我相信写“‘Insert into table(a,b,c) values(‘ + QuotedStr(‘ET‘) + ‘,‘ + QuotedStr(‘OTL‘) + ‘,‘ + QuotedStr(‘ORZ‘) + ‘)‘”,总比你写“‘Insert into table(a,b) values(‘ + ‘‘‘‘ET‘‘‘‘ + ‘,‘ + ‘‘‘‘OTL‘‘‘‘ + ‘,‘ + ‘‘‘‘ORZ‘‘‘‘ + ‘)‘”可读性要强些吧,这么多引号看着都烦,别说写了。
更好的方法是使用Format函数。此函数一定要多多善用,通过格式化字符串的办法,可大大提高语句的可读性;而且格式化控制符有数字型也有字符串型,免除了你一会IntToStr,一会又StrToInt的痛苦。
以上SQL的等效写法是“Format(‘Insert into table(a,b,c) values(%s,%s,%s)‘, [QuoteStr(‘ET‘), QuotedStr(‘OTL‘), QuotedStr(‘ORZ‘)])”。
本文到此还没结束,大家是否觉得尽管Format能大大提高了语句的可读性,但是写带单引号的字符串时,仍然比较麻烦呢?
no problem,其实我们稍稍"扩充"下Format语句就行了: function FormatSQL(const AFormat: string; const Args: array of const): string;
begin result := Format(StringReplace(AFormat, ‘%q‘, QuotedStr(‘%s‘), [rfReplaceAll, rfIgnoreCase]), Args); end;
以上SQL的等效写法为“FormatSQL(‘Insert into table(a,b,c) values(%q,%q,%q)‘, [‘ET‘, ‘OTL‘, ‘ORZ‘])”。应该算是比较方便了,我觉得。顶一下

FormatSQL

标签:class   test   ble   table   value   直接   提高   begin   cas   

原文地址:https://www.cnblogs.com/westsoft/p/8446931.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!