FiveTech Software tech support forums

Tengo este problema al compilar mi aplicación con FWH 15.01

Asi se ve la barra de botones si compilo con fwh 14.12

https://app.box.com/s/l60vk1879as6gg3005ecgxu6fuvbohvw

y así si lo hago con 15.12

https://app.box.com/s/83z455zzfh3ewelx4s9pzum25nmaaha1


Este es un ejemplo de una aplicación autocontenida que muestra la falla.

Aquí se ve la falla
https://app.box.com/s/9fb37242bx518j51845khowpwb5szsy1

Aquí el Código de la aplicación:

Code: Select all  Expand view

#include 'FiveWin.ch'

FUNCTION Main()
    LOCAL oWnd
   
    DEFINE WINDOW oWnd FROM 0, 0 TO 30, 80 TITLE "Prueba de falla"
            Barrabot( oWnd )
    ACTIVATE WINDOW oWnd MAXIMIZED
RETURN NIL
//----------------------------------------------------------------------------//
FUNCTION Barrabot(oWnd)
    LOCAL oBar, oBtn:=Array(3)
   
    DEFINE BUTTONBAR oBar SIZE 50, 53 TOP OF oWnd 2013
        DEFINE BUTTON oBtn[1] OF oBar FILE ".\RES\bitmap3.bmp"  ACTION nil
        DEFINE BUTTON oBtn[2] OF oBar FILE ".\RES\bitmap15.bmp"  ACTION nil
        DEFINE BUTTON oBtn[3] OF oBar FILE ".\RES\bitmap1.bmp"  GROUP ACTION oWnd:End()
RETURN NIL
//----------------------------------------------------------------------------//
 

Aquí el ejecutable, prg y los bitmaps:

https://app.box.com/s/9drdlg9pjsgwi66e2gl1w9b79pqcyig1

Con la versión 14.12 los bmps se pintan perfectamente, con la 15.01 el 2do bmp se pinta mal.

Agradezco cualquier ayuda que me puedan brindar.

Thanks for pointing out the problem and providing the files.
We are examining on top priority and get back to you.

Can you please make this change in "btnbmp.prg" ?

Present line 1141:

Code: Select all  Expand view

              if Empty( ::hPal )

Please change the line as:

Code: Select all  Expand view

              if .t.

Please link the modified btnbmp.prg in your application and let us know if the painting of all buttons in your application is okay.

Thanks for this excelent support Mr. Rao.

I made the changes and now it works perfectly.


---------------

Gracias por el excelente soporte Sr. Rao

He hecho los cambios y ahora funciona perfectamente.