易语言树型框类模块源码

系统结构:InsertItem,Select,SelectItem,DeleteItem,SetItem,SetItemText,SetItemParam,SetItemImage,GetItem,GetItemText,GetItemParam,DeleteAllItems,GetCount,GetNextItem,GetRootItem,GetSelectItem,GetParentItem,GetChildItem,GetNextSiblingItem,GetPrevSiblingItem,Expand,清空,加入项目,ExpandAll,展开所有项,收缩所有项,展开选中所有项,取缩进层次,取项目文本,取项目数值,取父项目,删除项目,收缩选中所有项,取顶层项目,是否有子项目,SendMsg_InsertStruct,SendMsg_Item,SendMessage,

======ec
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |
======CTreeCtrl
           |  |
           |  |------ _Init
           |  |
           |  |------ InsertItem
           |  |
           |  |------ _InsertItem
           |  |
           |  |------ Select
           |  |
           |  |------ SelectItem
           |  |
           |  |------ DeleteItem
           |  |
           |  |------ SetItem
           |  |
           |  |------ _SetItem
           |  |
           |  |------ SetItemText
           |  |
           |  |------ SetItemParam
           |  |
           |  |------ SetItemImage
           |  |
           |  |------ GetItem
           |  |
           |  |------ GetItemText
           |  |
           |  |------ GetItemParam
           |  |
           |  |------ DeleteAllItems
           |  |
           |  |------ GetCount
           |  |
           |  |------ GetNextItem
           |  |
           |  |------ GetRootItem
           |  |
           |  |------ GetSelectItem
           |  |
           |  |------ GetParentItem
           |  |
           |  |------ GetChildItem
           |  |
           |  |------ GetNextSiblingItem
           |  |
           |  |------ GetPrevSiblingItem
           |  |
           |  |------ Expand
           |  |
           |  |
======类_树型框
           |  |
           |  |------ 清空
           |  |
           |  |------ 加入项目
           |  |
           |  |------ ExpandAll
           |  |
           |  |------ 展开所有项
           |  |
           |  |------ 收缩所有项
           |  |
           |  |------ 展开选中所有项
           |  |
           |  |------ 取缩进层次
           |  |
           |  |------ 取项目文本
           |  |
           |  |------ 取项目数值
           |  |
           |  |------ 取父项目
           |  |
           |  |------ 删除项目
           |  |
           |  |------ ________________
           |  |
           |  |------ 收缩选中所有项
           |  |
           |  |------ 取顶层项目
           |  |
           |  |------ 是否有子项目
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SendMsg_InsertStruct
           |  |
           |  |---[dll]------   SendMsg_Item
           |  |
           |  |---[dll]------   SendMessage

调用的DLL命令:

.DLL命令 SendMsg_InsertStruct, 整数型, , "SendMessageA"
    .参数 hWnd
    .参数 uMsg
    .参数 wParam
    .参数 lParam, TVINSERTSTRUCTA

.DLL命令 SendMsg_Item, 整数型, , "SendMessageA"
    .参数 hWnd
    .参数 uMsg
    .参数 wParam
    .参数 lParam, TVITEMA

.DLL命令 SendMessage, 整数型, , "SendMessageA"
    .参数 hWnd
    .参数 uMsg
    .参数 wParam
    .参数 lParam