易语言树形框怎么设置分支图标！！！！！十分感谢，最好给个源码！

树型框1.图片组=

成员属性“图片组”所在数据类型为“树型框”，英文名称为“ImageList”，类型为“字节集（bin）”。

为树型框提供标志图片。

树型框1.置图片 (, )

调用格式： 〈逻辑型〉 对象．置图片 （整数型 项目索引，整数型 图片索引） - 扩展界面支持库一->树型框

英文名称：SetImage

设置在指定项目首部所显示图片的索引。成功返回真，失败返回假。本命令为初级对象成员命令。

参数<1>的名称为“项目索引”，类型为“整数型（int）”。0 为项目一，1 为项目二，如此类推。

参数<2>的名称为“图片索引”，类型为“整数型（int）”。图片索引用于指定图片组属性中的某张图片，从 0 开始。

*** 作系统需求： Windows

这两个命令就可以实现了

易语言树型框全 *** 作源码例程程序结合易语言扩展界面支持库，针对树型框的完全 *** 作，支持设置树型框各种属性；动态添加、修改、删除项目；取得某一项目下所有子项目；树型框项目任意移动。

本易语言源码例程属于易语言初级进阶教程。

‘不用外部数据库，添加一个数据库连接1控件：

’假设库文件名为“产品数据库.mdb”，库中的表名为“产品表”，产品字段名“类别”

全局变量：a 文本型

如果真（数据库连接1.连接Access（取运行目录（）+“\产品数据库.mdb”，“”）=假）

          信息框（“连接数据库失败！”，0，）

返回（）

’添加一个记录集控件；

记录集1.置连接（数据库连接1）

‘上面我们已经打开并且连接好了MDB数据库，接下来我们做读取和显示；

记录集1.打开（“select * from 产品表”，#SQL语句，#服务器端游标）

记录集1.到首记录（）

判断循环首（记录集1.尾记录后=假）

      记录集1.读文本（“类别”，a）

      如果真（a=“日用品”）

        树型框1.加入项目（0，a，，，，，）

      如果真（a=“洗化用品”）

        树型框1.加入项目（1，a，，，，，）

      如果真（a=“洗发水” 或 a=“洗衣粉”）

        树型框1.加入项目（2，a，，，，，）

      记录集1.到下一条（）

判断循环尾（）

记录集1.关闭（）

---