FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Problema usando dialogos en TFolder
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Problema usando dialogos en TFolder
Posted: Sat May 03, 2008 01:06 PM

Hola a todos,

Tengo un formulario que me aparece al pinchar sobre un folder.
Los problemas son dos:

Primero, no consigo seleccionar uno u otro GET con el bot贸n izquierdo del raton, es como si el cursor no pudiese salir del primer get donde aparece por defecto. Cosa que en un formulario desde un dialogo sin folder, si que lo puedo hacer.

Tampoco se como evitar que la ventana de dialogo que hay dentro del folder, no se mueva al pulsar sobre la barra de titulo y mover el rat贸n.

驴a alguien le ha ocurrido algo parecido?
una yudiita por favor.

Javier,

FWH 8.04 2008
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Problema con checkbox en dialogo de TFolder
Posted: Sat May 03, 2008 03:01 PM
Otra duda que me ha surgido.

Tengo un COMBOBOX que segun el elemento que elijes, condiciona que un CHECKBOX este o no activo.



Code: Select all Collapse
   
REDEFINE COMBOBOX oCbx VAR aItems ;
      ID ID_MODELO OF oTab:aDialogs[1] ;
      STYLE CBS_DROPDOWN ;
      ON CHANGE ( fCambio( oCbx:aItems[ oCbx:nAt ] ), oDuplex:Refresh) )

   REDEFINE CHECKBOX oDuplex ;
                 VAR CATALOGO->DUPLEX ID ID_DUPLEX OF oTab:aDialogs[1] ;
                 WHEN CATALOGO->CTRLDUPLEX


El problema es que no actualiza el checkbox. Salvo que pulse la tecla TAB.
Javier,

FWH 8.04 2008
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Problema usando dialogos en TFolder
Posted: Sun May 04, 2008 02:11 PM

Bueno,

En relaci贸n a la duda de como evitar mover los dialogos que se muestran dentro de un folder, ya he averigado el modo. No habia mas que cambiar la configuraci贸n del dialogo desde el editor de recursos PELLES-C.

Espero que esta informaci贸n le pueda serviar a alguien.
Pero sigo sin saber porque no se actualizan los controles checkbox al cambiar el valor de su condici贸n (el ejemplo del codigo).

Saludos

Javier,

FWH 8.04 2008
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Problema usando dialogos en TFolder
Posted: Sun May 04, 2008 02:35 PM

jfafive:

Yo intentar铆a con lo siguiente:

Agregar la clausula UPDATE al CHECKBOX

REDEFINE CHECKBOX oDuplex ;
VAR CATALOGO->DUPLEX ID ID_DUPLEX OF oTab:aDialogs[1] UPDATE;
WHEN CATALOGO->CTRLDUPLEX

y en ON CHANGE refrescar铆a el TAB

ON CHANGE ........ oTab:aDialogs[1]:UPDATE()

Ojal谩 te desatores.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Problema usando dialogos en TFolder
Posted: Mon May 05, 2008 08:19 AM
Hola Armando,

Gracias por tus indicaciones, pero a煤n as铆, no funciona.
Curiosamente actualiza el control en base a si el valor es .t. (checked) or .f. (no checked). Pero no refresca la clausula WHEN para que dicho control se habilite o inhabilite.

Solo al repasar los controles del dialogo pulsando la tecla TAB, se refresca.

Lo he probado en un dialogo normal (sin folder) y he podido comprobar que el folder no tiene nada que ver. El fallo persiste. :-)

Code: Select all Collapse
   REDEFINE CHECKBOX oDuplex ;
                 VAR CATALOGO->DUPLEX ;
                 ID ID_DUPLEX OF oDlg ;
                 UPDATE ;
                 ON CHANGE ( oDuplex:Refresh(), oDlg:Update() ) ;
                 WHEN CATALOGO->CTRLDUPLEX
Javier,

FWH 8.04 2008
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Problema usando dialogos en TFolder
Posted: Mon May 05, 2008 09:07 AM

Javier,

El WHEN solo se eval煤a cuando otro control pierde el foco (usando tab, pulsando el rat贸n en otro control, etc.)

Una forma de forzar la evaluaci贸n de todos los WHEN es hacer:
oDlg:AEvalWhen()

Si se trata de una p谩gina (di谩logo) de un folder:
oFolder:aDialogs[ n ]:AEvalWhen()

regards, saludos

Antonio Linares
www.fivetechsoft.com
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Problema usando dialogos en TFolder
Posted: Mon May 05, 2008 12:13 PM

Perfecto!!

Una vez mas, gracias maestro.

:D

Javier,

FWH 8.04 2008
Garbi
Posts: 350
Joined: Wed Nov 02, 2005 03:28 PM
Problema usando dialogos en TFolder
Posted: Wed Jul 02, 2008 04:14 PM

A mi me esta sucediendo lo mismo que a ti en los get's y folders, 驴Como lo solucionaste? Gracias.

Saludos,
Regards,

Jose Luis Alepuz
joseluis@mancomputer.com
www.mancomputer.com
goosfancito
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re:
Posted: Mon Jun 01, 2009 03:25 AM
Antonio,
Me quedo enganchado con este post porque me estta pasando algo rado a mi logica y no lo entiendo.

Pongo parte del codio para pode explicarme mejor:

Code (fw): Select all Collapse
 聽 聽 聽
聽 聽 聽 REDEFINE FOLDER ::oFolder[1] ID 400 OF ::oDlg;
聽 聽 聽 聽 聽PROMPT "Etapa 2", "Etapa 3";
聽 聽 聽 聽 聽DIALOGS "SLP_LIC_1", "SLP_LIC_2"

聽 聽 聽 聽 聽REDEFINE GET ::oDatos[09] VAR ::vDatos[09] ID 122 FONT oFont[02] OF ::oDlg; 聽// Etapa 1 - Dias
聽 聽聽 聽 聽 PICTURE "@999.999"

聽 聽 聽 //----------( Autorizacion del llamado )----------

聽 聽 聽 // Solapa 1
聽 聽 聽 REDEFINE GET ::oDatos[10] VAR ::vDatos[10] ID 123 FONT oFont[02] OF ::oFolder[01]:aDialogs[01] 聽// Etapa 2 - 1: Fecha Envio

      // Solapa 2
聽 聽 聽 REDEFINE GET ::oDatos[11] VAR ::vDatos[11] ID 124 FONT oFont[02] OF ::oFolder[01]:aDialogs[02] 聽// Etapa 2 - 3: Fecha Dev


mi intension es que al perder el foco en ::oDatos[10] (primer dialog del folder) el cursor quede en el ::oDatos[11] del dialogo 2...

Como lo hago?
lo estoy haciendo haciendo asi ::oFolder[1]:aDialogs[2]:setfocus() y no me funciona.

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
wmormar
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Re: Re:
Posted: Mon Jun 01, 2009 01:16 PM

Goos,

Al final de cuentas los folders son di谩logos, as铆 que checa el index en tu recurso y asignale el primer index al control que quieras que tenga el foco.

as铆 de simple.

William, Morales

Saludos



m茅xico.sureste

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions