Dear Manuel Mercado,
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)
Thanks in advance.
Regards,
Dutch
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)
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
Regards,
Dutch
FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio
FWPPC 10.02 / Harbour for PPC (FTDN)
ADS V.9 / MySql / MariaDB
R&R 12 Infinity / Crystal Report XI R2
(Thailand)
Dutch
FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio
FWPPC 10.02 / Harbour for PPC (FTDN)
ADS V.9 / MySql / MariaDB
R&R 12 Infinity / Crystal Report XI R2
(Thailand)