FiveTech Software tech support forums

This is actually intended for cases where the first n fields would not be modified.
Anyway please try to change oBrw:oTreeItem:cPrompt also when you modify 3rd field.

Yes, by using oBrw:oTreeItem:Add() and oBrw:oTreeItem:Delete()
Please look into treeitem.prg

You can use codeblocks for colors and fonts based on oBrw:oTreeItem:nLevel or any other datas of oBrw:oTreeItem

XBrowse has DATA oTreeItem

Good Morning (for me)
Many Thanks Mr. Rao!

I looked at in TxBrowse, TXBrwColumn and TLinkList class and not find Brw:oTreeItem. Where is it?

... "GRAND TOTAL" ocol:nEditType := {||if(::ledit,1,0)} ocol:bEditValue := {||odb2:cquery:="select * from ac where acid='"+obrow2:oTreeItem:cPrompt+"'",odb2:refresh(),obrow2:oTreeItem:cPrompt} // on chang ,to refresh other columns datas oCol:bOnPostEdit := {|o, v, n|if( ...

oBrw:oTreeItem is the current TreeItem.
oBrw:oTreeItem:Cargo --> { menu_id, menu_name, menu_parent_id }

... nao consigo expandir o Tree? alguém sabe pq? oBrw:bKeyDown := {|nKey| BrwKeyAtUs(nkey, oBrw) } .. Static Function BrwKeyAtUs(nKey, oBrw) If !oBrw:oTreeItem:lOpened .and. oBrw:oTreeItem:nLevel == 1 If nKey == VK_RETURN oBrw:oTreeItem:Open() oBrw:Refresh() Endif ElseIf oBrw:oTreeItem:lOpened .and. ...

... event. If 2nd param (nSecs) is specified, the message is diaplayed for the specified duration and closed. - Enhancement: Tree Browse: In case a oTreeItem has DATA bAction, double-click evaluates bAction with oTreeItem and oCol as parameters - Symbol bitmaps are shown in text color. - Col:bPopup ...

oParentItem := oBrw:oTreeItem:Parent()

Mr. Rao. Thank you very much for your response and detailed explanation. :bOnPostEdit := { |o,x,k| If( k == VK_ESCAPE, nil, ( ::oBrw:oTreeItem:Cargo[ _PAID ]:= x , ::ReCalculate() ) ) } Notice the error occurs when clicking on the square box of the leaf cell -**Esc key is not being explicitly ...

      :bOnPostEdit := { |o,x| ::oBrw:oTreeItem:Cargo[ _PAID ]:= x , ::ReCalculate() }  may please be replaced with the standard construct:       :bOnPostEdit := { |o,x,k| If( k == VK_ESCAPE, nil, ( ::oBrw:oTreeItem:Cargo[ ...

... perfectly. If I compile with fwh 2014 it breaks. Notice the problem happens when you try to assign a value to a leaf cell on the tree, as in: oBrw:oTreeItem:Cargo[ 2 ] := 0.00. Please test and please help! Thank you. #include "fivewin.ch"#DEFINE _KEY 1 #DEFINE _PAID 1#DEFINE _EXPECTED ...

... ; "\fwh\bitmaps\16x16\onepage2.bmp" } ) oBrw:bKeyChar := { |nKey| If( nKey == VK_RETURN .and. ! Empty( oBrw:oTreeItem:bAction ), ; Eval( oBrw:oTreeItem:bAction, oBrw:oTreeItem ), nil ) } WITH OBJECT oBrw:aCols[ 1 ] :AddBmpFile( "\fwh\bitmaps\hdrive.bmp" ...

... :nWidth := 340 :cHeader := 'Cartella' b := :bLDClickData :bLDClickData := { |r,c,f,o| ToggleFolder( r,c,f,o,b ) } :bBmpData := { || If( ':' $ oBrw:oTreeItem:cPrompt, 4, ; If( 'D' $ oBrw:oTreeItem:Cargo[ 5 ], ; If( oBrw:oTreeItem:lOpened, 1, 2 ), 3 ) ) } END ACTIVATE DIALOG oDlg CENTER