Pdf Acrobat 11

[shoulder]

Windows 7 32 bits - Delphi 7 Build 4.4.53
TWebBrowser el componente del ActiveX de Delphi

el codigo

Código Delphi [-]
archivo  := archivo+'#toolbar=0&navpanes=0&scrollbar=1' ;
WebBrowser1.Silent := True;
WebBrowser1.Navigate('file:///'+archivo);

[[nlsgarcia]]

shoulder,

Al parecer debe haber algún tipo de problema en tu instalación de Delphi o archivos de proyecto , dado que efectivamente en Delphi 7 Enterprise Build 4.453 y Windows 7 Professional x32, el código del Msg #6 y Msg #11 funciona correctamente en Modo Debug, Runtime y no presenta ningún tipo de Error de Compilación.

Te sugiero:

1- Borrar todos los archivos de tu proyecto a excepción de los .dpr, .pas, .dfm y verificar si el comportamiento anómalo persiste.

2- Hacer un prueba aislada que solo involucre al código en cuestión y excluya otros componentes que pudieran presumiblemente provocar el comportamiento descrito.

3- Desactivar el antivirus (Poco probable en este caso en particular) y verificar si el comportamiento anómalo persiste.

4- Probar el código en cuestión en otra máquina con iguales características de Windows y Delphi.

5- En último recurso, reinstalar Delphi 7 por medio de la opción Repair.

Espero sea útil

Nelson.

[shoulder]

Hola hice lo que me explicaste, todo excelente , solo una tema....
tengo un form donde esta el webbrowser abro y activo

archivo := archivo+'#toolbar=0&navpanes=0&scrollbar=1' ;
WebBrowser1.Navigate('file:///'+archivo);

hasta aqui todo bien, no me aparece el menu navegador del PDF. Pero... cierro el form (el form lo creo al momento de abrir la ventana) , abro otra vez la ventana y al pasar el mouse por encima del PDF que me aparece.. el maldito toolbar de navegacion del PDF...

Cierro el ejecutable del programa abro el webbrowser con el pdf no aparece el navegador, pero si cierro y abro el form sin salir del programa la seguna vez aparece...
Que estoy haciendo mal?.

[[nlsgarcia]]

shoulder,

Empezado por shoulder

...Hola hice lo que me explicastes...todo excelente...

Pregunto : ¿Exactamente que fue lo que te funciono de lo sugerido en el Msg #12?

Empezado por shoulder

...tengo un form donde esta el webbrowser...abro...activo...cierro el form (el form lo creo al momento de abrir la ventana), abro otra vez la ventana y al pasar el mouse por encima del PDF...me aparece...el..toolbar de navegacion del PDF...¿Que estoy haciendo mal?...

Revisa este código:

Código Delphi [-]
// Load and Show Form2
procedure TForm1.Button1Click(Sender: TObject);
begin
   Application.CreateForm(TForm2, Form2);
   Form2.Show;
end;

// Releases the Resources of Form2
 procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
 begin
    Action := caFree;
 end;

El código anterior en Delphi 7 bajo Windows 7 Professional x32, instancia y llama al formulario Form2 el cual contiene el componente TWebBrowser y libera los recursos asignados al formulario Form2 en el evento OnClose, de esta forma no se activara la barra de navegación del TWebBrowser entre distintas llamadas al formulario que lo contiene.

Nota: El formulario Form2 no debe estar en la lista de Auto-Create Forms de opciones del proyecto.

Espero sea útil

Nelson.

[shoulder]

Hola Gracias, funciono con el repair y con la sentencia que me diste no aparece mas la toolbar. Lo unico el webbrowser lo uso para mostrar los PDF que estan en el servidor y bajo intranet es un poco lento tarda hasta casi un minuto en abrir bajo la red comun es rapido 5 segundos. No encontre forma de acelerarlo.

Gracias por todo.

[shoulder]

Hola Lamentablemente hoy fui a la oficina y vi que un usuario abrio el form lo cerro y a la tercera abrio otro PDF y salio la maldita barra navegadora del Acrobat...sera la version del acrobat 11 que tiene esta falla?.

[[nlsgarcia]]

shoulder,

Empezado por shoulder

...Lamentablemente...vi que un usuario abrió el form lo cerro y a la tercera abrió otro PDF y salio...la...barra navegadora del Acrobat...

Te comento:

1- Realize pruebas en Delphi 7, Delphi 2010, Delphi XE6 y C# 2008 (Tiene un componente WebBrowser) y con el código propuesto en el Msg #14, la barra se presenta al llamar más de una vez un mismo documento, si son diferentes la barra nunca se visualiza.

2- Probé diferentes métodos y combinaciones de Open/Close documentos PDF con el componente TWebBrowser y la barra se visualiza siempre en la segunda llamada de un documento PDF cualquiera.

3- Prueba en tu aplicación esta función:

Código Delphi [-]
 function ViewToolBarPDF(BrowserDisplayInReadMode : Boolean) : Boolean;
 begin
    try
       with TRegistry.Create do
       try
          RootKey:= HKEY_CURRENT_USER;
          if OpenKey('\Software\Adobe\Acrobat Reader\11.0\AVGeneral',False) then
          begin
             WriteInteger('bBrowserDisplayInReadMode', Integer(BrowserDisplayInReadMode));
             CloseKey;
             Result := True;
          end
          else
             Result := False;
       finally
          Free;
       end;
    except
       Result := False;
    end;
 end;

La función anterior en Delphi 7 bajo Windows 7 Professional x32, permite activar (True) y desactivar (False) la barra de herramientas de Acrobat Reader XI a nivel del Registro de Windows, dicha función esta basada en la siguiente información : Turning off Read Mode while viewing PDFs in your Browser

Nota: En mi PC la función sugerida anteriormente, no tiene ningún efecto sobre el caso descrito, sin embargo te sugiero probarla.

Pregunto: ¿Cuando indicas que se visualiza la barra de herramientas en el documento PDF, a cual barra te refieres : Barra1 o Barra2?

Barra1:


Barra2:


Espero sea útil

Nelson.