FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour problemas con bchange en get
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
problemas con bchange en get
Posted: Sun Nov 12, 2006 03:31 PM

El bChange del control get no funciona. Estoy compilando con xharbour 0.99.60 y fwh 2.7, sin embargo con harbour lo hace perfectamente. Supongo que es un problema de la versi贸n de xharbour o es otro motivo ?. Los dem谩s controles funcionan bien con esta versi贸n. Alguna idea que me pueda orientar ??? Desde ya muchisimas gracias.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
problemas con bchange en get
Posted: Mon Nov 13, 2006 10:14 AM

Horacio,

La Clase TGet de Harbour y xharbour no son iguales, de ah铆 la diferencia de comportamiento.

Puedes mostrarnos un ejemplo de lo que est谩s haciendo ? gracias,

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
problemas con bchange en get
Posted: Mon Nov 13, 2006 06:29 PM

Antonio :
Ante todo te agradezco que me hayas contestado. Te mando un ejemplo de los samples que trae fwh, solamente le modifiqu茅 el primer get para ver si este error se reproducia lo mismo que sucede en la aplicaci贸n que estoy haciendo.

include "FiveWin.ch"

function Main()
LOCAL oDlg, oGet
LOCAL cCad := "Testing " // pad("Testing Gets",40)
LOCAL nNum := 0
LOCAL dDat := Date()

Set century On
Set Date Ansi
Set Date format "mm/dd/yyyy"

SET _3DLOOK ON

DEFINE DIALOG oDlg TITLE "TGet from " + FWDESCRIPTION

@ 1, 2 SAY "Text..:" OF oDlg
//este get es el modificado
@ 1, 6 GET oGet VAR cCad OF oDlg SIZE 60, 10 COLOR "W/G" PICTURE "@K" On Change( oDlg : SetText( cCad ) )
@ 1.8, 2 SAY "Number:" OF oDlg
@ 2, 6 GET oGet VAR nNum OF oDlg SIZE 60, 10 PICTURE "9999999.99"
@ 2.6, 2 SAY "Date:" OF oDlg
@ 3, 6 GET oGet VAR dDat PICTURE "@E" OF oDlg SIZE 60, 10 // "@D"
@ 3, 7 BUTTON "&Ok" OF oDlg SIZE 30, 12 ACTION oDlg:End()
@ 3, 16 BUTTON "&Cancel" SIZE 30, 12 OF oDlg ACTION oDlg:End() CANCEL
ACTIVATE DIALOG oDlg CENTERED

return nil

//------------------------------------------------------------------------//

procedure appsys
return

Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
problemas con bchange en get
Posted: Thu Dec 07, 2006 04:14 PM

Estuve haciendo varias pruebas sobre el change del get y sucede algo raro. si en el change pongo un MsgAlert() con la variable del get funciona. aunque me empieza a mostrar la cadena una vez que he ingresado dos caracteres. A partir del tercero lo muestra. Ahora si quiero cambiar el t铆tulo de un dialogo con un change de un get no lo hace. Tendr谩 soluci贸n ?? Gracias por todo

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
problemas con bchange en get
Posted: Thu Dec 07, 2006 05:45 PM

Horacio,

El MsgAlert() provoca una perdida de foco y en ese momento se asigna la variable asociada al GET.

El c贸digo al que haces referencia no es el mismo que el que has publicado aqui, si ? En tal caso, por favor, mu茅stranos lo que est谩s haciendo. A ser posible un ejemplo peque帽o y autocontenido. Gracias,

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion