FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Cosas de botones
Posts: 731
Joined: Fri Oct 07, 2005 07:42 AM
Cosas de botones
Posted: Thu Jan 17, 2008 01:01 PM

¿ Es posible poner un tooglebutton en Fivewin ? O windows da soporte para ello ?

¿ Esta el soporte para el button tipo Split ?

¿ Puede crear dinamicamente botones en un dialogo de recursos ?

Saludos

Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Cosas de botones
Posted: Thu Jan 17, 2008 03:19 PM
thefull wrote:¿ Es posible poner un tooglebutton en Fivewin ? O windows da soporte para ello ?

¿ Esta el soporte para el button tipo Split ?

¿ Puede crear dinamicamente botones en un dialogo de recursos ?



Es posible poner un tooglebutton en Fivewin ? O windows da soporte para ello ?

        DEFINE BUTTON oBtnCliente OF OBAR RESOURCE "SCULLY"            ;
               MESSAGE "Inclusão dos Clientes nos Bancos de Dados"     ;
               ACTION ( Click(), oBtnCliente:Toggle(), CLIEIMOB(),     ;
                                 oBtnCliente:GoUp() )                  ;
               TOOLTIP "Manutenção dos Clientes-Use <Alt+A>"           ;
               NOBORDER GROUP                                          ;
               CENTER                                                  ;
               MENU MENU_CLIENTES_IMOBILIARIA()


Esta el soporte para el button tipo Split ?

ESTOU EN DUDA... SOLAMENTE ANTONIO LINARES... PERO, CREO QUE SI.

Puede crear dinamicamente botones en un dialogo de recursos ?

SI, SIN PROBLEMAS.

TE BASTA CREAR LOS BOTONES CON EL MISMO ID EN LAS MISMAS COORDENADAS E LLAMAR
DINAMICAMENTE E CAMBIAR EN TIEMPO REAL SE UNA TAREA SEA SATISFACTORIA.

DEBES USAR LOS COMANDOS HIDE() Y SHOW() PARA EL CONTROLE DEL MISMOS.

Saludos
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 731
Joined: Fri Oct 07, 2005 07:42 AM
Re: Cosas de botones
Posted: Fri Jan 18, 2008 08:37 AM
thefull wrote:¿ Es posible poner un tooglebutton en Fivewin ? O windows da soporte para ello ?

¿ Esta el soporte para el button tipo Split ?

¿ Puede crear dinamicamente botones en un dialogo de recursos ?

Karina.

1.- En Fivewin es posible usando la clase TBtnBmp, ejemplo;
     
REDEFINE BTNBMP aButtons1[1] ACTION ( Aeval( aButtons1, {|o| o:GoUp() } ),aButtons1[1]:GoDown()  ) ID 101 OF oDlg
     REDEFINE BTNBMP aButtons1[2] ACTION ( Aeval( aButtons1, {|o| o:GoUp() } ),aButtons1[2]:GoDown()  ) ID 102 OF oDlg
     REDEFINE BTNBMP aButtons1[3] ACTION ( Aeval( aButtons1, {|o| o:GoUp() } ),aButtons1[3]:GoDown()  ) ID 103 OF oDlg
     REDEFINE BTNBMP aButtons1[4] ACTION ( Aeval( aButtons1, {|o| o:GoUp() } ),aButtons1[4]:GoDown()  ) ID 104 OF oDlg
     REDEFINE BTNBMP aButtons1[5] ACTION ( Aeval( aButtons1, {|o| o:GoUp() } ),aButtons1[5]:GoDown()  ) ID 105 OF oDlg
     REDEFINE BTNBMP aButtons1[6] ACTION ( Aeval( aButtons1, {|o| o:GoUp() } ),aButtons1[6]:GoDown()  ) ID 106 OF oDlg

     aButtons1[1]:GoDown()

En este ejemplo, solo uno puede estar activado, y por defecto , el primero esta en ese estado.
El problema es que se pierde la estética, sería interesante modificar el pintado de esta clase para que cree un botón identico al Windowsl.

2- Button Split es de Windows Vista, ni tan siquiera se muestra en un XP, asi que me olvido.

3.- No me refiero a Show()/Hide(), si no, a crearlos en un dialogo de recursos, algo asi;

DEFINE DIALOG oDlg NAME "TEST"
REDEFINE BUTTON oBtn ID 101 OF oDlg
@100,100 BUTTON oBtn2 PROMPT "HELOO" OF oDlg

En la lógica, dice que debería funcionar.....pero.... todavía no lo he probado.
Saludos

Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)

Continue the discussion