Delphi 字符串左右添加字符


本文整理自网络,侵删。

 

var
s:string;
q:Char;
str:string;
begin
  //System.SysUtils
  s:='abc';
  q:='/';
  //字符串左右添加字符   /abc/
  str:=AnsiQuotedStr(s,q);
  Edit1.Text:=str;
 //字符串左右添加单引号 'abc'
  str:= QuotedStr(s);
  Edit2.Text:=str;

end;

本文链接:https://blog.csdn.net/ozhy111/article/details/81906506

相关阅读 >>

Delphi sysutils.comparetext的注释

Delphi的rtti实现数据集的简单对象化

Delphi xe 在图片上写字

Delphi 不用控件用函数实现发email

Delphi 如何设置热键

Delphi 怎么将一个流转换成字符串?或者将字符串转出一个流

Delphi利用系统环境变量获取常用系统目录

Delphi 在内存中直接运行exe类型的资源文件

Delphi webbrowser控件属性介绍

Delphi 创建圆形或椭圆形窗体

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...