求助:StringToWideChar的用法

Question

在Delphi中无法调用StringToWideChar函数,总是报内存错误
代码如下:
procedure TFile_opt.Button1Click(Sender: TObject);
var str4 :PWideChar ;
begin
      StringToWideChar('thisMyText',str4,255);
end;

Answer 1

都没有分配空间的说...procedure TForm1.Button1Click(Sender: TObject);
var
  str4 :PWideChar;
begin
  str4 := AllocMem(255);
  StringToWideChar('thisMyText', str4, 255);
  Caption := str4;
  FreeMem(str4);
end;

Answer 2

解决了，用这个StringToOleStr就可以了， 多谢killlaoli(菜鸟)，您的方法也行