Page 1 of 1

BTNBMP Estilo 2010 desde Recursos

Posted: Sat Jul 27, 2013 5:35 pm
by Blessed
Hola a todos

Estoy queriendo actualizar el interfaz de mis aplicaciones ya que estoy con la FWH13.06, pero al tomar el consejo de siempre usar la clausula de 2007 y agregando GRADIENT bGrad
http://forums.fivetechsupport.com/viewt ... 10#p125730

Consultado el archivo include FiveWin.ch en REDEFINE BTNBMP no incluye la clausula GRADIENT.
¿Habra alguna manera de hacerlo?

Gracias de antemano

Re: BTNBMP Estilo 2010 desde Recursos (solucionado)

Posted: Sat Jul 27, 2013 7:46 pm
by Blessed
Hola a todos

Contestandome a mi mismo, y de la forma que se critico antes, cambie la clase BTNBMP, y solo modifique el arreglo de Gradient, en el metodo ReDefine. 8)

Saludos

Re: BTNBMP Estilo 2010 desde Recursos

Posted: Sun Jul 28, 2013 6:36 am
by Antonio Linares
_,

Puedes mostrarnos como lo has modificado ? Asi lo incluimos en FWH para próximas versiones, gracias

REDEFINE BTNBMP ... GRADIENT bGrad ?

Re: BTNBMP Estilo 2010 desde Recursos

Posted: Mon Jul 29, 2013 10:27 pm
by Blessed
Maestro
No no hice nada complicado, solo cambie el color por defecto del Gradient, un tanto soso, para no cambiar el codigo de mis programas.

Code: Select all

   
DEFAULT ::bClrGrad := { | lInvert | If( lInvert, ;
         { { 1/3, nRGB( 255, 253, 222 ), nRGB( 255, 231, 151 ) }, ;
           { 2/3, nRGB( 255, 215,  84 ), nRGB( 255, 233, 162 ) }  ;
         }, ;
         { { 1/2, nRGB( 219, 230, 244 ), nRGB( 207-50, 221-25, 255 ) }, ;
           { 1/2, nRGB( 201-50, 217-25, 255 ), nRGB( 231, 242, 255 ) }  ;
         } ) }

 

Re: BTNBMP Estilo 2010 desde Recursos

Posted: Tue Jul 30, 2013 6:18 am
by Antonio Linares
Añadida la claúsula GRADIENT al commando REDEFINE BTNBMP ... GRADIENT ... en FWH 13.07 :-)

Re: BTNBMP Estilo 2010 desde Recursos

Posted: Sat Aug 03, 2013 4:25 pm
by Blessed
Gracias Antonio

A recoger ahorros para estar actualizado :D