Delphi 添加或解除引号

本文整理自网络，侵删。

 添加或解除引号:function QuotedString: string;function QuotedString(const QuoteChar: ｃｈａｒ): string;
function DeQuotedString: string;function DeQuotedString(const QuoteChar: ｃｈａｒ): string;//--------------------------------------------------------------------------------var  str1, str2: string;begin  str1 := 'Delphi';
  str2 := str1.QuotedString;        // 'Delphi'  str2 := str1.QuotedString('"');   // "Delphi"
  str1 := '"Delphi"';  str2 := str1.DeQuotedString('"'); // Delphiend; 

相关阅读 >>

Delphi中如何控制webbrowser滚动条

Delphi xe7组件tetheringmanager1发送消息

Delphi 建立快捷方式的函数: createshortcut

Delphi 系统任务栏 窗口状态显示进度

Delphi 获得当前系统的tcp所有打开端口及ip地址

Delphi 判断是否是系统管理员身份

Delphi 调用sql和mysql存储过程

Delphi 取时间戳

如何减小Delphi应用程序(exe)的大小

Delphi fmx自定义对话框样式，多屏幕布局

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