FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Treeview
Posts: 37
Joined: Mon Nov 12, 2007 12:46 PM
Treeview
Posted: Tue Sep 29, 2009 05:57 PM

Hola, después de pulsar click, ¿cómo saber si estoy en la casilla de verificación o de la más

si estoy en mi derecho de la casilla de verificación de rutina ahora si estoy en la cima de la que da el siguiente error:

Error description: Error BASE/1005 Class: 'NIL' has no property: CARGO

Gracias

Luiz Fernando

FWH 804,XHARBOUR 1.1,XDEV,PELLES
Posts: 37
Joined: Mon Nov 12, 2007 12:46 PM
Re: Treeview
Posted: Tue Sep 29, 2009 06:30 PM

No sé si hay otra forma, más que para averiguar si estoy en +

oItem1 := oTree:GetSelected()
if valtype(oItem1)='O' //'object'
return .f.
endif

Gracias

Luiz Fernando

FWH 804,XHARBOUR 1.1,XDEV,PELLES
Posts: 32
Joined: Tue Jun 24, 2008 05:19 PM
Re: Treeview
Posted: Thu Oct 01, 2009 10:16 PM

Te sugiero revisar el ejemplo Testtre2.prg, quizas con esta parte puedas sacar alguna idea de como hacerlo..

oTree:bChanged := {|oTree,oItem| ;
oWnd:SetText( If( oTree:GetSelected():GetParent() != nil,;
oTree:GetSelected():GetParent():cPrompt + " + ", "" ) + ;
oTree:GetSelText() ), ;
oItem := oTree:GetSelected(), ;
If( oItem # nil .and. ValType( oItem:cargo ) == "B", Eval( oItem:cargo ), nil ) }

Ojala te sirva

Posts: 37
Joined: Mon Nov 12, 2007 12:46 PM
Re: Treeview
Posted: Fri Oct 02, 2009 06:45 PM

Gracias, irei ver...

FWH 804,XHARBOUR 1.1,XDEV,PELLES

Continue the discussion