FoxPro/Visual FoxPro - objeto no visible

   
Vista:

objeto no visible

Publicado por marcelo  (71 intervenciones) el 21/07/2010 20:27:35
hola : cree una clase en la cual puse un text dentro de un container (la clase lo que hace es mostrar algo similar al reloj digital de windows con segundos).
para eso uso un evento timer .Esta clase la probe poniendo el codigo en vez de un container dentro de un form y funciona .
el tema es que al generarla con el container como contenedor ,la quiero agregar a la pantalla principal usando este programa :

SET CLASSLIB TO reloj_digital additive

try
_screen.addobject("oReloj", "reloj_digital") &&linea que da error

_screen.oReloj.Top=150
_screen.oReloj.Left=150
_screen.oRELOJ.Visible=.T.
READ events
catch

endtry
y me da error en la linea marcada.
----------------------------------------------------------------------------
en la clase reloj_digital ,el codigo del init det text es :
this.Value=ALLTRIM(SUBSTR(TTOC(dateTIME()),12,8))

y en el metodo timer del objeto timer es :

LOCAL hora,minutos,seg
hora=VAL(SUBSTR((this.parent.text1.Value),1,2))
minutos=VAL(SUBSTR((this.parent.text1.value),4,2))
seg=VAL(SUBSTR((this.parent.text1.value),7,2))
IF (seg<60)
seg=seg+1
ELSE
IF ((minutos<60) AND seg==60)
minutos=minutos+1
seg=0
ELSE
IF (minutos==60 )
hora=hora+1
minutos=0
endif
endif
endif
this.parent.text1.Value=PADL(ALLTRIM(STR(hora,2)),2,"0")+":"+PADL(ALLTRIM(STR(minutos,2)),2,"0")+":"+PADL(ALLTRIM(STR(seg,2)),2,"0")

lo que me genero dudas es como referenciar la propiedad value del text1 ,porque pongo el nombre del container y me dice que no reconoce el objeto .por eso puse parent .por favor necesitaria saber donde esta el error .gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:objeto no visible

Publicado por Edgar Zambrano (31 intervenciones) el 21/07/2010 21:09:42
mira el error lo tienes aqui _screen.addobject("oReloj", "reloj_digital") , el primer parametro de addobject es el nombre que le das al objeto y el segundo es la clase contenedora que necesitas presentar...

tu biblioteca de clases se llama reloj_digital.vcx y esta a su vez contiene una subclase que es un contenedor por lo que dices

entonces tu codigo seria el siguiente

_screen.addobject("oReloj", "cntReloj")

y listo con esto a de funcionar tu reloj digital en el _screen

"Lo imposible es el fantasma de los timidos y el refugio de los cobardes."
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar