otra de tsbutton

otra de tsbutton

Postby José Ríos » Mon Feb 06, 2006 4:54 pm

Un saludo colegas del foro.

Uso tsbutton 5.0 con fwh 2.4 y xharbour 0.99.3.

Si tengo el siguiente codigo:

Code: Select all  Expand view
    REDEFINE SBUTTON oBtnBuscarNum ID 61 ;
        RESOURCE "Buscar1",,"Buscar3" ;
        OF oDlgBuscaAgentes ;
        ACTION (oGridAgentes:setOrder(1),oNumeroBuscar:setFocus(),oNumeroBuscar:refresh()); //Por numero
        WHEN Agentes->(ordSetFocus())="AGNOM";
        TOOLTIP "Busca por Numero" ;
        COLORS CLR_BLACK, ;
            {|oB| If( oB:lMouseOver, {CLR_BROWCOLCLA,CLR_WHITE,3 }, ;
                              {CLR_BROWSEOBSC,CLR_BEIGE,3} ) };
        BORDER;
        TEXT POSITION ON_RIGHT   


Al no cumplirse la condicion indicada en when deberia de mostrarse el boton con las caracteristicas definidas en tsbutton, es decir mostrando el icono llamado "Buscar 3", sin embargo casi siempre solo me aparece un cuadro blanco, sin icono ni los colores definidos.

¿Alguien sabe como solucionar este problema?.

De antemano muchas gracias.

Jose Rios.
José Ríos
 
Posts: 119
Joined: Fri Nov 04, 2005 12:23 am

Postby José Ríos » Tue Feb 07, 2006 4:07 pm

Si incluyo el windowsXP.manifest en mi RC, el boton no se desdibuja cuando no se cumple la condicion de WHEN. ¿Alguien ha solucionado el problema sin incluir windowsXP.manifest?.

Saludos.
José Ríos
 
Posts: 119
Joined: Fri Nov 04, 2005 12:23 am


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 166 guests

cron