FiveTech Software tech support forums

Posted: **Wed Jan 09, 2008 4:56 pm**

Creo que seria practico poderle pasar el parametro cargo al metodo Add de la clase tTreeView, y este metodo a su vez lo pasase al crear el tTvItem.
Tendria la misma funcionalidad que el metodo Add de la clase tTvItem

Code: Select all

CLASS TTreeView FROM TControl
...
METHOD Add( cPrompt, nImage , Cargo)
...

METHOD Add( cPrompt, nImage, Cargo ) CLASS TTreeView

   local oItem

   oItem := TTVItem():New( TVInsertItem( ::hWnd, cPrompt,, nImage ), Self )

   oItem:cPrompt := cPrompt
   oItem:nImage  := nImage
   oItem:Cargo    := Cargo    //<===
   AAdd( ::aItems, oItem )

return oItem

Posted: **Wed Jan 09, 2008 5:37 pm**

Biel,

Puesto que el método Add() devuelve el item recien creado, se puede hacer:

oTree:Add( cPrompt, nImage ):Cargo = ...

Posted: **Thu Jan 10, 2008 8:44 am**

Correcto Antonio, yo ya lo estba haciendo como tu mencionas(por eso lo puse aqui en un whish y no en un problema), solo era una sugerencia puesto que el ADD de tTvItem recibe ese parametro. De esa manera tanto al crear un nodo de primer nivel como segundo,..., estariamos llamando a Add con los mismos parametros.

FiveTech Software tech support forums

Metodo ADD de la clase TTreeView

Metodo ADD de la clase TTreeView