FoxPro/Visual FoxPro - Una ayada por favor

Tengo estas lineas en el lostfocus de un listbox

this.TopIndex = this.ListIndex
this.Height=24
this.Refresh

lo que sucede es que este listbox tenia el .Height=196, y luego de utilizarlo lo seteo para que quede .Height=24. Ahi el problema. SE QUEDA DIBUJADO PARTE DEL LISTBOX, como si tuviera una tarjeta de graficos de los malos.

Como solucionar el problema?

Mira, yo probé esto mismo que hiciste y me funciona bien, el Height lo predefiní en tiempo de diseño a 24

En el InteractiveChage coloque el código que sugieres y funciona bién.

This.TopIndex = This.ListIndex

No es necesario el refresh

Espero que te sirva.

¿No será que necesitas Refrescar " Refresh " el Formulario para que se grafique con los nuevos Objetos, en este caso el Listbox?

De lo contrario perdoname, pero no entendí.

me explico mejor:

Estoy utilizando un TEXTBOX y un LISTBOX de tal manera que resulta algo parecido a un COMBOBOX, pero controlado separadamente.

1. Ubico el foco en el TEXTBOX, al presionar cualquier tecla, se alarga el LISTBOX (thisform.list1.height=196)
2. En el Interactivechange del TEXTBOX tengo una busqueda para que en el LISTBOX se posicione sobre el registro que coincide.
3. Presiono ENTER y el foco se pasa al LISTBOX, alli puedo navegar con las teclas de Flechas.
4. Presiono ENTER y el foco pasa a otro TEXTBOX distinto.
5. En el Lostfocus del LISTBOX tengo (this.height=24) , la idea es para que se recoja y quede al tamaño de un textbox.

Luego de recogerse al tamaño adecuado (.height=24), en el form queda residuos del LISTBOX (.height=196)..... muy desagradable!!!!

- He probado con this.Refresh, this.Requery, thisform.refresh. Pero no han funcionado. Que sera?

- Gracias.

Mi viejo

Te hice un formulario y funciona todo bien con lo que vos necesitas hacer ¿como y a donde te lo envío?

comunicate conmigo al Chat en [email protected]

ya encontré el problema.

El metodo .Zorder tiene fallas. (VFP9.0)

Le quité y funciona perfecto