WM_COPYDATA传送指针数据类型的问题

WM_COPYDATA传送指针数据的问题

• var
         cdds:TcopyDataStruct;
       strAnsi:string;
  begin
        cdds:=PCopyDataStruct(M.lParam)^;
   strAnsi:=strpas(pchar(cdds.lpData ));

• Memo1.Lines.Add(strAnsi);

     以上代码在delphi2000执行没问题，但到xe5问题就来了

• 改为strAnsi:=strpas(PAnsiChar(cdds.lpData));  正常