TTreeViewItem: AltSortChildren() y Select()

[Israel Solis]

Hola:
Tengo problemas con la clase TTreeViewItem, intento que se ordene con el método AltSortChildren() según la propiedad lParam pero no lo logro
Si la propiedad lParam se especifica desde el AddItem("mi texto a mostrar",,,,, 8) y después ejecuto AltSortChildren() el orden se realiza sin ningún problema
pero si cambio las propiedades "a mano"
oItem:cText := "cambio el texto a mostrar"
oItem:lParam := 5
Al ejecutar AltSortChildren() ya no se reordena adecuadamente, como si el nuevo valor para la propiedad lParam fuera ignorada
Otro detalle es que el Item no queda seleccionado con Select()
Ejemplo tomado de XailerSamplesTreeViewForm1.prg (lí­nea 185)
//---------------------------------------------------------- --------------------
METHOD Button5Click( oSender ) CLASS TForm1
Local oItem
With Object ::oTV
If :GetCount() > 0
oItem := :GetSelectedItem()
Else
oItem := ::oTV
Endif
oItem:InsertItem( "New Item", 1 ):Select(.T.) // El nuevo Item no queda seleccionado con Select()
End With
RETURN Nil
//---------------------------------------------------------- --------------------
De antemnano gracias!!
SALUDOS!!
Israel
--

[ignacio]

Israel,
>>Tengo problemas con la clase TTreeViewItem, intento que se ordene con el método AltSortChildren() según la >>propiedad lParam pero no lo logro
Corregido. Estará disponible en la próxima revisión.
>>oItem:InsertItem( "New Item", 1 ):Select(.T.) // El nuevo Item no queda seleccionado con Select()
Quitele el parametro .T. al método Select().
Un saludo,
--
Ignacio Ortiz de Zúñiga
[Soporte Xailer]
[Xailer support]
--

[Israel Solis]

Ignacio:
>>Corregido. Estará disponible en la próxima revisión.
Solo por curiosidad: se puede saber la fecha aproximada de la próx. versión?
>>Quitele el parametro .T. al método Select().
Funcionó perfecto, creo que confundí­ la finalidad del parámetro [<lFirstVisible>]
MIL GRACIAS!!
Un saludo
--
Israel Solis
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje news:48451611$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
Israel,
>>Tengo problemas con la clase TTreeViewItem, intento que se ordene con el método AltSortChildren() según la >>propiedad lParam pero no lo logro
Corregido. Estará disponible en la próxima revisión.
>>oItem:InsertItem( "New Item", 1 ):Select(.T.) // El nuevo Item no queda seleccionado con Select()
Quitele el parametro .T. al método Select().
Un saludo,
--
Ignacio Ortiz de Zúñiga
[Soporte Xailer]
[Xailer support]
--

[ignacio]

Israel,
Esperamos publicar una revisión de la versión 1.9 esta misma semana, o como muy tarde a primero de la que viene.
Un saludo,
Ignacio Ortiz
Xailer support
"Israel Solis" <isolis@sanroms.com> escribió en el mensaje news:[email=48455ee4@ozsrv2.ozlan.local...]48455ee4@ozsrv2.ozlan.local...[/email]
Ignacio:
>>Corregido. Estará disponible en la próxima revisión.
Solo por curiosidad: se puede saber la fecha aproximada de la próx. versión?
>>Quitele el parametro .T. al método Select().
Funcionó perfecto, creo que confundí­ la finalidad del parámetro [<lFirstVisible>]
MIL GRACIAS!!
Un saludo
--
Israel Solis
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje news:48451611$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
Israel,
>>Tengo problemas con la clase TTreeViewItem, intento que se ordene con el método AltSortChildren() según la >>propiedad lParam pero no lo logro
Corregido. Estará disponible en la próxima revisión.
>>oItem:InsertItem( "New Item", 1 ):Select(.T.) // El nuevo Item no queda seleccionado con Select()
Quitele el parametro .T. al método Select().
Un saludo,
--
Ignacio Ortiz de Zúñiga
[Soporte Xailer]
[Xailer support]
--