function WideQuotedStr(const S: WideString; Quote: WideChar = '"'): WideString;

TntSysUtils

TNT-WARN QuotedStr TNT-WARN AnsiQuotedStr