本文整理自网络,侵删。
vars: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 for xx in xx do 语法的使用示例
Delphi 结构体的使用、tbitmap和tmemorystream的转换
更多相关阅读请进入《Delphi》频道 >>