Necesito embeber un fichero de office 365

[Badillo]

Saludos,

Necesito ayuda de como embeber un documento de Office 365 en delphi.

Actualmente utilizo un componente llamado TOfficeViewer, me funciona de maravilla con ficheros de Libre Office y Office, pero no funciona con la versión de Office 365.

Cualquier ayuda al respecto les agradecería

Muchas gracias.

[Neftali [Germán.Estévez]]

Empezado por Badillo

Necesito ayuda de como embeber un documento de Office 365 en delphi.

Actualmente utilizo un componente llamado TOfficeViewer, me funciona de maravilla con ficheros de Libre Office y Office, pero no funciona con la versión de Office 365.

¿Has probado a utilizar un componente TEdgeBrowser?
https://docwiki.embarcadero.com/Libr...e.TEdgeBrowser

[Badillo]

Saludos, Neftali

No he utilizado ese componente, voy a buscar información ahora, si tienes algún ejemplo sencillo que puedes facilitarme se lo agradecería

Básicamente lo que quiero es abrir en un contenedor una instancia de Excel y cargar un fichero que genero de una exportación de una table en sql, todo me funcionaba perfecto hasta que el cliente cambió para Office 365.

Muchas gracias.

[Neftali [Germán.Estévez]]

Office365 trabaja sobre un navegador, por lo tanto deberías poder utilizar ese componente, que en realidad es un wrapper do Edge.
Haz la prueba.

[Badillo]

Yo tengo instalado el WebView4Delphi-1.0.1518.46 que lo utilizo para la carga de las peticiones web que necesito, pero lo que no encuentro es como decirle que me abra un fichero .xlsx por ejemplo que lo tengo ubicado en la carpeta temporal de windows y que además pueda ser modificado y guardado nuevamente en la PC. Desde anoche estoy leyendo y buscando info.

Con lo fácil que me trabaja el componente TOfficeViewer para el resto de las versiones de Office.

Aunque para mi lo más practico sería lograr lo que tengo (Muestra en la imagen adjunta) aunque sea utilizando TOleContainer.

Gracias

[Neftali [Germán.Estévez]]

Empezado por Badillo

Yo tengo instalado el WebView4Delphi-1.0.1518.46 que lo utilizo para la carga de las peticiones web que necesito, pero lo que no encuentro es como decirle que me abra un fichero .xlsx por ejemplo que lo tengo ubicado en la carpeta temporal de windows y que además pueda ser modificado y guardado nuevamente en la PC. Desde anoche estoy leyendo y buscando info.

Con lo fácil que me trabaja el componente TOfficeViewer para el resto de las versiones de Office.

A ver antes comentabas Office365 y ahora comentas un fichero XLSX en local. Es que creo que son cosas distintas.

Los ficheros en local deberías poder abrirlos igual que antes, sea con el componente TOfficeViewer o incrustando un office dentro de tu programa.
Con Office365 ese mismo fichero puedes abrirlo directamente en una página web (su versión online). Para eso debes incrustar un navegador en tu programa o utilizar TEdgeBrowser.


Eso es lo que yo he entendido. Tal vez hay alguna cosa que no me queda clara...

[MAXIUM]

Office365 es un conjunto. Está la app de toda la vida, solo que ahora es de suscripción. Esa suscripción te permite usar office web.
Office 2016, Office 2019, Office 2021 son perpetuas
Office 365 es de suscripción.
Pero son App de escritorio al fin y al cabo.

[MAXIUM]

Si de algo sirve al usar TEdgeBrowser se debe configurar lo siguiente

Así podrás utilizar Office Viewer, una nueva función en Edge que te permite ver archivos de Word y Excel en el navegador

https://www.genbeta.com/actualidad/a...xcel-navegador

[Badillo]

Gracias,

Voy a probar con esa configuración, pero en la url cuando le paso el documento local, lo que hace es que me lo descarga no me lo muestra. Quizas allí es donde me está faltando algo.

Les comentaré gracias.

[Badillo]

No he logrado instalar TEdgeBrowser en mi Delphi EX4.

Les enumeraré los pasos que he seguido según este sitio: https://yilmazyoru.medium.com/how-to...e-38d106bc7446

1. Instalé la versión “Edge Canary” desde https://www.microsoftedgeinsider.com.
2. Instalé MicrosoftEdgeWebView2RuntimeInstallerX64.exe
3. Descargue microsoft.web.webview2.1.0.2478.35.nupkg
4. le cambie la extensión a Zip y lo descomprimí
5. Copié para mi proyecto el fichero WebView2Loader.dll

Pero este paso, no encuentro como hacerlo, mi Delphi EX4 no tiene esa opción o al menos yo no la encuentro.
6.Descargue “Edge SDK” desde el menú GetIt de RAD Studio

Conoce alguna otra forma de hacerlo.

Buscando lo que he encontrado todo apunta a esta página https://www.nuget.org/packages/Microsoft.Web.WebView2 y me descargo nuevamente microsoft.web.webview2.1.0.2478.35.nupkg

Algo me está faltando porque no veo como el componente en las palestas de Delphi o algo parecido.

Muchas gracias.

[MAXIUM]

Para el TEdgeBrowser no se si es necesario Instalar Canary, quizás lo es para obtener la .dll que debe ir acompañado de tus ejecutables



Por otra parte el WebView2 lo puedes obtener de este enlace https://developer.microsoft.com/es-e...A13LH#download

[Neftali [Germán.Estévez]]

En este otro hilo hemos hablado del tema (instalar TEdgeBrowser).
Con esos pasos yo he conseguido que funcione ok.

[salvadordf]

Actualiza a la última version de WebView4Delphi en GitHub https://github.com/salvadordf/WebView4Delphi
y asigna TRUE a GlobalWebView2Loader.OpenOfficeDocumentsInWebViewer antes de la llamada a GlobalWebView2Loader.StartWebView2


Con eso se activa el visor de documentos Office.



WebView4Delphi incluye WebView2Loader.dll y solo es necesario que instales WebView2 en el ordenador.


Usa el "Evergreen Standalone Installer" :

https://developer.microsoft.com/en-u...wnload-section

[Badillo]

Muchas gracias, Salvador

Probaré ahora y le comento.

Muchas gracias.

[Badillo]

Saludos, Salvador

Realicé los siguientes pasos y el resultado sigue siendo la descarga y no la visualización.

1. Me descargué la versión del WebView4Delphi desde https://github.com/salvadordf/WebVie...heads/main.zip
2. Abrí el ejemplo C:\Documentos\Descargas\WebView4Delphi-main\WebView4Delphi-main\demos\Delphi_VCL\SimpleBrowser
3. Realicé la modificación que me comentó en la unit uSimpleBrowser.

Código Delphi [-]
initialization
  GlobalWebView2Loader                := TWVLoader.Create(nil);
  GlobalWebView2Loader.UserDataFolder := ExtractFileDir(Application.ExeName) + '\CustomCache';
  
  //Modifcación
  GlobalWebView2Loader.OpenOfficeDocumentsInWebViewer := True;
  
  GlobalWebView2Loader.StartWebView2;

4- En el combo puse la dirección local del documento que necesito visualizar antes de la llamada para abrir la url.

Código Delphi [-]
procedure TMainForm.GoBtnClick(Sender: TObject);
begin
  AddressCb.Text := 'C:\Documentos\Descargas\MedAdm.xlsx';
  WVBrowser1.Navigate(AddressCb.Text);
end;

5- El resultado es que lo descarga y no lo muestra (Adjunto imagen de muestra).


Qué pudiera estar faltándome?

Disculpé la insistencia y gracias de antemano como siempre por la ayuda.

[salvadordf]

Depende del tipo de enlace al archivo y seguramente de la configuración del servidor HTTP.


Estos enlaces los abre en una ventana nueva del navegador :
https://file-examples.com/index.php/...-xls-download/


Pero estos los descarga. El enlace tiene un atributo "download" :
https://filesamples.com/formats/xlsx


Con las URL con esquema FILE tambien los descarga.


He probado a cancelar la descarga y navegar a la URI pero el navegador insiste en descargar otra vez el archivo.


Como puedes leer en el repositorio de WebView2 esta característica no interpreta los archivos de office sino que los abre con Microsoft Office Online.
https://github.com/MicrosoftEdge/Web...ck/issues/2774


Además abre los archivos en una ventana nueva :
https://github.com/MicrosoftEdge/Web...ck/issues/2104

[Badillo]

Muchas gracias Salvador,

Por esta vía no lograré mostrar los ficheros, todos los enlaces son de tipo FILE, son documentos que se generan en la carpeta temporal.

Muchísimas gracias por la explicación.