SBUTTON Flash while WHEN CLAUSE Fault

[dutch]

Dear All,

First of all, I would like to thank you Manuel Mercado for very nice library.

I've use Manuel Mercado library (SBUTTON.LIB 6.20). When I rebuild with xHarbour 1.2.1 and got the problem.

In the past, I can use bitmap or resource picture. When disable the button will unable to click.

Now when I use when clause and use resource or bitmap, the sbutton will be flash (blink)

Code: Select all  Expand view

               
   REDEFINE SBUTTON oBtm[49] ID 249 ;  
            PROMPT 'Special Flavor' ;
                RESOURCE 'PREPARE1', 'PREPARE1', 'PREPARE3', 'PREPARE4' ;
                WHEN      (TRN->TRN_PRNORD=0.and.TRN->TRN_VOID<>'V') ;
                ACTION  (oBrw[2]:SetFocus(),SpcFlavor(.F.,TRN->(RecNo())),ReBal( oSay, oBtn1, oBtn2 ),oBrw[1]:Refresh(),oBrw[2]:Refresh()) ;
                XP NOBORDER ;  
                FONT oFnt[7] ;
                COLOR {|oBtn| If( oBtn:lMouseOver, CLR_HRED, CLR_BLACK ) } ;  
                TEXT ON_BOTTOM
   REDEFINE SBUTTON oBtm[45] ID 245 ;  
                FILE 'BMP\UP.BMP' ;
                WHEN (nPage>1) ;
                ACTION MakeMenuBtn(GTR->GTR_CODE,oDlg,ACT->(ordNumber())=1,.T.,.F.) ;
                XP NOBORDER ;
                COLOR {|oBtn| If( oBtn:lMouseOver, CLR_HRED, CLR_BLACK ) }  

Thanks in advance.

Regards,
Dutch

[mmercado]

Hello Dutch:

Now when I use when clause and use resource or bitmap, the sbutton will be flash (blink)

Please contact me by email to send you the correction.

Best regards.

Manuel Mercado.

[dutch]

Dear Manuel,

I have no your private email. Could you give me please.

Regards,
Dutch

[mmercado]

I have no your private email. Could you give me please.

manuelmercado @ prodigy.net.mx

[betoncu]

Dear Manuel,

I have the same problem also.
Please send the solution to me also.

Regards,
Birol Betoncu
betoncu@birimnet.com

[dutch]

Dear Birol Betoncu,

Manuel was fixed it and release V.6.3. I'm not quite sure that when Manuel will release the latest version. It look nice and more compatible.

Regards,
Dutch