FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Error en la clase GET
Posts: 1088
Joined: Fri Oct 07, 2005 03:33 PM
Error en la clase GET
Posted: Fri Feb 16, 2007 04:14 PM
Holas,

no se si es un bug en la clase get, pero la siguiente definicion no funciona



REDEFINE GET f1 ;
ID 111 ;
OF oDlg ;
PICTURE "@d" ;
WHEN nRango = 2 ;
UPDATE ;
ON CHANGE oDlg:update()



no permite editar correctamenrte el get, sin el ON CHANGE todo sales OK, le aumente .T. al final del on change e igual, sera un bug, estoy utilizando
FWH 2.6 xHb 99.5 Bcc 55

saludos

Marcelo
Posts: 711
Joined: Thu Oct 06, 2005 09:57 PM
Error en la clase GET
Posted: Sat Feb 17, 2007 12:56 PM

Marcelo,

El pasado dia 12/05/2006, ante otra duda con UPDATE, te contesté diciendote que yo habia tenido ese problema y que lo habia solucionado modificando la clase TGET, según una idea de Luis Krause. Te acompaño la contestación por si te sirviera de ayuda:

"Si el código anterior no funciona, estoy casi seguro, que el problema está en la clase TGET. Yo lo tuve hace tiempo y lo solucione gracias a LKM, añadiendo una línea en TGET en el Method EditUpdate():

METHOD EditUpdate() CLASS TGet

if ::oGet:HasFocus
::DispText()
::oGet:Assign() //LKM actualiza buffer actual
endif

::SetPos( ::oGet:Pos )

return nil

Un saludo



Manuel
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
Error en la clase GET
Posted: Thu Feb 22, 2007 02:05 PM

Manuel
Gracias por el aporte. Tenía problemas con la cláusula on change y esto lo solucionó. Ahora me encuentro que siempre me devuelve un caracter menos, es decir si pongo 'Hola' on change me devuelve 'hol'. Sé que esta patología estaba presente en fw24 de 16 bits y en un post daban solución a esto. Alguien sabe donde puedo encontrar este arreglo. Gracias por todo

Continue the discussion