Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Treeview - trying to display contents of dbf
Message
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Environment versions
Visual FoxPro:
VFP 8 SP1
Miscellaneous
Thread ID:
01020950
Message ID:
01020967
Views:
24
thisform.TreeView.Nodes.Add(,1,"AllAccounts","All Accounts",0)
SCAN
   DO CASE
      CASE EMPTY(Code2) AND EMPTY(Code3)
           thisform.TreeView.Nodes.Add("AllAccounts",4,ALLTRIM(Code1),ALLTRIM(Name),0)
      CASE NOT EMPTY(Code2) AND EMPTY(Code3)
           thisform.TreeView.Nodes.Add(ALLTRIM(Code1),4,ALLTRIM(Code1)+ALLTRIM(Code2),ALLTRIM(Name),0)
      CASE NOT EMPTY(Code2) AND NOT EMPTY(Code3)
           thisform.TreeView.Nodes.Add(ALLTRIM(Code1)+ALLTRIM(Code2),4,ALLTRIM(Code1)+ALLTRIM(Code2)+ALLTRIM(Code3),ALLTRIM(Name),0)
ENDSCAN
something like this (not tested)
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform