Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
TreeView key
Message
From
18/01/2000 14:12:27
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Title:
TreeView key
Miscellaneous
Thread ID:
00319557
Message ID:
00319557
Views:
60
Can any one tell me why this code will fail with out the appended "A" to lckey. CustView.CustId is a unique id field. Also I notice that a space is appended to the first line for lcKey???
What I am trying to do is to put the customer Id into the key of the treeview so when i click on the node i can show the customer info in a window...

The error is invald key from nodes
WITH This
  .oleTreeview.ImageList = .oleImagesList
  FOR lnCnt = 65 TO 90
    .oleTreeview.Nodes.Add(,,CHR(lnCnt),CHR(lnCnt),"Closed","Open")
    DO WHILE ALLTRIM(LEFT(CustView.LName,1)) = CHR(lnCnt)
      * lcKey = ALLTRIM(CustView.CustId)
      * The above line will give an error and the below does not
      lcKey = ALLTRIM(CustView.CustId)+'A'
      lcText = ALLTRIM(CustView.LName)
      .oleTreeview.Nodes.Add(CHR(lnCnt),4 ,lcKey, lcText)
      SKIP
    ENDDO
  ENDFOR
ENDWITH
Thanks
Next
Reply
Map
View

Click here to load this message in the networking platform