如何把一个Pchar变量转换成PwideChar ( 积分: 100 )

我直接用<br>path1:string;<br>pathchar;<br>pathWwidechar;<br><br>path:=pchar(path1);<br>pathW:=PwideChar(path);<br>SetWindowTextW(FindWindow('tform1','form1'),pathW);<br>结果form1窗口的标题全部变成了乱码，请问如何才可以把pchar转为PwideChar

var<br>path1:string;<br>pathchar;<br>pathWwidechar;<br>begin<br>path1:='你就是这样的';<br>//path:=pchar(path1);<br>pathW:=StringToOleStr(path1);<br>SetWindowTextW(FindWindow('tform1','form1'),pathW);<br>end;

接受答案了.