¡AYÚDENME PORFAVOR! Problemas con código en Visual Fox

[gilanrodas]

¿Porque cuando declaro una variable en Visual Fox me devuelve un resultado lógico? Por ejemplo:
Local mivariable as string
mivariable = this.parent.combo1.value

En tal caso asumo que me tiene que devolver el valor del combobox pero me devuelve .F.
Ya lo comprobé con un
MESSAGEBOX(mivariable)

¿A qué se debe esto? ¿Qué hago para que me devuelva el valor en string?

¡Muchas gracias!

[MOISES]

prueba lo siguiente.

esto aplica si estas dentro del combo de lo contrario ocupa THISFORM
1.
mivariable=this.combo1.value

2. quita la declaración (string) y prueba lo anterior.

cualquier cosa aquí estamos ..

[gilanrodas]

Pues, ahora no me da ningún error, pero me retorna un valor en blanco, osea nada. Por ejemplo si le pongo que me lo muestre en el messagebox, sólo me aparece el cuadro con el botón aceptar sin el valor de la variable.

[kikeuntercio]

no es necesario declarar ninguna variable podes usar directamente el combo
asi:
messagebox(thisform.combo1.value)
o con variable local asi:
mivariable=Thisform.combo1.value
messagebox(mivariable)
Tip: agregale siempre el "Alltrim"
alltrim(Thisform.combo1.value)

Nota: el this.parent es cuando tenes los controles dentro de un Contenedor quizas alli sea tu problema

[rcguillen]

GilanRodas resolviste finalmente tu problema?

[gilanrodas]

Jeje, sí, muchas gracias. Problema resuelto.
Ahora, mil disculpas porque soy nuevo trabajando con Fox, de hecho, sólo llevo una semana y me ha tocado hacer todo un programa.
Otra cosa con la que tengo problema. Tengo un grid que quiero llenarlo con los datos de una tabla pero donde el campo cod_cel de la tabla sea igual a thisform.txtcodcel. ¿Alguien me puede decir cómo se hace esto?

[rcguillen]

Puedes hacer dos cosas, o filtrar o crear un select

si es un select

thisform.grid.recordsource = ''

select 0
select * from mytabla where cod_cel = thisform.txtcodcel.value into cursor mycursor

thisform.grid.recordsource = "mycursor"
thisform.grid.refresh

si es con algun filtro
digamos q ya tienes asignado tu tabla al grid entonces solo le das
select mytabla
set filter to cod_cel = thisform.txtcodcel.value
thisform.grid.refresh

Mas o menos asi andaria la situacion ahi tienes q adaptarla a tu caso particular.

[gilanrodas]

El último código, el del filtro, ¿se lo escribo al grid en sí, a algún botón, al formulario o adónde? 

Fijate que el select mytable y el set filter lo puse en la propiedad init del grid y el thisform.refresh.grid lo puse en los botones anterior, siguiente, etc, que me sirven para moverme (y mostrarme) entre los registros de la otra tabla que maneja los códigos y datos principales.
¿Está bien hecho esto o pude haberme ahorrado código?

Osea, es que tengo el formulario de los datos generales y abajo el grid de datos de asistencia correspondiente al código del formulario.

No sé si me doy a entender.

[rcguillen]

El último código, el del filtro, ¿se lo escribo al grid en sí, a algún botón, al formulario o adónde? 

Fijate que el select mytable y el set filter lo puse en la propiedad init del grid y el thisform.refresh.grid lo puse en los botones anterior, siguiente, etc, que me sirven para moverme (y mostrarme) entre los registros de la otra tabla que maneja los códigos y datos principales.
¿Está bien hecho esto o pude haberme ahorrado código?

Osea, es que tengo el formulario de los datos generales y abajo el grid de datos de asistencia correspondiente al código del formulario.

No sé si me doy a entender.

Me parece bien como los has echo  como te digo ahi seria ya de ver como se comporta el formulario....
el filtro puede estar donde aplique en el valid del objeto thisform.txtcodcel.value o el algun boton...

Espero te funcione si no....talvez puedas subir tu proyecto a algun lugar para poder ver los formularios y ayudar ya asi de primera mano.

[gilanrodas]

¿Qué significa que me salga un mensaje con un error que dice ""Error al cargar el archivo - número de registro 9. FormControlCelular <o uno de sus miembros>. Cargando el formulario o el entorno de datos.: THISFORM sólo puede usarse en un método."

[rcguillen]

Seguramente es codigo q tienes en el init del grid...

prueba comentariando esa parte del codigo..si funciona bien....
significa q para ese momento aun no sea creado el objeto al q hace referencia el grid.
Para solucionar esto...traslada dicho codigo al INIT del formulario.

[gilanrodas]

Este es el código que tengo en el init del grid:

SELECT asistencia
SET FILTER TO cod_cel=thisform.txtcodcel.Value

¿No tendré problema si lo traslado al init del formulario? Osea, quiero aplicar el filtro al grid

[rcguillen]

Este es el código que tengo en el init del grid:

SELECT asistencia
SET FILTER TO cod_cel=thisform.txtcodcel.Value

¿No tendré problema si lo traslado al init del formulario? Osea, quiero aplicar el filtro al grid

Tal y como te dije el error radica en q cuando se esta creando el objeto grid (init) aun no se ha creado el objeto thisform.txtcodvel...entonces no lo encuentra...
porque en fox...un formulario se crea de adentro hacia afuera (primero sus objetos inferiores hasta llegar a los superiores ..formulario principal)

Con q lo pases al init del formulario no deberia de darte ningun problema..el cambio deberia ser transparente..

[gilanrodas]

¿Cómo hago para que al dar clic sobre un item "Agregar nuevo" dentro de un combobox me abra un cuadro o ventana para agregar los detalles para ese nuevo item?

[rcguillen]

¿Cómo hago para que al dar clic sobre un item "Agregar nuevo" dentro de un combobox me abra un cuadro o ventana para agregar los detalles para ese nuevo item?

No se si entendi bien...pero

en el evento click de ese combobox, colocas tu codigo...

supongo q tienes un formulario para agregar detalles de ese items?

o si no le puedes dar un simple browse y ahi q coloquen los datos...pero te sugiero mejor un formulario..