FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Pintar pestaƱa Folder
Posts: 652
Joined: Wed Oct 19, 2005 12:03 PM
Pintar pestaƱa Folder
Posted: Fri Apr 14, 2017 12:03 PM

Hola quisiera saber si ante una determinada condición se puede colorear una pestaña de la clase tfolderex

Luis

Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Pintar pestaƱa Folder
Posted: Fri Apr 14, 2017 09:26 PM
Prueba con los siguiente codeblocks

Code (fw): Select all Collapse
         oFld:aGradSel       := { { 1, CLR_VSTAB, CLR_VSTAB } }
         oFld:aGradUnSel     := { { 1, oThis:nBackColorA, oThis:nBackColorA } }
         oFld:bClrText       := { | o, n | If( o:aEnable[ n ] .and. o:aVisible[ n ], ;
                                  CLRTEXT,  GetSysColor( COLOR_GRAYTEXT ) ) }
         oFld:aGradOver      := .../...
         oFld:aGradOverUnSel := .../...
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no estĆ” en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
Re: Pintar pestaƱa Folder
Posted: Mon Apr 24, 2017 10:49 AM

c:\fwh\samples\testfx1.prg
c:\fwh\samples\testfx2.prg

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles“C
TDolphin
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Pintar pestaƱa Folder
Posted: Mon Apr 24, 2017 01:28 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 652
Joined: Wed Oct 19, 2005 12:03 PM
Re: Pintar pestaƱa Folder
Posted: Mon Apr 24, 2017 10:50 PM
Gracias a ambos, la solución que encontré para no complicar todo el prg fue el uso de bitmaps

Code (fw): Select all Collapse
   REDEFINE FOLDEREX oFold id 101 oF oDlgCli   ;
      PROMPTS "General", "Impuestos", "Sedronar", "Datos", "Cobranza";
      BITMAPS "","","","",IIF(lcobro,"B_ACEPTAR","");
      DIALOGS "fold_cli1", "fold_cli2", "fold_cli3", "fold_cli4", "fold_cli5";


Y funciona como esperaba, lo que no se como cambiar, en tiempo real, el bitmap a nada cuando es necesario.


Luis

Continue the discussion