FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour SOBRE BOTONES Y SU FORMA
Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: SOBRE BOTONES Y SU FORMA
Posted: Mon Aug 17, 2009 03:53 PM
Hola Adhemar:
acuellar wrote:Definitivamente con FILE funciona con 4 imagenes y con RESNAME no.

Tienes raz贸n, existe un error en FiveWin.ch (Ojo Antonio/Daniel)

Dice:
Code (fw): Select all Collapse
#xcommand REDEFINE BTNBMP [<oBtn>] ;
聽 聽 聽 聽 聽 聽 聽[ ID <nId> ] ;
聽 聽 聽 聽 聽 聽 聽[ <bar: OF, BUTTONBAR > <oBar> ] ;
聽 聽 聽 聽 聽 聽 聽[ <resource: NAME, RESNAME, RESOURCE> <cResName1> ;
聽 聽 聽 聽 聽 聽 聽 聽 [,<cResName2>[,<cResName3>][,<cResName4>] ] ] ;
聽 聽 聽 聽 聽 聽 聽[ <file: FILE, FILENAME, DISK> <cBmpFile1> ;
聽 聽 聽 聽 聽 聽 聽 聽[,<cBmpFile2>[,<cBmpFile3>[,<cBmpFile4>] ] ] ] ;
聽 聽 聽 聽 聽 聽 聽[ <action:ACTION,EXEC,ON CLICK> <uAction,...> ] ;
聽 聽 聽 聽 聽 聽 聽[ MESSAGE <cMsg> ] ;
聽 聽 聽 聽 聽 聽 聽[ <adjust: ADJUST > ] ;
聽 聽 聽 聽 聽 聽 聽[ WHEN <uWhen> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lUpdate: UPDATE> ] ;
聽 聽 聽 聽 聽 聽 聽[ TOOLTIP <cToolTip> ] ;
聽 聽 聽 聽 聽 聽 聽[ PROMPT <cPrompt> ] ;
聽 聽 聽 聽 聽 聽 聽[ FONT <oFont> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lNoBorder: NOBORDER> ] ;
聽 聽 聽 聽 聽 聽 聽[ <layout: CENTER, TOP, LEFT, BOTTOM, RIGHT> ] ;
聽 聽 聽 聽 聽 聽 聽[ <l2007: 2007> ] ; 
聽 聽 聽 聽 聽 聽 聽[ <lTrans: TRANSPARENT> ] ; 聽 聽 聽 聽 聽 聽 
聽 聽 聽 => ;
聽 聽 聽 聽 聽[ <oBtn> := ] TBtnBmp():ReDefine( <nId>, <cResName1>, <cResName2>,;
聽 聽 聽 聽 聽 聽 <cBmpFile1>, <cBmpFile2>, <cMsg>, [{|Self|<uAction>}],;
聽 聽 聽 聽 聽 聽 <oBar>, <.adjust.>, <{uWhen}>, <.lUpdate.>, <cToolTip>,;
聽 聽 聽 聽 聽 聽 <cPrompt>, <oFont>, [<cResName3>], [<cBmpFile3>], [!<.lNoBorder.>],;
聽 聽 聽 聽 聽 聽 [ Upper(<(layout)>) ], <.l2007.>,[<cResName4>], [<cBmpFile4>], <.lTrans.> )

Debe decir:
Code (fw): Select all Collapse
#xcommand REDEFINE BTNBMP [<oBtn>] ;
聽 聽 聽 聽 聽 聽 聽[ ID <nId> ] ;
聽 聽 聽 聽 聽 聽 聽[ <bar: OF, BUTTONBAR > <oBar> ] ;
聽 聽 聽 聽 聽 聽 聽[ <resource: NAME, RESNAME, RESOURCE> <cResName1> ;
聽 聽 聽 聽 聽 聽 聽 聽 [,<cResName2>[,<cResName3>[,<cResName4>] ] ] ];
聽 聽 聽 聽 聽 聽 聽[ <file: FILE, FILENAME, DISK> <cBmpFile1> ;
聽 聽 聽 聽 聽 聽 聽 聽[,<cBmpFile2>[,<cBmpFile3>[,<cBmpFile4>] ] ] ] ;
聽 聽 聽 聽 聽 聽 聽[ <action:ACTION,EXEC,ON CLICK> <uAction,...> ] ;
聽 聽 聽 聽 聽 聽 聽[ MESSAGE <cMsg> ] ;
聽 聽 聽 聽 聽 聽 聽[ <adjust: ADJUST > ] ;
聽 聽 聽 聽 聽 聽 聽[ WHEN <uWhen> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lUpdate: UPDATE> ] ;
聽 聽 聽 聽 聽 聽 聽[ TOOLTIP <cToolTip> ] ;
聽 聽 聽 聽 聽 聽 聽[ PROMPT <cPrompt> ] ;
聽 聽 聽 聽 聽 聽 聽[ FONT <oFont> ] ;
聽 聽 聽 聽 聽 聽 聽[ <lNoBorder: NOBORDER> ] ;
聽 聽 聽 聽 聽 聽 聽[ <layout: CENTER, TOP, LEFT, BOTTOM, RIGHT> ] ;
聽 聽 聽 聽 聽 聽 聽[ <l2007: 2007> ] ; 
聽 聽 聽 聽 聽 聽 聽[ <lTrans: TRANSPARENT> ] ; 聽 聽 聽 聽 聽 聽 
聽 聽 聽 => ;
聽 聽 聽 聽 聽[ <oBtn> := ] TBtnBmp():ReDefine( <nId>, <cResName1>, <cResName2>,;
聽 聽 聽 聽 聽 聽 <cBmpFile1>, <cBmpFile2>, <cMsg>, [{|Self|<uAction>}],;
聽 聽 聽 聽 聽 聽 <oBar>, <.adjust.>, <{uWhen}>, <.lUpdate.>, <cToolTip>,;
聽 聽 聽 聽 聽 聽 <cPrompt>, <oFont>, [<cResName3>], [<cBmpFile3>], [!<.lNoBorder.>],;
聽 聽 聽 聽 聽 聽 [ Upper(<(layout)>) ], <.l2007.>,[<cResName4>], [<cBmpFile4>], <.lTrans.> )

Un abrazo.

Manuel Mercado.
manuelmercado at prodigy dot net dot mx
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: SOBRE BOTONES Y SU FORMA
Posted: Mon Aug 17, 2009 04:14 PM

Gracias Distinguido Manuel

Esa era la falla, ahora necesito hacer una acci贸n cuando en Mouse pasa sobre el bot贸n
C贸mo se hace?

Se podr谩 hacer que el recuadro del focus sea mas alto y no cubra parte del texto.

Gracias una vez mas

Saludos

Adhemar

Saludos,



Adhemar C.
Posts: 330
Joined: Fri May 25, 2007 09:06 PM
Re: SOBRE BOTONES Y SU FORMA
Posted: Mon Aug 17, 2009 04:20 PM

PON UNA IMAGEN DE LO Q QUIERES HACER..

Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: SOBRE BOTONES Y SU FORMA
Posted: Mon Aug 17, 2009 04:29 PM
Lo que quiero es que el recuadro del focus sea mas alto


En cuanto al Mouse Over asi hago con SBUTTON
Code (fw): Select all Collapse
COLOR {|oBtn| If(oBtn:lPressed,CLR_GREEN,If(oBtn:lMouseOver,(BusFoto(vTab,xI),CLR_HBLUE),CLR_BLACK))}


Como se hace con BTNBMP

Gracias

Saludos

Adhemar
Saludos,



Adhemar C.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: SOBRE BOTONES Y SU FORMA
Posted: Mon Aug 17, 2009 04:35 PM

Manuel,

Corregido para la pr贸xima version, gracias! :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 537
Joined: Mon Jan 16, 2006 03:42 PM
Re: SOBRE BOTONES Y SU FORMA
Posted: Wed Oct 08, 2014 01:51 PM

acuellar tienes algun correo de contacto.

saludos

Continue the discussion