Problemas com caracteres

function getUrl(Service: string): String;

 var

 ClDDE: TDDEClientConv; {TDDEClientConv; por no uses (Ddeman);}

 temp:PWideChar;

 begin

 Result := '';

 ClDDE:= TDDEClientConv.Create( nil );

 

 with ClDDE do

 begin

 SetLink(Service,'WWW_GetWindowInfo');

 temp := PWideChar(RequestData('0xFFFFFFFF'));

 Result := StrPas(temp);

 StrDispose(temp);

 CloseLink;

 end;

 

 ClDDE.Free;

 

 end; //

No delphi 2010, o retorno do metodo é muito diferente do retorno do mesmo, no Delphi 7.

No delphi 7, consigo o esperado.

No delphi 2010, me é retornado um monte de caracteres estranhos.

No delphi 7, declaro a variavel como Pchar, e no Delphi 2010 da maneira que esta ai.

Sendo que, se eu declarar Pchar no 2010 da o mesmo problema.

Obrigado.