Error Parámetro Referencia componente ActiveX

[Maniches]

Amigo duilioisola
He intentado modificar la forma de usar la función en base a lo que sugeriste y si bien me compila y ya no me muestra error no puedo obtener la información del parámetro:

Código Delphi [-]
var
  CardInformation : WideString;
  CardInformation2 : ^WideString;
begin
  try
    try
      GetMem(CardInformation2, 255 * 2);
      ReadCardResult:= MyCompActX.ReadInformation(CardInformation2^, 20, 20, 1, 'INGRESE NUM...');
      CardInformation := WideChar(CardInformation2);
      ShowMessage(CardInformation);
      CardInformation := PWideChar(CardInformation2);
      ShowMessage(CardInformation);
      CardInformation := StrPas(PAnsiChar(CardInformation2));
      ShowMessage(CardInformation);
    finally
      FreeMem(CardInformation2);
    end;
    if Trim(CardInformation2) <> '' then
      ShowMessage(CardInformation);
  finally
    MyCompActX.Free;
  end;

La información que debe devolver es: '092261779...' pero revisando el valor que se asigna como resultados de la función es:

CardInformation := WideChar(CardInformation2) --> #$1A30
CardInformation := PWideChar(CardInformation2) --> 'Ұ'#2
CardInformation := StrPas(PAnsiChar(CardInformation2)) --> '°'#4#2

que sugerencias amigo por donde puede estar el problema?