¿No funciona el componente "TWebBrowser" en Delphi 64 bits?

[olbeup]

El código que he creado para hacer las prueba para cargar un PDF:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  AFileName: WideString;
begin
  AFileName := '';
  with TOpenDialog.Create(Self) do
    if Execute then
      AFileName := FileName;

  if (AFileName <> '') then
  begin
    WebBrowser := TWebBrowser.Create(Self);
      TWinControl(WebBrowser).Parent := GroupBox1;
      WebBrowser.Align := alClient;
      WebBrowser.Navigate('file://' + AFileName);
  end;
end;

y para liberar el componenete

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
  if Assigned(WebBrowser) then
    WebBrowser.Stop;
  FreeAndNil(WebBrowser);
  Close;
end;

Un saludo.