Wladimir1

Absent Member.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Email to a Friend
- Report Inappropriate Content
2011-08-23
12:03
1441 views
[Migrated content. Thread originally posted on 19 August 2011]
HelloI am new to COBOL but I know Visual Studio
I would like to create TREEVIEW via Visual Studio but I can not define arrays of nodes.
I'm trying to do as follows
invoke treeview1::nodes::ADD ("ROOT NODE"). (It's Works)
invoke treeview1::nodes[0]::Nodes::ADD ("CHILD NODE"). (does not work)
If anyone can help me,
Thanks
1 Solution
Accepted Solutions


Cadet 2nd Class
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Email to a Friend
- Report Inappropriate Content
2011-08-23
12:13
hi,
i have lifted this code from a project that works and its shows adding a top level item then 3 sub levels.
invoke trvList::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Item"(ws-NodeCount3)::"Nodes"::"Add"(ws-Codes-Text)
i have lifted this code from a project that works and its shows adding a top level item then 3 sub levels.
invoke trvList::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Item"(ws-NodeCount3)::"Nodes"::"Add"(ws-Codes-Text)
2 Replies


Cadet 2nd Class
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Email to a Friend
- Report Inappropriate Content
2011-08-23
12:13
hi,
i have lifted this code from a project that works and its shows adding a top level item then 3 sub levels.
invoke trvList::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Item"(ws-NodeCount3)::"Nodes"::"Add"(ws-Codes-Text)
i have lifted this code from a project that works and its shows adding a top level item then 3 sub levels.
invoke trvList::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Add"(ws-Codes-Text)
invoke trvList::"Nodes"::"Item"(ws-NodeCount1)::"Nodes"::"Item"(ws-NodeCount2)::"Nodes"::"Item"(ws-NodeCount3)::"Nodes"::"Add"(ws-Codes-Text)
Wladimir1

Absent Member.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Email to a Friend
- Report Inappropriate Content
2011-08-24
20:19