Consultar un Archivo PDF en una Forma

[radenf]

Estimado Nelson:

Los problemas que yo he detectado se producen sólo con la última versión de Adobe Reader 11.0.07, que es la que incluye AcroPdf.dll y AcroPdf64.dll y no con las versiones anteriores. Según la gente de Adobe el componente AcroPdf no sería capaz de seleccionar la dll adecuada y eso provocaría los fallos, situación que al parecer no piensan corregir, ya que no pretenden seguir dando soporte a sistemas de 32 bits.

Respondiendo tus preguntas:

1. Siempre compilo en 32 bits, con Delphi instalado sobre Windows7 Profesional de 64 bits (No tengo posibilidad de utilizar Windows de 32 bits).
2. Utilizo Delphi 2007.
3. Probé tu código propuesto en el Msg #10 del hilo ActiveX AcroPdf no funciona, pero no me gustó que el AcrobatReader se abriera dentro de un form.

Finalmente opté por utilizar el siguiente código, que me ha funcionado bien, sin importar la versión de Adobe Reader:

Código Delphi [-]
ShellExecute(Application.Handle,'', PChar(DBEditInforme.Text), nil,nil,SW_SHOW);

Muchas gracias por tus aportes y sugerencias.
Saludos

[[nlsgarcia]]

radenf,

Empezado por radenf

...Probé tu código propuesto en el Msg #10...pero no me gustó que el Acrobat Reader se abriera dentro de un form...

Revisa este código:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, OleCtrls, AcroPDFLib_TLB, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    OpenDialog1: TOpenDialog;
    AcroPDF1: TAcroPDF;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
   if OpenDialog1.Execute then
      AcroPDF1.LoadFile(OpenDialog1.FileName);
end;

end.

El código anterior en Delphi 7 bajo Windows 7 Professional x32 y x64, permite visualizar un documento PDF por medio del componente TAcroPDF de Adobe Reader 11.0.07, sin embargo en Delphi 2010 y Delphi XE4 bajo Windows 7 Professional x32 y x64 da el siguiente error :



Según entiendo el mismo error se presenta en Delphi 2007, sin embargo es interesante el hecho de que en Delphi 7 el componente funciona correctamente según lo esperado.

Espero sea útil

Nelson.

[radenf]

Muchas gracias Nelson.
Saludos