var ss,s: string; begin ss := 'Delphi'; s := QuotedStr(ss); ShowMessage(s); {'Delphi'} end;SysUtils 单元下的公用函数目录
举例:
var ss,s: string; begin ss := 'Delphi'; s := QuotedStr(ss); ShowMessage(s); {'Delphi'} end;SysUtils 单元下的公用函数目录