Un par de cosicas

[Fredy]

Hola,
1 - ¿Funciona el lFilterBar con los TArrayBrowse? Lo digo porque al intentar
filtrar me desaparecen todas las lí­neas del array, incluso las que cumplen
la condición dada.
2 - Estoy usando oComboBox:InsertItem(1, cDato) y me he fijado que cuando
el combo sólo tiene un elemento la instrucción anterior me inserta el nuevo
elemento en el último lugar de la lista (esto es, en segundo posición). En
cambio, cuando el combo tiene 2 o más elementos sí­ que me inserta el nuevo
elemento en primera posición. Además, oComboBox:InsertItem(0, cDato) me funciona
si la lista está vací­a, pero da error si la lista tiene algún elemento. Para
que salga como quiero tengo que poner esto:
WITH OBJECT oSender
:InsertItem( 1, cDato )
IF Len( :aItems ) == 2
:aItems := { :aItems[2], :aItems[1] }
ENDIF
END
Un saludico,
Fredy

[jfgimenez]

Fredy,
2) Por favor, prueba con este módulo.
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info


Attached files combobox.zip (6.4 KB)Â

[Fredy]

Hola,
Con lo que has mandado parece que va bien, gracias.
Un saludico,
Fredy

[ignacio]

Fredy,
> 1 - ¿Funciona el lFilterBar con los TArrayBrowse? Lo digo porque al
> intentar
> filtrar me desaparecen todas las líneas del array, incluso las que cumplen
> la condición dada.
>
Efectivamente compruebo que fallaba cuando no se usaba SetArray() para
indicar una matriz a visualizar. Creo que ya está arreglado. Incluyo el
módulo con este Email.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fredy" <Fredy@aglsl.com> escribió en el mensaje
news:[email=a20b86f321b58c90eac182a22e6@news.xailer.com...]a20b86f321b58c90eac182a22e6@news.xailer.com...[/email]
> Hola,
>
> 2 - Estoy usando oComboBox:InsertItem(1, cDato) y me he fijado que cuando
> el combo sólo tiene un elemento la instrucción anterior me inserta el
> nuevo
> elemento en el último lugar de la lista (esto es, en segundo posición). En
> cambio, cuando el combo tiene 2 o más elementos sí que me inserta el nuevo
> elemento en primera posición. Además, oComboBox:InsertItem(0, cDato) me
> funciona
> si la lista está vacía, pero da error si la lista tiene algún elemento.
> Para
> que salga como quiero tengo que poner esto:
> WITH OBJECT oSender
> :InsertItem( 1, cDato )
> IF Len( :aItems ) == 2
> :aItems := { :aItems[2], :aItems[1] }
> ENDIF
> END
>
> Un saludico,
> Fredy
>
>
>


Attached files ArrayBrowse.rar (5.2 KB)Â