>Regards,
>
>Gerard
>
>
>Hi All, thanks for your replies.
>
>I have started to play with the Treeview in Samples whcch allows a Treeview to be created and Saved,Restored from a dbf file.
>Its working fine but have two issues:
>
>1. When a Child is added, it does not set focus on the child so it can be amended. You have to click on the +, and navigate to it
> Is there a way of setting focus to it immediately
>
>2. Editing a node seems to be a bit flaky. Sometiomes . I have to click the Left mouse a few times, or esle wiat a few seconfs.. maybe I am doing soething wrong ?
>
>Code in Sample Treeview to add a child
>--------------------------------------
>#DEFINE TXT_LOC "Click to edit text"
>o = THISFORM.oleTree
>IF !ISNULL(o.SelectedItem) THEN
> o.Nodes.Add(o.SelectedItem.Key, 4, THISFORM.NewKey(), TXT_LOC,0)
>ENDIF
>_______________________________________
>
>All Help appreciated.
>
>
>Regards,
>Gerard
#DEFINE TXT_LOC "Click to edit text"
o = THISFORM.oleTree
IF !ISNULL(o.SelectedItem) THEN
loNode = o.Nodes.Add(o.SelectedItem.Key, 4, THISFORM.NewKey(), TXT_LOC,0)
o.SelectedItem.Expanded = .t.
o.SelectedItem = loNode
loNode.EnsureVisible
o.SetFocus()
o.StartLabelEdit
ENDIF
Cetin