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的dll中获取文件路径

Delphi memo 过滤重复字符 indexof

Delphi读写文本文件

Delphi 开发安卓时判断进入非活动

Delphi 获取系统所有磁盘盘符

Delphi for xx in xx do 语法的使用示例

Delphi 获取指定当前目录下指定文件扩展名所有文件

Delphi 结构体的使用、tbitmap和tmemorystream的转换

Delphi tfontdialog

Delphi xe2模拟键盘按键

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



打赏

取消

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

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

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

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

评论

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