ansi string TO PWideChar注意事项

转换方法当然是：PWideChar(WideString(strAnsi))

但因为有很多地方要调用，我写了一个通用的函数：

function StrToPW(s: string): PWideChar;

begin

    result := PWideChar(WideString(s));

end;

结果问题来了，只有第一次调用时得到的值是对的，第二次调用得到的值就乱七八糟了。不知道这算不算delphi的BUG？