twebview2

[russimicro]

Antonio buen dia...

No señor no genera ningún archivo...

estoy ejecutando el buildxhb.bat webviewdian ... sin cambiar nada .. solo con la nueva lib xfw.lib---

en su entorno como funciona ?

nota : los .prg de la version 1 si funcionan

[Antonio Linares]

El mismo problema, se sale

Vamos a intentar averiguar que sucede

[Antonio Linares]

Estimado Johnson,

Arreglado!

Te envío la versión modificada por email

Muchas gracias por tu feedback

[russimicro]

Antonio... buen día..

Ok. ya probe y esta ok... Gracias

Este caso de la clase TGroup, que distorsiona las dimensiones y pintado desfazado..

Code: Select all  Expand view  RUN

   if !lPixel
      if nTop    >= 1.0; nTop    *= GRP_CHARPIX_H; endif
      if nLeft   >= 1.0; nLeft   *= GRP_CHARPIX_W; endif
      if nBottom >= 1.0; nBottom *= GRP_CHARPIX_H; endif
      if nRight  >= 1.0; nRight  *= GRP_CHARPIX_W; endif
   endif
   ::CalcSize( @nTop, @nLeft, @nWidth, @nHeight, lRelPix, oWnd, @nBottom, @nRight )
 

// por ahora lo bloqueo y activo el siguiente bloque

Code: Select all  Expand view  RUN

   ::nTop  = nTop  * If( lPixel, 1, GRP_CHARPIX_H ) // 14
   ::nLeft = nLeft * If( lPixel, 1, GRP_CHARPIX_W ) //  7

   if nWidth != nil
      ::nRight = ::nLeft + nWidth
   else
      ::nRight   = nRight  * If( lPixel, 1, GRP_CHARPIX_W ) //  7
   endif