Capturar pagina html y recuperar resultado

[leandro]

Leandro,

Por favor prueba este EXE:
https://github.com/FiveTechSoft/FWH_tools/blob/master/webviewdian.exe

Si, ese código ya lo habíamos compilado y funciona correctamente, si lo compilamos solito en la carpeta de los samples de fw, pero al momento de integrarlo a nuestra app crash. Es el mismo error que esta reportando Enrique Vertiz cuando lo integra a su aplicación.

[Enrrique Vertiz]

Saludos confirmo el mismo error, compilando con el ultimo FWH entregdo ...

Application
===========
Path and name: D:\Gci\MySuite\MyContsys\MyContsys.EXE (32 bits)
Size: 3,689,984 bytes
Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20201212)
FiveWin version: FWH 24.07
C compiler version: Borland/Embarcadero C++ 7.4 (32-bit)
Windows 11 64 Bits, version: 6.2, Build 9200

Time from start: 0 hours 0 mins 30 secs
Error occurred at: 06/10/2024, 14:25:53
Error description: Error BASE/1070 Error de argumento: ==
Args:
[ 1] = N 0
[ 2] = P 0x613B2CC

Stack Calls
===========
Called from: .\source\classes\twebview2.prg => (b)WEBVIEW2_ONEVAL( 128 )
Called from: => ASCAN( 0 )
Called from: .\source\classes\twebview2.prg => WEBVIEW2_ONEVAL( 128 )
Called from: => WINRUN( 0 )
Called from: D:\Fwh\Fwh2407\source\classes\window.prg => TMDIFRAME:ACTIVATE( 1117 )
Called from: D:\Cv\contfive.prg => MAIN( 4353 )

[Antonio Linares]

Por favor comprobad el valor de este handle despues de crear el objeto webview:

MsgInfo( oWebView:hWebView )

[Enrrique Vertiz]

Saludos Antonio

Si sale el numero de un handle, aqui la imagen

[Enrrique Vertiz]

Y claro despues de ese msginfo(), bota el error que ya reportamos

[Antonio Linares]

Modifica este código en la clase TWebView2 y veamos cual de los dos es el que vale cero:

Code: Select all  Expand view

function WebView2_OnEval( cJson, hWebView )

   local nAt := AScan( aWebViews, { | o | MsgInfo( o:hWebView ), MsgInfo( hWebView ), o:hWebView == hWebView } ), nResult

   if nAt != 0 .and. ! Empty( aWebViews[ nAt ]:bOnEval )
      nResult = Eval( aWebViews[ nAt ]:bOnEval, cJson, hWebView )
   endif  

return nResult

[leandro]

Antonio buenos días

Y perdóname la ignorancia, como se incluye ese prg en el proyecto .hbp (hbmk2) solo lo colocamos en el listado de prgs en el proyecto y ya? o se debe hacer algo adicional? como sabe hbmk2 cual es el código que debe usar?

De antemano gracias

[Antonio Linares]

Leandro,

Hay que modificar twebview2.prg, compilarlo y reemplazarlo en FiveH64.lib:

lib.exe Fiveh64.lib /OUT:Fiveh64.lib twebview2.obj

[leandro]

Antonio gracias de nuevo por responder con tanta rapidez

Leandro,

Hay que modificar twebview2.prg, compilarlo y reemplazarlo en FiveH64.lib:

lib.exe Fiveh64.lib /OUT:Fiveh64.lib twebview2.obj

Pero, esto es como si me hubieras hablado en chino jejejejejeje

Luego de cambiar el twebview2.prg, ingreso al cmd, dentro de que carpeta? y copiamos estas instrucciones:

lib.exe Fiveh64.lib /OUT:Fiveh64.lib twebview2.obj

Se debería crear una nueva lib?

[Antonio Linares]

Te la envío por email

[leandro]

Antonio buenas tardes, en este orden salen los msginfo, hasta que se revienta.

[Antonio Linares]

Te acabo de enviar una librería modificada, vuelve a probar con ella por favor, gracias

https://wormhole.app/a6QE9#x9dBYLDJgBHjSZTSVW0d6A

[leandro]

Antonio recibida y compilada, ya no sale el mensaje de error, pero... tampoco sale el msginfo, desde la carpeta samples, funciona correctamente.

[Antonio Linares]

Te envío otra lib modificada que va a mostrarnos el contenido de la static aWebViews

Por favor construye con ella y veamos que te aparece

gracias

[acuellar]

Buenas estimados

Con FWH0924 x64 y MSVC funciona perfecto



https://drive.google.com/file/d/1-cf06JGTArqTUwXZ2EQq_fKqbQr7Wfp8/view?usp=sharing