function StrECopyW(Dest: PWideChar; Source: PWideChar): PWideChar;

TntSysUtils

TNT-WARN StrECopy