FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Problema TGet
Posts: 297
Joined: Fri Apr 14, 2006 05:52 PM
Problema TGet
Posted: Thu Oct 30, 2008 12:14 PM
Buenas Tardes Foro:

Tengo un problema con un proyecto antíguo (FWH 2.4). Es el siguiente:

Tengo un get deshabilitado con un valor numerico, cuando pulso el boton que lo habilita y el get obtiene el foco, cuando escribo sobre dicha casilla el valor que hubiera antes lo borra (ese comportamiento para mi es el correcto). ¿Donde está el problema? pues que pulso intro y me voy a otro get, y si quiero volver al primero, cuando obtiene el foco, en vez de comportarse como al principio, si escribo, ya NO borra lo que hubiera en la casilla, sino que va machacando lo que hubiera. ¿Como puedo hacer para que siempre actue de esa manera, es decir, borrando lo que hubiera en el get?.

Espero haberme explicado bien

redefinición del get:
redefine get o:aoGet[1]  var (o:ctbfcos)->porcosant id 201 of o:odlg picture "9,999.99" when o:lActivo


Un Saludo,
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Problema TGet
Posted: Thu Oct 30, 2008 12:49 PM

usa esto a ver si te sirve

o:aoGet[1]:bGotFocus = {|self| ::SelectAll() }

Posts: 297
Joined: Fri Apr 14, 2006 05:52 PM
Problema TGet
Posted: Thu Oct 30, 2008 01:04 PM

Gracias mcfox por tu contestación.

El problema persiste, con la única diferencia que el efecto del ::Selectall solo se aprecia la 1ª vez, en los demas get's e incluso cuando vuelvo al primero ya no le aplica el efecto.

De todas formas MUCHAS GRACIAS por tu tiempo.

Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
Problema TGet
Posted: Thu Oct 30, 2008 02:02 PM

Mike, faça o seguinte teste

nTest:=(o:ctbfcos)->porcosant
redefine get o:aoGet[1] var nTest id 201 of o:odlg picture "9,999.99" when o:lActivo

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin
Posts: 297
Joined: Fri Apr 14, 2006 05:52 PM
Problema TGet
Posted: Thu Oct 30, 2008 04:15 PM

Exactamente igual,

Muchas Gracias.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Problema TGet
Posted: Thu Oct 30, 2008 09:09 PM

Mike,

Estas usando un bucle for ... next para redefinir los GETs ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 297
Joined: Fri Apr 14, 2006 05:52 PM
Problema TGet
Posted: Fri Oct 31, 2008 12:05 PM

No Antonio, aunque las variables están en un array las creo línea a línea, no en un bucle.

De todas formas creo que el problema está en los get's que se le asignan un valid, es decir, si el get numerico no tiene valid, funciona siempre bien, pero si por el contrario el get tiene un valid, segun que caso, funcionará la primera vez que obtenga el foco y despues ya no funcionará, o tengo casos en los que nunca funciona.

Espero haberte dado alguna pista más, de todas formas, te recuerdo, que es un proyecto antiguo (FWH 2.4), sería muy laborioso pasarlo a una nueva versión.

Muchas Gracias por todo.

Continue the discussion